procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
if ClientDataSet1.IndexFieldNames '' then
DBGrid1.Columns[ClientDataSet1.FieldByName(
ClientDataSet1.IndexFieldNames).Index].Title.Color :=
DBGrid1.fixedColor;
if not (Column.Field.DataType in [ftBlob,ftMemo]) then
begin
Se você estiver usando ClientDataSet, você pode, no evento OnTitleClick, pegar
o nome do campo no parâmetro Column que é passado e colocar na propriedades
IndexFieldNames do CDS.
Levi Ribeiro de Freitas [EMAIL PROTECTED] escreveu: Pessoal,
Como faço para ordernar um dbgrid ao clicar na
Se estiver usando o ADOQuery, basta usar a propriedade Sort, que dispensa um
nova consulta, pois ele ordena a consulta atual.
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
:= strColumn;
Column.Title.Font.Style := [fsbold];
except
CDS.IndexName := idxDefault;
end;
end;
- Original Message -
From: Valfrid-Ly Silva Couto [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, December 13, 2005 1:33 PM
Subject: Re: [delphi-br] Ordenar DbGrid ao clicar
Use ClientDataSet. Com ele, vc pode ordenar os dados nele por qual(is)quer
campo(s).
[]s
From: F D [EMAIL PROTECTED]
Reply-To: delphi-br@yahoogrupos.com.br
To: Delphi Grupo delphi-br@yahoogrupos.com.br, Grupo Delphi
[EMAIL PROTECTED]
Subject: [delphi-br] ORDENAR DBGRID
Date: Wed, 29 Jun 2005
se vc estiver usando o recurso de indices dinamicos do clientdataset naum
vai conseguir
a naum ser q vc crie um dataset imagem dinamicamente para liga-lo ao grid, e
seus campos sejam todos do tipo fkdata, mas este dataset so servira para
amostragem.
[]´s
Bruno Lichot
Gerente de Novas
pessoal, quando já estou com os dados em um dbgrid, como posso
reordená-los?
Acredito que o próprio DBGrid seja incapaz de fazer isto, MAS...
Se o DataSet conectado ao DBGrid é um TClientDataSet ou descendente,
então você poderá ordenar os dados na memória, sem executar outro
SELECT, como
Use isso no evento OnTitleClick do DBGrid
DataModule1.ClientDataSet1.IndexFieldNames := Column.FieldName;
Sds,
Neto
- Original Message -
From: Daniel / Tecnobyte [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, September 28, 2004 11:13 AM
Subject: Re: [delphi-br] ordenar dbgrid
8 matches
Mail list logo