Super, das hab ich jetzt kurz vorher auch schon rausgefunden
Aber trotzdem Danke.
Delphi-Quellcode:
Form1.Query1.Active := False;
Form1.Query1.SQL.Text := 'SELECT * FROM problemloesung WHERE titel LIKE ''%' + sfilter + '%'' OR problem LIKE ''%' + sfilter + '%'' OR loesung LIKE ''%' + sfilter + '%''';
Form1.Query1.Active := True;
while not Form1.Query1.Eof do
begin
Form1.lb_titel.Items.Add(Form1.Query1.FieldValues['titel']);
Form1.Query1.Next;
end;
Nochmal zusammenfassend zum Quellcode:
- Volltextsuche der
Query in der
db
- gefundene Einträge in Listbox schreiben