Hallo, ich versuche zur Zeit meine Datenbank zu sortieren, jedoch gelingt mir das nicht. Es tut sich nichts im DBGrid :/
Hier mein Ansatz:
Delphi-Quellcode:
procedure TMain.DBGrid1TitleClick(Column: TColumn);
var
SortColumn: String;
begin
SortColumn:=DBGrid1.Columns.Items[Column.Index].FieldName;
Main.IBQuery1.Close;
Main.IBQuery1.SQL.Clear;
Main.IBQuery1.SQL.Text:='SELECT * FROM TABLE ORDER BY ' + SortColumn;
Main.IBQuery1.Open;
Main.IBTable1.Transaction.Commit;
Main.IBTable1.Active:=True;
end;