Bildschirmauflösung

[KeyKon]

Wie Kriegt man raus auf welche Bildschirmauflösung der PC eingestellt ist?

KeyKon

[FlixFlax]

Hi Keykon

In die Archiv kannst du dieses finden:

screen_x = GetSystemMetrics_(#SM_CXSCREEN)
screen_y = GetSystemMetrics_(#SM_CYSCREEN)
MessageRequester("", Str(screen_x)+" x "+Str(screen_y))

[Falko]

In der PB-Hilfe unter Desktop sind passende Beispiele.

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

MfG Falko

[KeyKon]

Danke