| Код |
my $image = $mw->Photo(-format => 'gif',
-data => 'R0lGODlhMgAxAPcAAAAAAAQCBAQGBAwKDAwODBQSFBQWFBwaHBweHCQiJCQmJCwqLCwuLDQyNDQ2NDw6PDw+PERCRExKRExKTExOTFRSVFRWVFxaXFxeXGRiZGRmZGxqbGxubHRydHx6fHx+fIyKjJSSlJSWlJyanJyenKSipKyqrKyurLSytLy6vLy+vMTCxMzKzMzOzMzO1NTS1NTW1Nza3Nze3OTi5OTm5OTm7Ozq7Ozu7PTy9PT29Pz6/P///wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACH5BAEAAP8ALAAAAAAyADEAAAj/AP8JHEiwoMGDCBMqXDjQxgsYD2OsQDEChQ2GGBfGePHCxo6PIHfoGIGAgYcXGVMKbPFCR8iXIHFYCBDAgQmVGl/A3BnSA80ADFbgNJiDBQ6eSD/6/Lkhx1CBNHQmnVrhJ1AZQ2fMmMqVxgCrBlqolLGVK9cOVgMQEIuRRlmzU1+kDWAA60IdUuHiGEHC5U4EcxXgWNgC7kcdC2hK4DlhboAMCmMcNbzC6tuQGhwHSJHQheGPMn4WyLEzs2MFCPN+DnEAwQmeFzQHGHFQ9eepDGQvMDhj8u2pNmTT5EzQ9m+eIoQ/Lmj8+EsdCpQXIIjjsnOYIJTTZPsvxnWkLARo/w8gYiCM7ztbGBgfgIN59C9JfGUfYaB3+DtSPGD/84H94zmoIEIIH2CwHn8/MfDfZy1YIB6CmjXwnl4YQKicAwtyNUN0FgpXQYZJ2QBYh8K5J9ANNXAFAYnKkUDQeUmVwKJyMBQ3VQIzyoZAQTL4tZMKOcqmgUHNfcRBkJqxYFBhPK2oWQEcWiihQXjxNOJcFriUQoc31eZjSAVoBuMOTvLnX0Is7ISjY2l+1ACE3B1kw30hNeZYAzLkkB2CHzAUww0vLYVkABNk1IJvO7gwKFCDGYqoA0gucJFKL6T4EZA5QjApTjLktcGMG+jwlEBFeaQDBR0mQNyoA83QAg06VC7InwEgiMoqbyy4QMIB2jkwgq23JgQDCxw0MB9NAyyAgQgzBIuTDjPEIMMNwQYEADs=');
my $button1 = $mw->Button(-image => $image,
-height => 80,
-width => 80,
-command => \&button1_sub)
->place( -x => 260, -y => 207 );
|
разобрался |