Is there a command or way of getting a line of text from a textarea gadget?
something like readline for files would be good
something like readline for files would be good
' createtextarea.bmx Strict Local window:TGadget Local textarea:TGadget Local TextBox:TGadget window=CreateWindow("My Window",130,20,200,200,,15|WINDOW_ACCEPTFILES) textarea=CreateTextArea(0,0,ClientWidth(window),ClientHeight(window)/2,window) SetGadgetLayout textarea,1,1,1,1 SetGadgetText textarea,"a textarea gadget~none line~nandanother" ActivateGadget textarea Textbox = CreateTextField(0,ClientHeight(window)/2+10,ClientWidth(window),20,window) While WaitEvent() Print CurrentEvent.ToString()+" "+EventSourceHandle() Select EventID() Case EVENT_WINDOWCLOSE End Case EVENT_APPTERMINATE End Case EVENT_GADGETSELECT Select EventSource() Case textarea Local Line:Int = TextAreaCursor(textarea,TEXTAREA_LINES) TextBox.SetText(TextAreaText(textArea,line,1,TEXTAREA_LINES).Trim()) End Select End Select Wend