[XE5]: ChecklistBox mit Mehrfachauswahl sicher abfragen

[Kralle]

Moin,

mittels

Delphi-Quellcode:

procedure TFrameTechDaten.chklst_TechDatenClick(Sender: TObject);
begin
 if chklst_TechDaten.Selected[10] = True then
   lbledt_Wirkungsgrad.Enabled:=True
 else
   lbledt_Wirkungsgrad.Enabled:=False;

end;

lässt sich leider nicht sicher abfragen ob der Eintrag wirklich checked ist oder nicht.
Der Grund steht in der OH:

Zitat:

Ein Eintrag gilt als ausgewählt, wenn der Benutzer ihn markiert. Wenn Sie die Eigenschaft MultiSelect auf true setzen, können mehrere Einträge des Listenfeldes ausgewählt werden. In diesem Fall wird der von Selected angegebene Eintrag aktiviert, wenn das Listenfeld den Fokus erhält.

Folge: Auch wenn der Eintrag checked ist, bleibt das Edit nicht anwählbar, bis der Focus wieder auf dem checked Item liegt.

Wie frage ich also sicher den Status eines Items ab?

Gruß Heiko