F�rum Problema em ordenar DBGrid no delphi #607721

24/01/2020

sou meio novato no Delphi sei o b�sico...

E estou com problema ao ordenar os cadastros com ASC ou DESC.

No Banco de dados estou utilizando (IBQuery)+(UpdateSQL)+(DataSourse)

Douglas

Curtir t�pico

+ 0

Responder

Posts

25/01/2020

Dirceu Morais

No evento ontitleclick do dbgrid coloque:

Begin 
   sua_tabela.IndexDefs.Update; 
  if sua_tabela.IndexName = Column.FieldName + '_ASC' then 
   begin 
      sIndexName := Column.FieldName + '_DESC'; 
      Options := [ixDescending]; 
   end 
   else 
   begin 
      sIndexName := Column.FieldName + '_ASC';  
      Options := []; 
   end; 
   if sua_tabela.IndexDefs.IndexOf(sIndexName) < 0 then 
      sua_tabela.AddIndex(sIndexName, Column.FieldName, Options); 
   sua_tabela.IndexName := sIndexName;
end;

Tente assim.
N�o testei.

Responder

Gostei + 0

30/01/2020

Douglas

No evento ontitleclick do dbgrid coloque:

Begin 
   sua_tabela.IndexDefs.Update; 
  if sua_tabela.IndexName = Column.FieldName + '_ASC' then 
   begin 
      sIndexName := Column.FieldName + '_DESC'; 
      Options := [ixDescending]; 
   end 
   else 
   begin 
      sIndexName := Column.FieldName + '_ASC';  
      Options := []; 
   end; 
   if sua_tabela.IndexDefs.IndexOf(sIndexName) < 0 then 
      sua_tabela.AddIndex(sIndexName, Column.FieldName, Options); 
   sua_tabela.IndexName := sIndexName;
end;

Tente assim.
N�o testei.

Tentei esse c�digo mas ele n�o identifica o IndexName , sIndexName, IndexDefs, nem Options...

Responder

Gostei + 0

03/02/2020

Anderson Gon�alves

select * from TABELA
order by CAMPO desc

Responder

Gostei + 0