Publié : mar. 05/févr./2008 13:36
+1 pour le C
Forums PureBasic - Français
https://www.purebasic.fr/french/
Code : Tout sélectionner
;- Debut Programme
;{/ Create Window
wc.WNDCLASSEX
wc\cbSize = SizeOf(WNDCLASSEX)
hInstance = GetModuleHandle_(#Null)
If GetClassInfoEx_(hInstance,@"Horloge",@wc) = 0
wc.WNDCLASSEX
wc\cbSize = SizeOf(WNDCLASSEX)
wc\style = #CS_HREDRAW|#CS_VREDRAW|#CS_BYTEALIGNWINDOW
wc\lpfnWndProc = @HorlogeCallback()
wc\hCursor = LoadCursor_(#Null,#IDC_ARROW)
wc\hInstance = hInstance
wc\lpszClassName = @"Horloge"
If RegisterClassEx_(@wc) = 0
End
EndIf
EndIf
hWndMain = CreateWindowEx_($00080088,"Horloge","Horloge",$96000000,50,50,160,160,0,0,hInstance,0)
InvalidateRect_(hWndMain, #Null, #False)
SetTimer_(hWndMain,0,40,0)
;}/
While GetMessage_(msg.MSG,#Null,0,0)
TranslateMessage_(msg)
DispatchMessage_(msg)
Wend