Mensch, eh so einfach. Wo ich überall dies versucht hab....
So, die Suche funktioniert FAST. Ich hab diese jetzt noch um 3 weitere Felder erweitert:
Code:
procedure TForm1.BtnSearchClick(Sender: TObject);
begin
ADOQuery1.Close;
ADOQuery1.SQL.Text:='SELECT * FROM kundendaten WHERE nachname LIKE :name OR telefon1 LIKE :telefon1 OR telefon2 LIKE :telefon2';
ADOQuery1.Parameters.ParamByName('name').Value := '%' + EditSearch.Text + '%';
ADOQuery1.Parameters.ParamByName('telefon1').Value := '%' + EditSearch.Text + '%';
ADOQuery1.Parameters.ParamByName('telefon2').Value := '%' + EditSearch.Text + '%';
ADOQuery1.Open;
if ADOQuery1.Active then
ADOQuery1.Refresh
else
ADOQuery1.Open;
end;
Ein Problem hab ich noch damit.
Es wird, egal was ich suche, immer der 1. Datensatz mitangezeigt.