Hai robertthrohill,
willkommen im Delphi-Praxis Forum.
Zitat von
robertthronhill:
Code:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
Table1.Close;
Table1.Filtered := False;
Table1.Filter := 'Stichwoerter' + QuotedStr(LabeledEdit1.Text);
Table1.Filtered := True;
Table1.Open;
end;
Was ich bei deinem Filter vermisse ist die Filter bedingung.
z.B.
= < > <>
Table1.Filter := 'Stichwoerter = ' + QuotedStr(LabeledEdit1.Text);
Stephan B.
"Lasst den Gänsen ihre Füßchen"