Access Datenbank Durchsuchen (mit Wildcards)

[Freecer]

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
Query1.Close;
  Query1.SQL.Text := 'Select * from KUNDEN where Nachname like ''' +
                         Edit1.Text + '''%';
  Query1.Open;

end;

oder eben mit * macht aber bis dahin keinen unterschied....