| |
|
|
| |
|
| |
|
|
|
Michael Wodrich | withal aussagefähigem cover might there quiet a little bit Text for Beginner stand. finally go The Snippets Yes sooner not of Profi as plenty More of Beginner used - and the can herewith quite nothing begin.
Sorry Best wishes Michael Wodrich |
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 01/05/08 ▲ |
|
|
|
|
| |
|
| |
|
|
|
Frank Abbing | at least should You The -12 as Constant indicate. |
|
|
| |
|
|
|
Dietmar Horn | @Michael: in the Time, in the You your Posting written have, would have You this sure too one demonstration zusammengetippelt.
here an example: CompileMarkSeparationDEF SetClassLong(3) ! User32,SetClassLongA
Def LoadCursor(2) !USER32,LoadCursorA
declare e%,i%,exit&,test&
WindowTitle Drucker als Mauscursor
cls
setclasslong(%HWnd,-12,LoadCursor(%hinstance,DRUCKER))
test& = Create(Button,%HWnd,Klick mich an!,10,10,110,25)
setclasslong(test&,-12,LoadCursor(%hinstance,DRUCKER))
exit& = Create(Button,%HWnd,Beenden,10,50,110,25)
setclasslong(exit&,-12,LoadCursor(%hinstance,DRUCKER))
i% = 1
whilenot e%
Waitinput
if GetFocus(exit&)
e% = 1
elseif Clicked(test&)
if i%
setclasslong(%HWnd,-12,65553)
setclasslong(exit&,-12,65553)
setclasslong(test&,-12,65553)
SetText %HWnd,Noremaler Mauscursor
clear i%
else
setclasslong(%HWnd,-12,LoadCursor(%hinstance,DRUCKER))
setclasslong(exit&,-12,LoadCursor(%hinstance,DRUCKER))
setclasslong(test&,-12,LoadCursor(%hinstance,DRUCKER))
SetText %HWnd,Drucker als Mauscursor
i% = 1
endif
endif
endwhile
end
Greeting Dietmar |
|
|
| Multimedia für Jugendliche und junge Erwachsene - MMJ Hoyerswerda e.V. [...] Windows 95 bis Windows 7 Profan² 6.6 bis XProfan X2 mit XPSE Das große XProfan-Lehrbuch: [...] | 01/05/08 ▲ |
|
|
|