Zitat
OH zu TCustomListBox:
Zitat:
Die Methode ItemAtPos gibt den Index des Eintrags zurück, der durch die Koordinaten eines Punktes auf dem Steuerelement bezeichnet wird.
function ItemAtPos(Pos: TPoint; Existing: Boolean): Integer;
Beschreibung
Mit ItemAtPos können Sie feststellen, ob an einer bestimmten Stelle des Steuerelements ein Eintrag vorhanden ist.
Der Parameter Pos gibt in Koordinaten relativ zum Fenster den Punkt innerhalb des Steuerelements an. Wenn Pos unterhalb des letzten Eintrags liegt, bestimmt der Parameter Existing den Rückgabewert. Wenn Existing True ist, gibt ItemAtPos -1 zurück, was bedeutet, daß an diesem Punkt kein Eintrag vorhanden ist. Ist Existing False, gibt ItemAtPos den um 1 erhöhten Index des letzten Eintrags zurück.
Meintest Du sowas?
Gruß