ja ich gehe von ASCII aus
geht es denn bei dir wenn du dies eingibst?
Code: Alles auswählen
;::::Funny Strings!::::;
OpenWindow(0,0,0,200,40,"Funny Strings!",#PB_Window_MinimizeGadget)
Repeat
Delay(10)
Ereignis = WindowEvent()
If ereignis = #PB_Event_CloseWindow :esc = 1:EndIf
If GetAsyncKeyState_(#VK_Y)
;keybd_event_(#VK_BACK,0,0,0):keybd_event_(#VK_BACK,0,#KEYEVENTF_KEYUP,0)
keybd_event_(#VK_LMENU,0,0,0)
Delay(10)
keybd_event_(#VK_NUMPAD1,0,0,0);:::::::::::::::::::::::::dies habe ich geändert
keybd_event_(#VK_NUMPAD1,0,#KEYEVENTF_KEYUP,0)
keybd_event_(#VK_NUMPAD9,0,0,0)
keybd_event_(#VK_NUMPAD9,0,#KEYEVENTF_KEYUP,0)
keybd_event_(#VK_NUMPAD0,0,0,0)
keybd_event_(#VK_NUMPAD0,0,#KEYEVENTF_KEYUP,0)
Delay(10)
keybd_event_(#VK_LMENU,0,#KEYEVENTF_KEYUP,0)
EndIf
Until esc = 1