GetSelectTextEditorGadget

Синтаксис

Function GetSelectTextEditorGadget(ByVal gadget As Long) As String

Описание

Получает выделенный пользователем текст из EditorGadget.

Параметры

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

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As integer event
OpenWindow("1",300,10,250,250)
EditorGadget(1,10,10,200,200, "FreeBasic")
Do
  event=WaitEvent()
  If event=EventClose Then End
  If event=EventGadget Then
     If EventNumber=1 Then
        ? GetSelectTextEditorGadget(1)
     EndIf
  EndIf
Loop

Результат

Created with the Personal Edition of HelpNDoc: Create iPhone web-based documentation