record auslesen --> combobox

[Nisbo]

ja sicher meine ich die datei
wärst du noch so nett mir das hier einzubauen denn so lerne ich am besten wenn man sowas schon fertig sieht
kommentare was was ist sind im code eingefügt

Delphi-Quellcode:

// DropDown generieren 
procedure TForm2.bearbeitenliste(Sender: TObject); 
begin 
   // Info für euch was was ist 
   // aktueller_record: Integer;      // Datensatznummer 
   // RAdresse: TAdresse;             // Rekordvariable 
   // adress_datei: file of TAdresse; // Dateivariable 

{ Was hier zu beginn } 

   Seek(adress_datei, aktueller_record-1); // Datenzeiger setzen (beginnt bei 0, deshalb -1) 
   Read(adress_datei, RAdresse);           // Satz lesen 

   ComboBox1.Items.Text := ComboBox1.Items.Text + RAdresse.UAC_Verbindung; 

{ Was hier zum Ende } 
end;