| |
|
|
![Nico Madysa: 02/26/07](.././../../i/a/13527651904b3fcf583c5c0.png) Nico Madysa | Since I Problems with Waitinput fundamentally anziehe, How nice Mädels whom Dieter Bohlen, watts I to some Time forced, on HotKeys umzusteigen, circa a designed Tastendruck To Register. so have I So one CompileMarkSeparation added, so n-Drücker zielsicher registered go. During the Programmierens fell me then one further trouble on. In one Editfeld on one Dialog-Window could I suddenly n not any more nutzen; Umschalt+n went, n alone not any more. CompileMarkSeparation
proc dulcoif
SetTimer 1
waitinput
KillTimer
endproc
proc editfeld
declare dlg& , edit& , ok&
dlg& = Create(Dialog,%hWnd,Editfeld-Dialog,0,0,600,120)
edit& = Create(Edit,dlg&,ENTE könnt ihr eingeben, bei Ente kommt aber Ete raus,10,10,500,20)
ok& = Create(Button,dlg&,Zurück,10,50,100,25)
whilenot Clicked(ok&) or (%Key = 2)
waitinput
wend
DestroyWindow(dlg&)
dulcoif
endproc
declare zumdlg&
cls
AddHotKey 100 , 78 , 0 N als HotKey
zumdlg& = Create(Button,%hWnd,Dialog öffnen, auch mit N,50,50,500,25)
whilenot IsKey(27)
waitinput
if Clicked(zumdlg&) or MenuItem(100)
editfeld
endif
wend
end
under usage of Memory-Bitmaps, Messages, Variablenparametern over reaches and of/ one API have I the Show of n of course heilwegs persuasive hinbekommen, but it was still quite knifflig. therefore wish I me, similar, How RemoveMenu, one RemoveHotKey. |
|
|
| |
|
|