Datenbankindex in Listbox

[Sharky]

Hai Hans-Peter,

ein Weg wäre wohl nach jedem KeyUp in deinem Editfeld eine neue Abfrage der Tabelle zu machen.

Delphi-Quellcode:

procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 Query1.Close;
 Query1.SQL.Text := 'SELECT * FROM adressen WHERE (name LIKE '
                 + QuotedStr (Edit1.Text + '%')
                 + ') ORDER BY name';
 Query1.Open;
end;

Du kannst allerdings kein DBListBox nehmen. Du musst eine DBLookUpListBox verwenden.

Dort als:
ListSource das DataSet das mit Query1 verbunden ist
ListFieled ist name
KeyField würde ich auf das ID-Feld des Datensatzes stellen.

Das sollte Dir eigentlich helfen. Bei mir geht es so (allerdings habe ich einen SQL-Server).