Probleme mit Combobox

[Jan]

Hallo DPler,
ich habe das seltsame Phänomen, dass ich eine exception bekomme, wenn ich einen bestimmten Eintrag in einer Combobox auswähle.
Das komische daran ist, dass ich kein onclick oder onchange Ereignis definiert habe, ich also garnicht weiß, wie zu dem Zeitpunkt eine Exception entstehen kann.
Die exception wird aber nur bei einem bestimmten item der Combobox ausgelöst, alle anderen klappen hervorragend.
Was könnte mit dem item passiert sein, dass es beim angewählt werden eine exception raised?
Und kann ich per If-Abfrage verhindern, dass so ein Item erzeugt wird oder angeklickt wird?
Danke für alle Antworten im Vorraus.
Gruß
Jan

[Matze]

Wie meinst du das genau?

Kann es sein, dass du so etwas in einem Timer oder so aufrufst:

Delphi-Quellcode:

if ComboBox1.Text='irgendwas' then ...

[himitsu]

@Matze - glaub, er meint das nicht Programmseitig.

Ein bissl Code könnte nicht schaden, damit man etwas zum prüfen hat.

[Jan]

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

[Jan]

Hallo Matze,
nein, ich habe keinen Timer in dem Programm.
Gruß
Jan

[Matze]

Ich kann auch kein problem finden, bei mir werden alle ComboBoxen aber mit dem 1. String der Stringlist gefüllt, den Sinn verstehe ich nicht. Jede ComboBox hat dann nur 1 Item zur Auswahl. :gruebel:

[Jan]

Erstelle eine 2-dimensionale csv-datei und es wird die ganze 1.Zeile zur Auswahl gestellt.
Vielleicht liegt der Error daran, dass ich absichtlich eine falsch angelegte CSV-Datei mit unterschiedlichen Zeilenlängen nehme?
Gruß
Jan

[Alexander]

@Jan: So genau weiß ich auch nicht was ich dazu sagen soll, aber hast du es schon mal mit ner Try-Anweisung gemacht, dann ist zumindest das FEhler-Handling besser...

[Illuminator-23-5]

nur kurz abseits vom thema:

Delphi-Quellcode:

for i:=0 to chooselist.Count-1 do
  for j := 1 to 12 do
    (FindComponent('Combobox'+IntToStr(j)) as TComboBox).Items.Add(ChooseList.Strings[i]);

das müsste gleich funzen und sieht eleganter aus

Wann genau wird er Fehler ausgelöst? wenn du übers Item drüberfährst oder wenn du es anklickst?

[Matze]

Sorry Jan, dann kann ich dir wohl nicht helfen, denn mit csv-Dateien kenne ich mich nicht aus, ich weiß nicht mal was das ist, wie man es erstellt,... :oops:
:duck: