Opened by Robby at 2003-08-11 13:31
User since
2006-03-21
47 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2006-03-21
47 Artikel
BenutzerIn
Um des Thema abzuschließen hier meine Lösung:
Da bei mir komischer Weise trotz korrekter TK-Version der Befehl
nicht funktioniert, habe ich die StayOnTop.pm analysiert (ist sehr klein) und folgenden Code bei mir eingebaut:
Die Win32::API muss natürlich installiert und eingebunden sein. Das Resultat ist genau das, was ich gesucht habe. Vielleicht kann dieser Beitrag in Zukunft ja jemand helfen...
Vielen Dank alle denen, die mir hier ihre Zeit geopfert haben.
Da bei mir komischer Weise trotz korrekter TK-Version der Befehl
Code: (dl
)
$mw->attributes(-topmost => 1);
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
# Rahmen entfernen
$mw->overrideredirect(1);
# im Vordergrund belassen
my $win32_winpos = Win32::API->new(
'user32', 'SetWindowPos',
['N','N','N','N','N','N','N'], 'N'
);
$mw->update;
$win32_winpos->Call(hex($mw->frame()),-1,0,0,0,0,3);
Die Win32::API muss natürlich installiert und eingebunden sein. Das Resultat ist genau das, was ich gesucht habe. Vielleicht kann dieser Beitrag in Zukunft ja jemand helfen...
Vielen Dank alle denen, die mir hier ihre Zeit geopfert haben.