Atenção: por essa edição ser muito antiga não há arquivo PDF para download. Os artigos dessa edição estão disponíveis somente através do formato HTML.
Dicas e Soluções
Soluções rápidas para Delphi e InterBase
Dicas de Delphi
Nomes de campos
Para retornar a lista dos nomes de todos os campos de uma tabela ou query utilize o método GetFieldNames. Neste código, um ListBox recebe o nome de todos os campos de um Table:
procedure TForm1.Button1Click(Sender: TObject);
begin
Table1.GetFieldNames(ListBox1.Items);
end;
Anos completos
A função YearsBetween retorna o número de anos entre duas datas. É útil para retornar a idade de uma pessoa em anos completos:
procedure TForm1.Button1Click(Sender: TObject);
var Idade: Integer;
begin"
