So, ich habe jetzt mal in bißchen mit IBExpert getestet, und kann da in meiner Tabelle alle Filter sauber setzten. Dann habe ich aus IBExpert die Where Bedinung kopiert und in Delphi eingefügt. Jetzt auch mein kompilieren Fehlerfrei und die
SQL Abfrage wird durchgeführt.
Leider ohne Ergebnismenge. Hier mal der aktuelle Code...
Delphi-Quellcode:
with QryMB256PLUS do begin
QryMB256PLUS.SQL.Clear;
QryMB256PLUS.SQL.Text := 'SELECT FIRST 5 * FROM MB256PLUS WHERE ("Ereignis") STARTING WITH :Ereignis';
QryMB256PLUS.ParamByName('Ereignis').asString:= 'Sabotage';
while Not eof do
begin
CBAlarme.Items.Add(FieldByName('Ereignis').AsString);
QryMB256PLUS.Next;
end;
QryMB256PLUS.Active := false;
QryMB256PLUS.Close;
end;
Gruß Jens