Bildschirm Auflösung abfragen (Gelöst)

[Ralph59]

Hallo,

gerade saß ich so bei einem Programm, da dachte ich, wie schön es doch wäre, wenn ich ein Dialog oder Messagebox Fenster hätte, in dem ich

• - Arrays darstellen kann (zum Beispiel als ein kleines Stringgrid.
  - Buttons darstellen kann. (Wo ich den Text selber vorgeben kann z.B. aus einer eingenen Sprachtabelle nach Voreinstellung).

...

Das ganze wollte ich dann in eine kleine Unit verpacken und vielleicht beim nächsten Treffen vorstellen.

Gesagt, getan, ging ja auch soweit ganz schnell.
Fenster und Inhalte erstellt, alle Größen innerhalb des Fensters berechnet und dargestellt.
Jetzt aber zu meinem Problem.
Wennich viele Inhalte habe, dann muss ich das Fenster auch irgendwie in der Größe anpassen, ich möchte jedoch die angezeigte Größe des jeweiligen momentan genutzten Monitors nicht überschreiten, also muss ich die Größe erst einmal erfragen.

Gibt es hierfür eine fertige Funktion?
Und in welcher Unit ist diese zu finden?

Mit freundlichem Gruß

Ralph

[Live]

Bei Delphi gab es in der Windows API

Code: Alles auswählen

Screen.Width
Screen.Height

Evtl probierst du das mal? Scheint bei Lazarus in der Forms unit zu sein

Edit: Grade mit Lazarus in Ubuntu getestet, funktioniert einwandfrei.

[theo]

Screen ist in Unit Forms.

[Ralph59]

Hallo,

danke für die schnelle Hilfe, auf screen hätte ich ja auch kommen können hm.

Wie auch immer, es funktioniert.

Jetzt nur noch feststellen, auf welchem Monitor es läuft und dann bin ich auch schon fast fertig.

Danke noch mal.

Wenn ich dann noch Fragen habe, dann werde ich mich melden.

mit freundlichem Gruß

Ralph