GetFirstVisibleLineEditor

Синтаксис

Function GetFirstVisibleLineEditor(ByVal gadget As Long) As Integer

Описание

Получает самую верхнюю видимую строку в редакторе

Параметры

gadget - номер гаджета

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As integer event
Dim As String buf
Var hwnd=OpenWindow("1",300,10,500,400)
EditorGadget(1,10,10,300,300, "")
For a As Integer=0 To 500
  buf+="String ?" & a & Chr(10)
Next
SetGadgetText(1,buf)
UpdateInfoXserver(20000)
LineScrollEditor(1,55)
UpdateInfoXserver(20000)
? GetFirstVisibleLineEditor(1)
Do
  event=WaitEvent()
  If event=EventClose Then End
Loop

Результат

55

Created with the Personal Edition of HelpNDoc: Free Web Help generator