Registriert seit: 27. Jun 2007
Ort: Köln
655 Beiträge
Delphi 12 Athens
|
Re: Anweisungen werden ignoriert ???
13. Okt 2009, 17:59
Das Problem ist folgendes: Beim OnChange der Combobox greifst du wie folgt auf die Combobox zu:
case TComboBox(sender).ItemIndex of
Hier ist das auch völlig in Ordnung, da normalerweise ja die Combobox der "sender" ist.
Wenn du allerdings nun von dem Button-Event des Sortierens dann diese Funktion aufrufst mit
CBAnordnungChange(Sender);
Dann ist der Sender in der Change-Funktion nicht mehr die Combobox, sondern der Button. Der Typecast, den du mit "TComboBox(sender)" gemacht hast, wird dann ziemlichen Datenmüll liefern, da ein Button keinen ItemIndex hat.
Die einfachste Abhilfe wäre wohl, oben direkt die ComboBox abzufragen, also:
case CBAnordnung.ItemIndex of
Nebenbei bemerkt kannst du dir beim Sortieren dann auch das Füllen der Liste sparen, da du sie danach ja direkt wieder löschst und neu füllst...
Bis denn
Bommel
|