Page 1 of 1

Have a sendmessage problem

Posted: Wed Mar 26, 2014 4:19 am
by loadstone

Code: Select all

txt$="Hello World!"
For i = 1 To Len(txt$)
   SendMessage_(456321,#WM_CHAR,Mid(txt$,i),0)
Next
Up code sendmessage , the destination window display "??????????" ,how can I use this api send message #WM_CHAR do it good ?
thanks :)

Re: Have a sendmessage problem

Posted: Wed Mar 26, 2014 5:17 am
by netmaestro
do it good:

Code: Select all

OpenWindow(0,0,0,320,240,"", #PB_Window_SystemMenu|#PB_Window_ScreenCentered)
StringGadget(0,100,100,100,20,"")
txt$="Hello World!"
For i = 1 To Len(txt$)
   SendMessage_(GadgetID(0),#WM_CHAR,Asc(Mid(txt$,i)),0)
 Next
Repeat:Until WaitWindowEvent()=#PB_Event_CloseWindow

Re: Have a sendmessage problem

Posted: Wed Mar 26, 2014 5:33 am
by loadstone
[quote="netmaestro"]do it good:
quote]

I'm from inside to outside both thank your help :P