Bildschirmauflösung
Verfasst: 29.10.2004 23:01
Wie Kriegt man raus auf welche Bildschirmauflösung der PC eingestellt ist?
KeyKon
KeyKon
Code: Alles auswählen
;By Falko created with PB3.92
#Desktop=0
If ExamineDesktops()
Deskbreite.s = Str(DesktopWidth(#Desktop))
DeskHoehe.s = Str(DesktopHeight(#Desktop))
Frequenz.s = Str(DesktopFrequency(#Desktop))
;Ausgabestring für Messagerequester
string$="Desktopbreite: "+Deskbreite+" Pixel"+Chr(10)+Chr(13)
string$=string$+"DesktopHöhe: "+DeskHoehe+" Pixel"+Chr(10)+Chr(13)
string$=string$+"Frequenz: "+Frequenz+" Hz"+Chr(10)+Chr(13)
string$=string$+"Farbtife: "+Str(DesktopDepth(#Desktop))+" Bits/Pixel"
;Ausgabe
MessageRequester("Desktopinfo"+DesktopName(#Desktop),string$,#MB_ICONINFORMATION )
Else
MessageRequester("Fehler", "Es ist was nicht in Ordnung")
EndIf