Substitu au SetRefreshRate()
Publié : ven. 27/févr./2004 22:03
vous avez surement remarqué que la commande SetRefreshRate() plante sur certaine config Pc
il faut installer cette lib
http://www.purearea.net/pb/download/use ... riteEx.zip
Et ca marche 
il faut installer cette lib
http://www.purearea.net/pb/download/use ... riteEx.zip
Code : Tout sélectionner
; -- Substitu au SetRefreshRate()----
; -- Marcus.Zone --- Cederavic 27.02.2004
InitSprite()
OpenWindow(1,0,0,0,0,#PB_Window_ScreenCentered,"")
MonitorFreq=GetMonitorFreq()
CloseWindow(1)
ss.DEVMODE
ss\dmSize = SizeOf(DEVMODE)
ss\dmDisplayFrequency = 60 ; la frequence choisie
ss\DmFields = $400000
ChangeDisplaySettings_(ss, #CDS_UPDATEREGISTRY)
; --------------------Code du jeu sans SetRefreshRate() -----------------------------
; -------------------ne pas reutiliser InitSprite() déja lancé ----------------------
; -Pour restorer la sync par default il faut ajouter cela avant tout les end du code-
ss.DEVMODE
ss\dmSize = SizeOf(DEVMODE)
ss\dmDisplayFrequency = MonitorFreq
ss\DmFields = $400000
ChangeDisplaySettings_(ss, #CDS_UPDATEREGISTRY)
End
