Thema: Delphi Datenbank durchsuchen

Einzelnen Beitrag anzeigen

Benutzerbild von MrSpock
MrSpock
(Co-Admin)

Registriert seit: 7. Jun 2002
Ort: Owingen
5.865 Beiträge
 
Delphi 2010 Professional
 
#4
  Alt 4. Mai 2003, 19:02
Hallo flattman,

zunächst möchte ich dich hier in unserem Forum herzlich willkommen heißen.

Zu deiner Frage: Filtern kann man nicht nach dem Inhalt eines Memofeldes. Du kannst aber die Tabelle manuell durchlaufen und nach den Inhalt durchsuchen:

Delphi-Quellcode:
procedure TForm1.Button4Click(Sender: TObject);
begin
  Table3.DisableControls;
   Table3.First;
  while not Table3.Eof do
  begin
     if Pos(Edit1.Text, Table3Memo.Value) > 0 then
       ShowMessage('Der Satz '+IntToStr(Table3ID.AsInteger)
                      +' enthält das Wort '+Edit1.Text);
    Table3.Next
  end;
  Table3.EnableControls;
end;
Eine Möglichkeit wäre jetzt, nicht die Ausgabe wie obenzu machen, sondern die IDs der Sätze, die den gesuchten String enthalten, in eine Tabelle zu schreiben. Diese Tabelle, die nur IDs enthält, könntest du dann als Mastertabelle für die andere Tabelle, die die Memos enthält, nutzen.
Albert
Live long and prosper


MrSpock
  Mit Zitat antworten Zitat