Fórum ordenar pelo dbgrid #179456

va ao envento OnTitleClick e coloque o codigo abaixo

Table1.IndexFieldNames:=Colummn.FieldName;

Colummn » naum me lembro se é este o nome este é um parametro do proprio procedure OnTitleClick vc pode verificar o nome qnd estiver escrevendo o codigo.
ex:
procedure TForm1.DbGrid1TitleClick(Columm:TObject);

qualquer problema me avisa...

até mais...

Aqui eu uso o seguinte para selecionar o campo da tabela para fazer a pesquisa:

No evento DBGrid1TitleClick coloco o seguinte código: (este serve para pegar a coluna de pesquisa e deixar a mesma em negrito)

Var
i, iTemp : Integer;
Begin
i := 0;
iTemp := DBGrid1.Columns.Count;
While i < iTemp Do Begin
DBGrid1.Columns.Items[i].Title.Font.Style := [];
i := i + 1;
End;
Column.Title.Font.Style := [fsBold];
sColuna_Pesquisa := Column.FieldName;
End;

No laço While ele coloca todas os títulos do dbgrid sem negrito.
Depois eu negrito.
Depois pego o nome da coluna. Isto é independente do caption que vc colocou na coluna....