Code: Select all
OpenWindow(0,0,0,300,220,"",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
StringGadget(2,20,140,260,26,"Enter your nameEnter your nameEnter your nameEnter your nameEnter your nameEnter your nameEND")
p.POINT
p\x=10
p\y=0
SendMessage_(GadgetID(2),#EM_SETSCROLLPOS,0,@p)
SetActiveGadget(2)
Repeat
Event=WaitWindowEvent()
Until Event=#PB_Event_CloseWindow