Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: Силыч
ладно. буду рыть. должно быть решение. правильное.

например так можно определить область, где курсор тот, что надо :)

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 со спсиком нужным


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.