Auflösung rausfinden

[zigapeda]

Hallo

hab schon in der PB hilfe nachgeschaut aber nix gefunden. Gibt es eine Vordefinierte Variable für Bildschirmbreite und Bildschirmhöhe (Auflösung)?
Gibt es eine Tabelle, wo die Vordefinierten Variablen aufgelistet werden?

[Edit]Vieleicht auch noch die Farbtiefe?[/Edit]

[125]

Code: Alles auswählen

x=GetSystemMetrics_(#SM_CXSCREEN)
x2=GetSystemMetrics_(#SM_CYSCREEN)
MessageRequester("Auflösung",Str(x)+"x"+Str(x2))

[zigapeda]

nur so aus neugier gibts das auch ohne WinAPI? Also um das Progg auf Linux oder MacOS zu portieren?

[125]

hab gerade in der Doku geguckt geht auch ohne API(wusst ich gar net):

Code: Alles auswählen

ExamineDesktops()
MessageRequester("Display Information", "Current resolution = "+Str(DesktopWidth(0))+"x"+Str(DesktopHeight(0))+"x"+Str(DesktopDepth(0)))

[zigapeda]

thx hat funktioniert.

[Edit]Folgendes Problem:

Code: Alles auswählen

InitSprite()
InitKeyboard()
ExamineDesktops()
OpenScreen(DesktopWidth(0),DesktopWidth(0),DesktopDepth(0),"")
Repeat
ExamineKeyboard()
Until KeyboardPushed(#pb_key_escape)

Der Screen müsste doch geöffnet bleiben oder?[/Edit]

[MLK]

ein schönes beispiel, warum "all diese If's" besser sind

Code: Alles auswählen

InitSprite() 
InitKeyboard() 
ExamineDesktops() 
If OpenScreen(DesktopWidth(0),DesktopWidth(0),DesktopDepth(0),"") = 0 : Debug "oh, kein screen" : EndIf
Repeat 
  ExamineKeyboard() 
Until KeyboardPushed(#PB_Key_Escape)

du hast zwei mal "DesktopWidth(0)", auch bei der höhe.

[zigapeda]

oh hab ich garnicht gemerkt. thx