Сообщение EM_GETFIRSTVISIBLELINE

Const EM_GETFIRSTVISIBLELINE = &HCE

Пошлите сообщение EM_GETFIRSTVISIBLELINE многострочному текстовому полю для нахождения первой видимой строки

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

Если текстовое поле является многострочным, то возвращается индекс первой видимой строки(индексация начинается с 0). Для однострочного текстового поля возвращается индех первого видимого символа

Параметры

wParam
Не используется - установите равным 0
lParam
Не используется - установите равным 0

Пример

' Получим индех первой видимой строки
' Создайте на форме Text1(MultiLine=True) и кнопку Command1
Private Sub Command1_Click()
Dim lineindex As Long   ' индех первой видимой строки

' Получим индех первой видимой строки
lineindex = SendMessage(Text1.hWnd, EM_GETFIRSTVISIBLELINE, ByVal 0, ByVal CLng(0))
Print lineindex
End Sub

Категория

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