Hallo!
Ich verwende folgenden Code aus eurer Library:
DB Grid sortieren
Da ich als Datenbank Interbase benutze habe ich versucht, diesen Code anzupassen. Dabei ist folgendes Herausgekommen:
Delphi-Quellcode:
procedure TSeriennummerdatenbank.DBGrid1TitleClick(Column: TColumn);
var sql :
string;
begin
sSortColumn := DBGrid1.Columns.Items[Column.
Index].FieldName;
IBQuery1.Close;
if bSortOrder
then
begin
sql := '
SELECT * FROM Seriennummern ORDER BY "'+ sSortColumn +'
"';
IBQuery1.sql.add(
sql);
end
else
begin
sql := '
SELECT * FROM Seriennummern ORDER BY "'+ sSortColumn + '
" DESC';
IBQuery1.SQL.Add(
sql);
end;
IBQuery1.Open;
end;
Bei einem einmaligen Klick auf den Spaltentitel eines DBGrids passiert nichts, wenn ich ein zweites mal draufklicke, bekomme ich folgende Fehlermeldung angezeigt:
Zitat:
Im Projekt Project1.exe ist eine
Exception der Klasse EIBInterBaseError aufgetreten. Meldung: 'Dynamic
SQL Error
SQL error code = -104 Token unknow - line 2, char 1 SELECT'
Könnt ihr mir da helfen?
Mit freundlichen Grüßen,
Overburn
[edit=Admin]URL-Tags korrigiert. Mfg, Daniel[/edit]