Einzelnen Beitrag anzeigen

Vader

Registriert seit: 6. Mai 2003
804 Beiträge
 
Delphi 6 Enterprise
 
#23

Re: Suchfunktion in Paradoxtabelle ?

  Alt 23. Mär 2006, 08:50
wieder das gleiche , es sind die daten weg !!!!!

Delphi-Quellcode:
procedure TForm1.Edit1Change(Sender: TObject);
begin
Table1.Filter := 'Nachname = '+QuotedStr( '%'+(Sender as TEdit).Text+'%')+' or Vorname='+QuotedStr( '%'+(Sender as TEdit).Text+'%')+' or Strasse = '+QuotedStr( '%'+(Sender as TEdit).Text+'%');
Table1.Filtered := True;
end;
mfg vader
  Mit Zitat antworten Zitat