Ich musste den Quelltext nun so umschreiben damit das Programm ausgeführt werden kann.
Delphi-Quellcode:
q:= Combobox1.Text;
with ZReadOnlyQuery1
do
begin
close;
SQL.Clear;
SQL.Add('
SELECT * FROM Tabelle WHERE');
SQL.Add('
id LIKE %:id% OR ');
SQL.Add('
name LIKE %:name% OR ');
SQL.Add('
vorname LIKE %:vorname% OR ');
SQL.Add('
strasse LIKE %:strasse% OR ');
SQL.Add('
plz LIKE %:plz% OR ');
SQL.Add('
stadt LIKE %:stadt% OR ');
SQL.Add('
email LIKE %:email% OR ');
SQL.Add('
notiz LIKE %:notiz%');
ParamByName ('
id').AsString := q;
ParamByName ('
name').AsString := q;
ParamByName ('
vorname').AsString := q;
ParamByName ('
strasse').AsString := q;
ParamByName ('
plz').AsString := q;
ParamByName ('
stadt').AsString := q;
ParamByName ('
email').AsString := q;
ParamByName ('
notiz').AsString := q;
open;
end;
Nun wird aber immer ein Fehler angezeigt, dass der Paramter "Name" nicht gefunden wurde.