Opened by Strat at 2003-08-10 23:28
User since
2003-08-04
2145 Artikel
ModeratorIn + EditorIn
2003-08-04
2145 Artikel
ModeratorIn + EditorIn
Schick :-)
Aber auch diese Version mag bei mir keinen Restart, da bekomme ich nie ein neues MainFrame zusehen. Es klappt allerdings, wenn man den Code etwas aendert, sodass das MainFrame selber nicht geloescht wird, sondern nur sein Inhalt.
Hier mal ein diff dazu:
Aber auch diese Version mag bei mir keinen Restart, da bekomme ich nie ein neues MainFrame zusehen. Es klappt allerdings, wenn man den Code etwas aendert, sodass das MainFrame selber nicht geloescht wird, sondern nur sein Inhalt.
Hier mal ein diff dazu:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
diff -r1.1 Tk-mines_0.07.pl
464c464
< $MainFrame->destroy(); undef $MainFrame;
---
> $_->destroy for $MainFrame->children();
471,475c471
< # create a new mainframe
< $MainFrame = $mw->Frame(-relief => 'sunken', -border => 1)
< ->pack(-side => 'top', -fill => 'both', -expand => 1);
<
< # and draw the rest
---
> # create the new contents of the MainFrame