view release on metacpan or  search on metacpan

lib/App/PLab/ButtonGlyphs.pm  view on Meta::CPAN

package App::PLab::ButtonGlyphs;

use Prima;
use Prima::StdBitmap;

my $bmImageFile = Prima::Utils::find_image( '', "App::PLab::ButtonGlyphs.gif");

sub icon  { return Prima::StdBitmap::load_std_bmp( index => $_[0], icon => 1, copy => 0, file => $bmImageFile); }
sub image { return Prima::StdBitmap::load_std_bmp( index => $_[0], icon => 0, copy => 0, file => $bmImageFile); }

package bg;

use constant abort        => 0;
use constant alarm        => 1;
use constant alarmrng     => 2;
use constant animatn      => 3;
use constant arrow1d      => 4;
use constant arrow1dl     => 5;
use constant arrow1dr     => 6;
use constant arrow1l      => 7;
use constant arrow1r      => 8;
use constant arrow1u      => 9;
use constant arrow1ul     => 10;
use constant arrow1ur     => 11;
use constant arrow2d      => 12;
use constant arrow2l      => 13;
use constant arrow2r      => 14;
use constant arrow2u      => 15;
use constant arrow3d      => 16;
use constant arrow3l      => 17;
use constant arrow3r      => 18;
use constant arrow3u      => 19;
use constant bookopen     => 20;
use constant bookshut     => 21;
use constant brush        => 22;
use constant bulboff      => 23;
use constant bulbon       => 24;
use constant calculat     => 25;
use constant calendar     => 26;
use constant cdrom        => 27;
use constant check        => 28;
use constant clear        => 29;
use constant clock        => 30;
use constant compmac      => 31;
use constant comppc1      => 32;
use constant comppc2      => 33;
use constant copy         => 34;
use constant crdfile1     => 35;
use constant crdfile2     => 36;
use constant crdfile3     => 37;
use constant cut          => 38;
use constant date         => 39;
use constant day          => 40;
use constant delete       => 41;
use constant directry     => 42;
use constant docsingl     => 43;
use constant docstack     => 44;
use constant dooropen     => 45;
use constant doorshut     => 46;
use constant edit         => 47;
use constant erase        => 48;
use constant export       => 49;
use constant fcabopen     => 50;
use constant fcabshut     => 51;
use constant fdrawer1     => 52;
use constant fdrawer2     => 53;
use constant field        => 54;
use constant fileclos     => 55;
use constant filenew      => 56;
use constant fileopen     => 57;
use constant filesave     => 58;
use constant find         => 59;
use constant firstaid     => 60;
use constant fldr2opn     => 61;
use constant fldrmany     => 62;
use constant fldropen     => 63;
use constant fldrshut     => 64;
use constant floppy       => 65;
use constant foldrdoc     => 66;
use constant font         => 67;
use constant fontbold     => 68;
use constant fontital     => 69;
use constant fontsize     => 70;
use constant form         => 71;
use constant gears        => 72;
use constant globe        => 73;
use constant group        => 74;
use constant grphbar      => 75;
use constant grphline     => 76;
use constant grphpie      => 77;
use constant harddisk     => 78;
use constant help         => 79;
use constant helpindx     => 80;
use constant hide         => 81;
use constant hourglas     => 82;
use constant ignore       => 83;
use constant import       => 84;
use constant insert       => 85;
use constant key          => 86;