FUNCTION Timer LOCAL loComboBox as ComboBox, lnMouseCOl, ; lnComboTop, lnDistanceFromCombo, lnHighlitedIndex lnHighlightedIndex = -1 loComboBox = This.oComboBox lnComboTop = loComboBox.Top lnMouseCol = MROW(0,3) lnDistanceFromCombo = lnMouseCol - lnComboTop - loComboBox.Height If lnDistanceFromCombo < loComboBox.ListCount * This.nItemHeight lnhighlightedIndex = Int(lnDistanceFromCombo / This.nItemHeight) ENDIF IF lnHighlightedIndex < 0 lnHighlightedIndex = .Null. ENDIF IF .not. ISNULL(lnHighlightedIndex) WAIT "Highlighted Item ist "+STR(lnHighlightedIndex) WINDOW nowait EndIf RETURN lnHighlitedIndex EndFuncYes, it must be also proved, if the X-Position of the mouse ist still in the rectangle, but the biggest disappointment, that makes it all unusable is the fact, that the first item seen in the list is not the first item defined there. The list is always shown beginning with the item that has been last selected. And so the approach from above does not (and cannot!) take in account, that there are probably some more items, that are not visible and stand in the list virtually above the combobox. That's it...