Einlesen von SQL-Daten in Combobox

[marabu]

Mein Code-Beispiel weiter oben mit dem with-block hat dich vielleicht etwas verwirrt.

Delphi-Quellcode:

procedure TfrmTestauswahl.FormCreate(Sender: TObject);
begin
  ComboBox.Items.Clear;
  // Anfrage formulieren - nur ein Beispiel
  myQuery.SQL.Text := 'SELECT Testnummer FROM Test WHERE Testabschnitt = 3 ORDER BY Testnummer';
  // Anfrage an Server schicken und Ergebnis in Tabellen-Form zurück erhalten
  myQuery.Open; 
  // Tabelle Satz für Satz durch gehen
  while not myQuery.Eof do begin
    Combobox.Items.Add(myQuery.Fields[0].AsString);
    // zum nächsten Satz weiter schalten
    myQuery.Next;
  end;
  // Fertig - Ergebnis verwerfen
  myQuery.Close;
end;

marabu