es gibt ja keinen code, das ist es ja. Die Comboboxen werden normal befüllt und es gibt auch keinen error oder sowas, aber wenn ich dann einen bestimmten Eintrag der Combobox auswähle bekomme ich eine
exception, ohne dass ich in meinem Code auf dieses Event reagiert hätte.
Aber wenn ich dazu unbedingt code posten muss, dann ist hier die befüllungsroutine:
Delphi-Quellcode:
if form1.opendialog1.execute then
begin
edit1.text:=form1.OpenDialog1.FileName;
try
impstr:=tstringlist.Create;
impstr.LoadFromFile(edit1.text);
except
showmessage('Die zu ladende Datei ist korrupt.');
end;
chooselist:=tstringlist.create;
chooselist.commatext:=impstr[0];
impstr.Free;
for i:=0 to chooselist.Count-1 do
begin
combobox1.items.add(chooselist.Strings[i]);
combobox2.items.add(chooselist.Strings[i]);
combobox3.items.add(chooselist.Strings[i]);
combobox4.items.add(chooselist.Strings[i]);
combobox5.items.add(chooselist.Strings[i]);
combobox6.items.add(chooselist.Strings[i]);
combobox7.items.add(chooselist.Strings[i]);
combobox8.items.add(chooselist.Strings[i]);
combobox9.items.add(chooselist.Strings[i]);
combobox10.items.add(chooselist.Strings[i]);
combobox11.items.add(chooselist.Strings[i]);
combobox12.items.add(chooselist.Strings[i]);
end;
chooselist.free;
end;
Gruß
Jan