sort w DBGrid wg kolumny

0

Znalazłem na forum poniższą procedurę do sortowania w DBGrid po naciśnięciu na nagłówek kolumny.
Używam tabeli Paradox, z której dane są pobierane do DBGrid.

Przy próbie kompilacji wyskakuje błąd: [Error] main.pas(265): Undeclared identifier: 'Sort'!!!
W jaki sposób powinienem zadeklarować SORT???
Czy poniższa procedura będzie sortowała DBGrida opartego na Paradox'ie ????

var
// globalne
poczym :string;
Normal :boolean;

procedure TAudioB.DBGridTitleClick(Column: TColumn);
var
t : String;
begin
if poczym = Column.FieldName then
Normal := not Normal
else
begin
poczym := Column.FieldName;
Normal := True;
end;
If Normal then
t := 'ASC'
else
t := 'DESC';
DBTable.Sort :=Poczym+ ' '+ t+ ', Autor, Nazwa_Albumu, Nazwa_Utworu'; // to co masz po t+ w '' mozesz wywalic bo to sa kolejne pola po ktorych sortuje
end;

0

Mi to wygląda na procedurę. Przy czym w ttable nie ma wbudowanej procedury sort. radze sie zorientować, czy to standardowy komponent ttable i jeśli tak, czy nie ma powyżej procedury sort. Ja osobiscie nie używam ttable, jesli chcę przedstawić posortowane dane.

1 użytkowników online, w tym zalogowanych: 0, gości: 1