MainWindow an rechtem Bildschirmrand justieren - #43339 (Graphische Oberflächen)

Crian

2005-04-07 17:05

User since
2003-08-04
5866 Artikel
ModeratorIn

Stimmt, das ist noch eleganter. Allgemein ist es aber so, dass man die Auflösung berücksichtigen muss, das macht ja aber genau das Snippet zum Zentrieren.

(hier der Code für die klickfaulen:

Code: (dl )

my     $MamaGUI = new MainWindow( -title => "Mein Programm");

# Größe des Fensters:
my      $windowHeight       = "600";
my      $windowWidth        = "800";

# Bildschirmgröße holen:
my      $screenHeight       = $MamaGUI->screenheight;
my      $screenWidth        = $MamaGUI->screenwidth;

# MamaGUI zentrieren:
$MamaGUI->geometry($windowWidth."x".$windowHeight);
$MamaGUI->geometry("+" .
                   int($screenWidth/2 - $windowWidth/2) .
                   "+" .
                   int($screenHeight/2 - $windowHeight/2)
                  );

# minimale Größe festlegen:
$MamaGUI->minsize( 400, 300);

-> http://www.duehl.de/christian/perl/perlmain.html#tktippcenwin )\n\n

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite