Function GetLineTextEditor(ByVal gadget As Long, ByVal Number As integer, ByVal Buffer As Integer=512) As String
Возвращает текст указанной строки
gadget - номер гаджета
Number - номер строки
Buffer - размер буфера возвращаемой строки, по умолчанию 512 символов
Windows , Linux
#Include "window9.bi"
Dim As integer event
OpenWindow("1",300,10,500,500)
EditorGadget(1,10,10,300,300,"EditorGadget" & Chr(10) & "Freebasic")
? GetLineTextEditor(1,1)
Do
event=WaitEvent()
If event=EventClose Then End
Loop
Freebasic
Created with the Personal Edition of HelpNDoc: Write EPub books for the iPad