Estimado
jeremiselxi:
Yo uso este código para ordenar los registros de una ADOTable1:
Código Delphi
[-]if (ADOTable1.Sort= 'No asc') then
ADOTable1.Sort:= 'No desc'
else
begin
ADOTable1.Sort:= 'No asc';
end;
end;
Este código lo puedes poner en el evento OnTitleClick del DBGrid conectado a tu ADOTable1.
Espero que te sirva
Salu2