ник: Силыч
ладно. буду рыть. должно быть решение. правильное.
например так можно определить область, где курсор тот, что надо :)
1.
If hCurrentCursor = IDC_TEXT Then
Dim r As POINTAPI, idc&
'-- определить позицию курсора
Call GetCursorPos(r)
StatusBar1.Panels(1).Text = hCurrentCursor & " " & r.x & ":" & r.y
Else
StatusBar1.Panels(1).Text = ""
End If
|
а координаты это йобласти пока не даются :/
2. или можно поступить так:
- при прохождении курсора над нужной колонкой
- имитировать dblclick на ячейке(ессно предварительно отменить прорисовку)
- считать координаты RichEdit
- выйти из RichEdit
- отрисовать [ v ] квадратик комбобокса
- если курсор пошел дальше нужной колонки - invisible квадратика комбоокса [ v ]
- если нажали на [ v ] квадратик комбобокса - отрисовать listbox со спсиком нужным
|