LineLengthEditor

Синтаксис

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

Описание

Возвpащает длину стpоки в байтах, находящейся в оpгане упpавления pедактиpованием,котоpая содеpжит индекс указанного символа. Если индекс будет равен -1, то возвращаемое значение будет кол-во символов, не выбранных в данный момент в строке.

Параметры

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

index - индекс символа

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As integer event
Var hwnd=OpenWindow("1",300,10,500,500)
EditorGadget(1,10,10,300,300, "")
Do
  event=WaitEvent()
  If event=EventClose Then End
  If event=EventGadget Then
     ? LineLengthEditor(1)
  EndIf
Loop

Результат

Created with the Personal Edition of HelpNDoc: Full featured Documentation generator