Ordenar Dados De Um Dbgrid Clicando No Title

[Guest DanielStratovarius]

Galera, beleza?

Gostaria que me ajudassem aqui, acredito que não seja algo muito complicado.

Quero ordenar os dados do DBGrid ao clicar no título, entendem?

Muito obrigado

[Micheus]

Gostaria que me ajudassem aqui, acredito que não seja algo muito complicado.

Quero ordenar os dados do DBGrid ao clicar no título, entendem?

Daniel, veja este post. É exatamente sobre este assunto. Qualquer dúvida, dê um retorno.

Abraços

[Guest HDELPHI]

RESPOSTA: Para ordenar dados de um DBgrid clicando no Tile use o seguinte procedimento:

Var Campo : string

Begin

campo:=column.fieldname;

if campo = 'NOME DO CAMPO' then

begin

Cadastro_IB.Active := false;

CDS_Cadastro.active := false;

Cadastro_IB.sql.clear;

Cadastro_IB.SQL.Append('SELECT * FROM "Cadastro.DB" Cadastro where CODCLI = :COD order by '+ campo + ' ,Tipo');

Cadastro_IB.Params[0].DataType := ftInteger;

Cadastro_IB.Params[0].ParamType := ptInput;

Cadastro_IB.Params[0].AsInteger := CDS_CadcliCOD.AsInteger;

if not Cadastro_IB.Prepared then

Cadastro_IB.Prepare;

Cadastro_IB.active := true;

CDS_Cadastro.active := true;

end;

[Micheus]

O colega HDELPHI não gostaria de registrar-se como um membro de nosso grupo?