Hallo Freecer
Ich verwende ebenfalls
Access mit
ADO. Mit folgendem Code müsste es gelingen:
Delphi-Quellcode:
with DeineQuery do // TADODataSet
begin
Close;
CommandText := 'SELECT DeineTabelle.Feld1, DeineTabelle.Feld2 FROM DeineTabelle WHERE ';
CommandText := CommandText + 'DeineTabelle.Feld1 LIKE "%' + Edit1.Text + '%" '; // % vor Edit1 legt Suchart fest (*Ausdruck* oder Ausdruck*)
CommandText := CommandText + 'AND DeineTabelle.Feld2 LIKE "%' + Edit2.Text + '%" ';
Open;
end;
Damit nicht nach jeder Taste die Abfrage neu berechnet wird, kannst Du einen Timer einsetzen. Im OnChange wird nur der Timer neu gestartet, beziehungsweise eingeschaltet. Im OnTimer wird die Abfrage neu geschrieben und anschliessend der Timer ausgeschaltet. Den Timer auch bei Exit vom Editfeld ausführen.
So kannst Du dir eventuell den Button sparen(Sorry Sharky). Der Button ist geschmacksache, oder ?
MFG
Armin