Hi.
Nagut... Ich bin mal so nett...
Ich hab den Code auch mal n bischen optimiert
Delphi-Quellcode:
// DropDown generieren
procedure TForm2.bearbeitenliste(Sender: TObject);
begin
Seek(adress_datei, 0); // An den Anfang der Datei springen
while not eof(adress_datei) do
begin
Read(adress_datei, RAdresse); // Datensatz lesen
ComboBox1.Items.Add(RAdresse.UAC_Verbindung);
end;
end;