Hello,

Thank you for your answer. To get the geometry information via winfo is working fine. So it is no problem to compute the geometry information I need to place the dialogbox in the middle of the main window.

My problem is how can I set the geometry information to the dialogbox?

I tried the following code:

my $db = $mw->DialogBox(-title => "Status", -buttons => ['Cancel'], -geometry => "300x300x+100+100");

I got this error:

Tk::Error: Can't set -geometry to `300x300x+100+100' for Tk::DialogBox
+=HASH(0x1d85574): unknown option "-geometry" at c:/Perl/site/lib/Tk/C
+onfigure.pm line 46.
 at c:/Perl/site/lib/Tk/Derived.pm line 294
[download]

Thank you for your help.

Greetings,

Dirk