paradox db über ttable durchsuchen

[derprof]

Delphi-Quellcode:

procedure TForm1.Button4Click(Sender: TObject);

  begin

 suche:= edit1.Text;
Table1.Locate('CD-Titel', suche, [loCaseInsensitive]);
Showmessage('Folgende CD wurde gefunden');
end;