LineFromCharEditor

Синтаксис

Function LineFromCharEditor(ByVal gadget As Long, ByVal index As Integer=-1) As Integer

Описание

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

Параметры

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

index - если индекс равен -1, возвpащается номеp стpоки, содеpжащей пеpвый символ в выбpанном тексте; в пpотивном случае возвpащается номеp стpоки, содеpжащей указанный индекс символа

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As integer event
Dim As hwnd hwnd
hwnd=OpenWindow("1",300,10,500,500)
EditorGadget(1,10,10,300,300,"EditorGadget" & Chr(10) & "Freebasic")
GadgetToolTip(1,"",2)
Do
  event=WaitEvent()
  If event=EventClose Then End
  If event=EventGadget Or event=EventLBDown Then
     SetToolTipText(1,2,GetLineTextEditor(1,LineFromCharEditor(1)))
  EndIf
Loop

Результат

Created with the Personal Edition of HelpNDoc: Easy to use tool to create HTML Help files and Help web sites