Ich weis mit "ADODataset.CommandText := 'SELECT FeldName where FeldName like :FeldName';" nicht viel anzufangen
Zitat von
Bernhard Geyer:
Schmeiß ADOTable weg, nimm ADODataset und setzte als Commandstring sowas in der ARt ein
Delphi-Quellcode:
ADODataset.CommandText := 'SELECT FeldName where FeldName like :FeldName';
ADODataset.ParamByName('FeldName') := EditFeld.Text + '%';
ADODataset.Open;
Der Ausdruck "FeldName" ist recht oft. Die Datenbank heißt "adressen.mdb", die Tabelle heißt "tabelle1" und das Feld heißt "nachnamen".
Habe die Begriffe "FeldName" gegen meine ausgetauscht, aber es passiert nichts.
Im Moment bin ich auf diesem Stand:
Delphi-Quellcode:
procedure TForm1.Edit2Change(Sender: TObject);
begin
ADOTable1.Filtered:= false;
AdoTable1.Filter:='nachnamen='+ QuotedStr(Edit2.Text);// Hier würde ich eine Veränderung vermuten - aber was? (QuotedStr vielleicht)?
AdoTable1.Filtered:=True;
ADOConnection1.Connected:=true;
if Edit2.Text= '' then ADOTable1.Filtered:= false;// Das zeigt wieder alle Nachnamen
end;
Das zeigt mir den zugehörigen Datensatz aber erst an, wenn der Nachname
komplett in Edit2 eingegeben wurde.
Was muss da geändert werden um es wie Oben beschrieben hinzukriegen?