Opened by Kean at 2007-07-12 20:15
User since
2003-11-28
3645 Artikel
ModeratorIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2003-11-28
3645 Artikel
ModeratorIn
Mit diesem Skript kannst du sie dir anzeigen lassen:
Erstellt habe ich die Liste mit dem Kommando
im Verzeichnis pTk/mTk/tixGeneric der Perl/Tk-Source-Distribution. Vielleicht sind noch einige andere Pixmaps irgendwo versteckt...
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
use Tk;
$top = new MainWindow;
for my $pixmap (qw(
act_fold
file
folder
info
minus
minusarm
no_entry
openfold
plus
plusarm
srcfile
textfile
warning
)) {
$top->Label(-image => $top->Getimage($pixmap))->pack;
}
MainLoop;
Erstellt habe ich die Liste mit dem Kommando
Code: (dl
)
perl -nle '/DefinePixmap.*Tk_GetUid\("(.*?)"/ && print $1' tixBitmaps.h