Sample code:
Code: Select all
If OpenWindow(0, 0, 0, 150, 100, "", #PB_Window_SystemMenu ) 
  CreateGadgetList(WindowID(0)) 
  varTextGadgetID = EditorGadget(#PB_Any, 3, 3, 140, 90, #PB_Editor_ReadOnly)
  AddGadgetItem(varTextGadgetID, -1, "Test-CR" + #CR$ + "Test-LF" + #LF$ + "Test-CRLF" + #CRLF$ + "Test-CRCRLF" + #CR$ + #CRLF$ + "." + "No newline?")
    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIfCode: Select all
Test-CR
Test-LF
Test-CRLF
Test-CRCRLF .No newline?(I'm using PB4.00)
Thanks,
Geert
