Сообщение EM_LINEINDEX

Const EM_LINEINDEX = &HBB

Сообщение EM_LINEINDEX определяет индекс первого символа в указанной строке в текстовом поле. Отчет начинаемого от 0 индекса идет от начала поля редактирования до указанной строки

Возвращаемое значение

Сообщение возвращает индекс первого символа в строке, указанной в параметре wParam. Если указано значение, превышающее число строк в поле редактирования, то возвращается –1

Параметры

wParam
Определяет отсчитываемую от нуля номер строки. Значение –1 указывает на текущую строку(строку, содержащую каретку)
lParam
Не используется

Пример

' Определяем позицию каретки в текущей строке
' Вы должны создать текстовое поле Text1
Dim char_pos As Long ' позиция символа каретки в тексте
Dim col As Long  ' позиция каретки в текущей строке
char_pos = SendMessage(Text1.hwnd, EM_GETSEL, 0, 0)
char_pos = char_pos \ &H10000

' Определяем позицию каретки в текущей строке
col =char_pos - SendMessage(Text1.hwnd, EM_LINEINDEX, -1, 0) +1
Print col

Смотри также

EM_LINEFROMCHAR

Категория

Поля редактирования