|
hola amigo, gracias por tu ayuda.
resolvi mi duda de esta manera, se los dejo por si a alguien le sirve
//cve:Boolean
if cve then
begin
cve := False;
ModDat.CDSArticulos.IndexName := 'cvedesc'; //cvedesc es el nombre de mi indice
end
else
begin
cve := True;
ModDat.CDSArticulos.IndexName := '';
ModDat.SQLDSArticulos.SortFieldNames := 'DESC2';
end;
lo que hago es utilizar la variable cve como bandera para ordenar asc y desc
si cve es true ordeno desc de lo contrario ordeno asc
todo esto es con el evento OnTitleClic del grid
|