DBComboBox

[jangbu]

Hallo,

mal wieder DBCombobox. Ich will über eine Maske neue Datensätze in die DB eintragen. Die DB enthält z.B. das Feld Kunde. Damit mit der Zeit nicht der gleich Kunde in allen möglichen Schreibweisen erscheint, möchte ich über eine DBComboBox zuerst mal nachschauen lassen ob der Kunde schon existiert, der kann dann auch gleich ausgewählt werden. Wenn nicht muss er natürlich eingegeben werden. Um die Liste mit allen möglichen bisherigen Feldinhalten zu füllen, benutze ich eine Query, die ist ziemlich langsam(?)

Delphi-Quellcode:

Query1.SQL.Add('select distinct KUNDE from Bestellung order by KUNDE');
  Query1.Open;
  Query1.First;
  while not Query1.Eof do
  begin
    DBComboBox1.Items.Add(Query1.FieldbyName('Kunde').AsString);
    Query1.Next;
  end;

Das Auswählen von vorhandenen Einträgen funktioniert, jedoch kann ich (bei nicht existenz) keine Werte eingeben?
Wie kann ich das Füllen der Liste beschleunigen (habe alle DBCOMBOBox-Eigenschaften auf Standard belassen)?
Ist die DBComboBox überhaupt die richtige Komponente?

Danke
jangbu

[edit=Phoenix] Delphi-Tags eingefügt. Das nächste mal bitte selber machen. Mfg, Phoenix[/edit]