Ich habe eine kleine
Paradox db, in dieser möchte ich eine Volltextsuche realisieren.
Jedoch funktioniert anscheinend die Suche in der
db nicht, welche den Feldtyp 'memo' besitzen.
Hier ein kleiner bescheidener Auszug aus mein Quellcode:
Delphi-Quellcode:
procedure titel_einlesen(sfilter :string); // sfilter = zu suchender Text
begin
Form1.lb_titel.Clear;
Form1.Table1.First;
repeat
if (pos(sfilter,Form1.Table1.FieldValues['Titel']) <> 0) or
(pos(sfilter,Form1.Table1.FieldValues['Problem']) <> 0) or
(pos(sfilter,Form1.Table1.FieldValues['Loesung']) <> 0) then
Form1.lb_titel.Items.Add(Form1.Table1.FieldValues['Titel']);
Form1.Table1.Next;
until Form1.Table1.Eof;
end;
Es soll jedes Feld eines Datensatz der
db durchsucht werden.
Wenn in einem Feld des Datensatz der gesuchte Text vorhanden ist, dann soll der 'Titel' dieses Datensatzes in eine Listbox geschrieben werden.
MfG Jacuzzi.