Delphi Tips & Tricks softsale > Delphi Tips & Tricks      

< poprzednia rada następna rada >

Jak sortować tablicę wg kolumn?

Często użytkownik chce mieć możliwość posortowania tablicy według wybranej kolumny. Do tego celu można wykorzystać zdarzenie OnTitleClick na gridzie wykorzystując nazwę pola po którym sortujemy w klauzuli ORDER BY.



procedure TForm1.DBGrid1TitleClick(Column: TColumn);
var s:string;
begin
s:=column.fieldname;
with query1 do
begin
sql.clear;
close;
sql.add('select * from customer.db order by ');
sql.add(s);
open;
end;
end;

Ilustruje to przykład tip32.zip


SOFTSALE - Oprogramowanie i Szkolenia
softsale@softsale.com.pl

03-565 Warszawa , ul. Borzymowska 43 lok. 301C
tel/fax:4084840,0607612428