blockade durch opendialog

[gwxxl]

a) *g*ar nicht
b)

Delphi-Quellcode:

// liste laden
daten:=TStringList.create;
  daten.LoadFromFile(filename);
  if daten.count > 0 then BEgin
   listbox1.Clear;
   setlength(programme,daten.Count);
   for i:=0 to (daten.count-1) do BEGin
    programme[i]:=teile(daten[i]);
    listbox1.items.add(programme[i].name);
   END;
  ENd;

//übergabe an programme
  programme[m].adresse:=Edit2.Text;

ich lad die datei erst in ne stringlist ein und speicher sie dann iner listbox und dem array