Obter nomes dos campos de uma tabela no Delphi
Inclua na seção uses:dbTables, Classes, Forms
A função abaixo obtém os nomes de todos os campos de uma tabela do banco de dados. Consulte mais informação
Consulta SQL que usa a data do sistema no Delphi
Problema: Preciso fazer uma consulta com SQL que me retorne todos os registros em que o valor de um campo do tipo data seja igual ou anterior à dada do sistema. Como fazer? Consulte mais informação
Fazer pesquisa incremental apenas com DBGrid no Delphi
Problema: Gostaria de fazer um formulário de pesquisa que, ao digitar algo sobre o DBGrid, o registro correspondendo fosse localizado. Consulte mais informação
Excluir todas as ocorrências de um caractere de uma string no Delphi
Inclua na seção uses:SysUtils
Problema: Em determinados casos gostaria de poder eliminar alguns caracteres indesejados que os usuários podem digitar, tais como pontos, aspas, etc. Como fazer isto? Consulte mais informação
Ordenar datas pelo mês em Paradox no Delphi
Problema: Gostaria de organizar uma lista dos clientes ordenados por mês a partir da data de nascimento. Consulte mais informação
Acessar tabela DB/DBF no diretório do EXE no Delphi
Inclua na seção uses:SysUtils
Problema: Gostaria de acessar tabelas DB/DBF que estão no diretório do EXE sem ter que criar um alias no BDE. Como fazer? Consulte mais informação
Sons no alto-falante do micro no Delphi
Inclua na seção uses:Windows
procedure Sound(Freq: Word); asm MOV DX, AX IN AL, $61 MOV AH, AL AND AL, 3 JNE @@1 MOV AL, AH OR AL, 3 OUT $61, AL MOV AL, $B6 OUT $43, AL @@1: MOV AX, DX OUT $42, AL MOV AL, AH OUT $42, AL end; Consulte mais informação
Mostrar aviso em forma de hint no Delphi
Inclua na seção uses:Controls
A rotina abaixo mostra a mensagem de aviso em forma de "Hint", aguarda o tempo especificado e finalmente retira a mensagem da tela. Consulte mais informação
Obter data/hora do próprio EXE no Delphi
Inclua na seção uses:SysUtils
Eis uma função que pega a data e hora do próprio EXE. Consulte mais informação
Rolagem automática em ListBox no Delphi
Inclua na seção uses:Windows, Messages
Para rolar o conteúdo de um ListBox automaticamente basta enviar uma mensagem WM_VSCROLL para a janela do componente. No primeiro parâmetro da mensagem devemos passar o tipo de rolagem que deverá ser feita, ou seja: Consulte mais informação
Avaliar de expressão matemática no Delphi
Muitas pessoas procuram um parser (avaliador) de expressões matemática. Em resposta a tanta procura estou colocando abaixo duas possíveis soluções: Consulte mais informação
Copiar qualquer texto para o Clipboard no Delphi
Inclua na seção uses:Clipbrd
O objeto global Clipboard pode ser usado para fazer a transferência de dados entre a Área de Transferência e seu aplicativo. Veja o exemplo: Consulte mais informação
Evitar a biblioteca midas.dll no Delphi
Até a versão 5 do Delphi, se usarmos o componente TClientDataSet teremos, invariavelmente, que distribuir juntamente com nosso aplicativo, a biblioteca midas.dll. Consulte mais informação
Salvar imagem em tabela Paradox no Delphi
O exemplo abaixo demonstra como salvar imagens Bitmap em tabelas Paradox. 1. Crie uma tabela Paradox com um campo do tipo Binary (B). Consulte mais informação
Criando tabelas via SQL no Delphi
- Coloque um TButton no form;
- Escreve no OnClick do Button como abaixo:
procedure TForm1.Button1Click(Sender: TObject);
var
Q: TQuery;
begin
Q := TQuery.Create(Application);
try
Q.DatabaseName := 'SF';
with Q.SQL do begin
Add('Create Table Funcionarios');
Add('( Codigo AutoInc,');
Add(' Nome Char(30),');
Add(' Salario Money,');
Add(' Depto SmallInt,');
Add(' Primary Key (Codigo) )');
end;
Q.ExecSQL;
finally
Q.Free;
end;
end;