Fórum Ordenar registro da tabela por data #350024

Colega,

SELECT NOME,ENDERECO,DATA FROM TABELA
ORDER BY DATA

Espero ter ajudado.

se for numa tabela...

procedure TSeuForm.DbGrid1TitleClick(Column: TColumn);
var
campo:string;
begin
campo:=column.fieldname;
Sua_tabela.IndexFieldNames:= campo;
end;

se for numa Query

procedure TSeuForm.DbGrid1TitleClick(Column: TColumn);
var
campo:string;
begin
campo:=column.fieldname;

with Qry1 do
begin
if active then close
sql.clear;
sql.add(´select * from tabela_tal order by ´+campo);
Prepare;
Open;
End;