Update of /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Constants
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv7193/Win32-GUI-Constants
Modified Files:
Constants.PL Tags.pm
Log Message:
Enhanced resouce loaing for Icons/Bitmaps and Cursors
Index: Constants.PL
===================================================================
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Constants/Constants.PL,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Constants.PL 16 May 2006 18:57:26 -0000 1.2
--- Constants.PL 1 Jun 2006 19:46:12 -0000 1.3
***************
*** 957,961 ****
# ID for bitmaps (Toolbars)
- #TODO DOT TO HERE
IDB_STD_SMALL_COLOR 0
IDB_STD_LARGE_COLOR 1
--- 957,960 ----
***************
*** 971,976 ****
IDC_CROSS 32515
IDC_UPARROW 32516
- IDC_SIZE 32640
- IDC_ICON 32641
IDC_SIZENWSE 32642
IDC_SIZENESW 32643
--- 970,973 ----
***************
*** 994,997 ****
--- 991,1055 ----
IDI_INFORMATION 32516 # IDI_ASTERISK
+ # Win32::GUI Icon
+ IDI_DEFAULTICON 102
+
+ # Win32::GUI Cursors
+ IDC_HSPLIT 103
+ IDC_VSPLIT 104
+
+ # OEM Cursor IDs
+ OCR_NORMAL 32512
+ OCR_IBEAM 32513
+ OCR_WAIT 32514
+ OCR_CROSS 32515
+ OCR_UP 32516
+ OCR_SIZENWSE 32642
+ OCR_SIZENESW 32643
+ OCR_SIZEWE 32644
+ OCR_SIZENS 32645
+ OCR_SIZEALL 32646
+ OCR_NO 32648
+ OCR_HAND 32649
+ OCR_APPSTARTING 32650
+
+ # OEM Bitmap IDs
+ OBM_CLOSE 32754
+ OBM_UPARROW 32753
+ OBM_DNARROW 32752
+ OBM_RGARROW 32751
+ OBM_LFARROW 32750
+ OBM_REDUCE 32749
+ OBM_ZOOM 32748
+ OBM_RESTORE 32747
+ OBM_REDUCED 32746
+ OBM_ZOOMD 32745
+ OBM_RESTORED 32744
+ OBM_UPARROWD 32743
+ OBM_DNARROWD 32742
+ OBM_RGARROWD 32741
+ OBM_LFARROWD 32740
+ OBM_MNARROW 32739
+ OBM_COMBO 32738
+ OBM_UPARROWI 32737
+ OBM_DNARROWI 32736
+ OBM_RGARROWI 32735
+ OBM_LFARROWI 32734
+ OBM_SIZE 32766
+ OBM_BTSIZE 32761
+ OBM_CHECK 32760
+ OBM_CHECKBOXES 32759
+ OBM_BTNCORNERS 32758
+
+ # OEM Icon IDs
+ OIC_SAMPLE 32512
+ OIC_HAND 32513
+ OIC_QUES 32514
+ OIC_BANG 32515
+ OIC_NOTE 32516
+ OIC_WINLOGO 32517
+ OIC_WARNING 32515 # OIC_BANG
+ OIC_ERROR 32513 # OIC_HAND
+ OIC_INFORMATION 32516 # OIC_NOTE
+
# Listbox styles
LBS_NOTIFY 0x0001
Index: Tags.pm
===================================================================
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Constants/Tags.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Tags.pm 16 May 2006 18:57:26 -0000 1.2
--- Tags.pm 1 Jun 2006 19:46:12 -0000 1.3
***************
*** 82,96 ****
accelerator => [ qw( ^VK_ ) ],
animation => [ qw( ^ACS_ ) ],
! bitmap => [ qw() ],
brush => [ qw() ],
button => undef,
class => [ qw( ^COLOR_ ^CS_ ) ],
combobox => [ qw( ^CBS_ ^CBES_ ) ],
! cursor => [ qw( ^IDC_ ) ],
datetime => [ qw( ^DTS_ ) ],
dc => undef,
font => [ qw() ],
header => [ qw( ^HDS_ ) ],
! icon => [ qw( ^IDI_ ) ],
imagelist => [ qw( ^ILC_ ^ILD_ ^ILS_ ^CLR_NONE$ ^CLR_DEFAULT$ ^IMAGE_ )
],
label => [ qw( ^IMAGE_ ) ],
--- 82,96 ----
accelerator => [ qw( ^VK_ ) ],
animation => [ qw( ^ACS_ ) ],
! bitmap => [ qw( ^OBM_ ) ],
brush => [ qw() ],
button => undef,
class => [ qw( ^COLOR_ ^CS_ ) ],
combobox => [ qw( ^CBS_ ^CBES_ ) ],
! cursor => [ qw( ^IDC_ ^OCR_ ) ],
datetime => [ qw( ^DTS_ ) ],
dc => undef,
font => [ qw() ],
header => [ qw( ^HDS_ ) ],
! icon => [ qw( ^IDI_ ^OIC_ ) ],
imagelist => [ qw( ^ILC_ ^ILD_ ^ILS_ ^CLR_NONE$ ^CLR_DEFAULT$ ^IMAGE_ )
],
label => [ qw( ^IMAGE_ ) ],
