In welchen
SQL-String?
Er braucht nur den Code etwas ändern:
Delphi-Quellcode:
procedure TForm1.edtFilterChange(Sender: TObject);
var
strFilter: String;
begin
//Filtereigenschaft einstellen
qryMusic.FilterOptions := [foCaseInsensitive];
with qryMusic do begin
Close;
Filtered := False;
if edtFilter.Text <> '' then begin
//diese Zeile reicht schon aus
strFilter := '(Interpret = ' + '''' + edtfilter.Text + '*'+ '''' + ')';
Filter := strFilter;
Filtered := True;
end;
Open;
end;
end;