home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / win32-commctrl.ads < prev    next >
Encoding:
Text File  |  1996-03-15  |  36.2 KB  |  562 lines
  1. -- $Source: /home/harp/1/proto/monoBANK/winnt/win32-commctrl.ads,v $ 
  2. -- $Revision: 1.14 $ $Date: 96/03/15 12:51:34 $ $Author: stm $ 
  3. -- See end of file for Copyright (c) information.
  4.  
  5. with Win32.Windef;
  6. with Win32.Winnt;
  7.  
  8. package Win32.Commctrl is
  9.  
  10.     use type Interfaces.C.Char_Array;
  11.  
  12.     TOOLBARCLASSNAMEW        : constant WCHAR_Array := 
  13.                    "ToolbarWindow32" & Wide_Nul; -- commctrl.h:27
  14.     TOOLBARCLASSNAMEA        : constant CHAR_Array := 
  15.                    "ToolbarWindow32" & Nul;    -- commctrl.h:28
  16.     TOOLBARCLASSNAME         : CHAR_Array renames TOOLBARCLASSNAMEA;
  17.                                                             -- commctrl.h:33
  18.     TBSTATE_CHECKED          : constant := 16#1#;           -- commctrl.h:47
  19.     TBSTATE_PRESSED          : constant := 16#2#;           -- commctrl.h:48
  20.     TBSTATE_ENABLED          : constant := 16#4#;           -- commctrl.h:49
  21.     TBSTATE_HIDDEN           : constant := 16#8#;           -- commctrl.h:50
  22.     TBSTYLE_BUTTON           : constant := 16#0#;           -- commctrl.h:52
  23.     TBSTYLE_SEP              : constant := 16#1#;           -- commctrl.h:53
  24.     TBSTYLE_CHECK            : constant := 16#2#;           -- commctrl.h:54
  25.     TBSTYLE_GROUP            : constant := 16#4#;           -- commctrl.h:55
  26.     TBSTYLE_CHECKGROUP       : constant := 16#6#;           -- commctrl.h:56
  27.     TB_ENABLEBUTTON          : constant := 16#401#;         -- commctrl.h:75
  28.     TB_CHECKBUTTON           : constant := 16#402#;         -- commctrl.h:78
  29.     TB_PRESSBUTTON           : constant := 16#403#;         -- commctrl.h:81
  30.     TB_HIDEBUTTON            : constant := 16#404#;         -- commctrl.h:84
  31.     TB_ISBUTTONENABLED       : constant := 16#409#;         -- commctrl.h:90
  32.     TB_ISBUTTONCHECKED       : constant := 16#40a#;         -- commctrl.h:93
  33.     TB_ISBUTTONPRESSED       : constant := 16#40b#;         -- commctrl.h:96
  34.     TB_ISBUTTONHIDDEN        : constant := 16#40c#;         -- commctrl.h:99
  35.     TB_SETSTATE              : constant := 16#411#;         -- commctrl.h:102
  36.     TB_GETSTATE              : constant := 16#412#;         -- commctrl.h:105
  37.     TB_ADDBITMAP             : constant := 16#413#;         -- commctrl.h:112
  38.     TB_ADDBUTTONS            : constant := 16#414#;         -- commctrl.h:115
  39.     TB_INSERTBUTTON          : constant := 16#415#;         -- commctrl.h:121
  40.     TB_DELETEBUTTON          : constant := 16#416#;         -- commctrl.h:125
  41.     TB_GETBUTTON             : constant := 16#417#;         -- commctrl.h:130
  42.     TB_BUTTONCOUNT           : constant := 16#418#;         -- commctrl.h:135
  43.     TB_COMMANDTOINDEX        : constant := 16#419#;         -- commctrl.h:141
  44.     TB_SAVERESTORE           : constant := 16#41a#;         -- commctrl.h:148
  45.     TB_CUSTOMIZE             : constant := 16#41b#;         -- commctrl.h:156
  46.     TB_SETBUTTON             : constant := 16#427#;         -- commctrl.h:165
  47.     TB_GETBUTTONRECT         : constant := 16#428#;         -- commctrl.h:170
  48.     STATUSCLASSNAMEW         : constant WCHAR_Array := 
  49.                    "msctls_statusbar32" & Wide_Nul;
  50.                                                             -- commctrl.h:238
  51.     STATUSCLASSNAMEA         : constant CHAR_Array := 
  52.                    "msctls_statusbar32" & Nul; -- commctrl.h:239
  53.     STATUSCLASSNAME          : CHAR_Array renames STATUSCLASSNAMEA;
  54.                                                             -- commctrl.h:244
  55.     HEADERCLASSNAMEW         : constant WCHAR_Array 
  56.                    := "msctls_headerbar" & Wide_Nul;
  57.                                                             -- commctrl.h:250
  58.     HEADERCLASSNAMEA         : constant CHAR_Array := 
  59.                    "msctls_headerbar" & Nul;   -- commctrl.h:251
  60.     HEADERCLASSNAME          : CHAR_Array renames HEADERCLASSNAMEA;
  61.                                                             -- commctrl.h:256
  62.     SB_SETTEXTA              : constant := 16#401#;         -- commctrl.h:264
  63.     SB_GETTEXTA              : constant := 16#402#;         -- commctrl.h:265
  64.     SB_GETTEXTW              : constant := 16#40a#;         -- commctrl.h:266
  65.     SB_SETTEXTW              : constant := 16#40b#;         -- commctrl.h:267
  66.     SB_GETTEXT               : constant := 16#402#;         -- commctrl.h:273
  67.     SB_SETTEXT               : constant := 16#401#;         -- commctrl.h:274
  68.     SB_GETTEXTLENGTH         : constant := 16#403#;         -- commctrl.h:277
  69.     SB_SETPARTS              : constant := 16#404#;         -- commctrl.h:291
  70.     SB_SETBORDERS            : constant := 16#405#;         -- commctrl.h:296
  71.     SB_GETPARTS              : constant := 16#406#;         -- commctrl.h:300
  72.     SB_GETBORDERS            : constant := 16#407#;         -- commctrl.h:306
  73.     SB_SETMINHEIGHT          : constant := 16#408#;         -- commctrl.h:310
  74.     SB_SIMPLE                : constant := 16#409#;         -- commctrl.h:317
  75.     HB_SAVERESTORE           : constant := 16#500#;         -- commctrl.h:328
  76.     HB_ADJUST                : constant := 16#501#;         -- commctrl.h:334
  77.     HB_SETWIDTHS             : constant := 16#404#;         -- commctrl.h:338
  78.     HB_GETWIDTHS             : constant := 16#406#;         -- commctrl.h:343
  79.     HB_GETPARTS              : constant := 16#502#;         -- commctrl.h:347
  80.     HB_SHOWTOGGLE            : constant := 16#503#;         -- commctrl.h:355
  81.     SBT_OWNERDRAW            : constant := 16#1000#;        -- commctrl.h:361
  82.     SBT_NOBORDERS            : constant := 16#100#;         -- commctrl.h:367
  83.     SBT_POPOUT               : constant := 16#200#;         -- commctrl.h:370
  84.     HBT_SPRING               : constant := 16#400#;         -- commctrl.h:373
  85.     MINSYSCOMMAND            : constant := 16#f000#;        -- commctrl.h:448
  86.     BUTTONLISTBOX            : constant WCHAR_Array := 
  87.                    "ButtonListBox" & Wide_Nul; -- commctrl.h:546
  88.     BLS_NUMBUTTONS           : constant := 16#ff#;          -- commctrl.h:549
  89.     BLS_VERTICAL             : constant := 16#100#;         -- commctrl.h:550
  90.     BLS_NOSCROLL             : constant := 16#200#;         -- commctrl.h:551
  91.     BL_ADDBUTTONA            : constant := 16#401#;         -- commctrl.h:555
  92.     BL_DELETEBUTTONA         : constant := 16#402#;         -- commctrl.h:556
  93.     BL_GETCARETINDEX         : constant := 16#403#;         -- commctrl.h:557
  94.     BL_GETCOUNT              : constant := 16#404#;         -- commctrl.h:558
  95.     BL_GETCURSEL             : constant := 16#405#;         -- commctrl.h:559
  96.     BL_GETITEMDATA           : constant := 16#406#;         -- commctrl.h:560
  97.     BL_GETITEMRECT           : constant := 16#407#;         -- commctrl.h:561
  98.     BL_GETTEXTA              : constant := 16#408#;         -- commctrl.h:562
  99.     BL_GETTEXTLEN            : constant := 16#409#;         -- commctrl.h:563
  100.     BL_GETTOPINDEX           : constant := 16#40a#;         -- commctrl.h:564
  101.     BL_INSERTBUTTONA         : constant := 16#40b#;         -- commctrl.h:565
  102.     BL_RESETCONTENT          : constant := 16#40c#;         -- commctrl.h:566
  103.     BL_SETCARETINDEX         : constant := 16#40d#;         -- commctrl.h:567
  104.     BL_SETCURSEL             : constant := 16#40e#;         -- commctrl.h:568
  105.     BL_SETITEMDATA           : constant := 16#40f#;         -- commctrl.h:569
  106.     BL_SETTOPINDEX           : constant := 16#410#;         -- commctrl.h:570
  107.     BL_ADDBUTTONW            : constant := 16#411#;         -- commctrl.h:572
  108.     BL_DELETEBUTTONW         : constant := 16#412#;         -- commctrl.h:573
  109.     BL_GETTEXTW              : constant := 16#413#;         -- commctrl.h:574
  110.     BL_INSERTBUTTONW         : constant := 16#414#;         -- commctrl.h:575
  111.     BL_MSGMAX                : constant := 16#415#;         -- commctrl.h:576
  112.     BL_ADDBUTTON             : constant := 16#401#;         -- commctrl.h:585
  113.     BL_DELETEBUTTON          : constant := 16#402#;         -- commctrl.h:586
  114.     BL_GETTEXT               : constant := 16#408#;         -- commctrl.h:587
  115.     BL_INSERTBUTTON          : constant := 16#40b#;         -- commctrl.h:588
  116.     BL_GETCARETINDEXA        : constant := 16#403#;         -- commctrl.h:592
  117.     BL_GETCARETINDEXW        : constant := 16#403#;         -- commctrl.h:593
  118.     BL_GETCOUNTA             : constant := 16#404#;         -- commctrl.h:594
  119.     BL_GETCOUNTW             : constant := 16#404#;         -- commctrl.h:595
  120.     BL_GETCURSELA            : constant := 16#405#;         -- commctrl.h:596
  121.     BL_GETCURSELW            : constant := 16#405#;         -- commctrl.h:597
  122.     BL_GETITEMDATAA          : constant := 16#406#;         -- commctrl.h:598
  123.     BL_GETITEMDATAW          : constant := 16#406#;         -- commctrl.h:599
  124.     BL_GETITEMRECTA          : constant := 16#407#;         -- commctrl.h:600
  125.     BL_GETITEMRECTW          : constant := 16#407#;         -- commctrl.h:601
  126.     BL_GETTEXTLENA           : constant := 16#409#;         -- commctrl.h:602
  127.     BL_GETTEXTLENW           : constant := 16#409#;         -- commctrl.h:603
  128.     BL_GETTOPINDEXA          : constant := 16#40a#;         -- commctrl.h:604
  129.     BL_GETTOPINDEXW          : constant := 16#40a#;         -- commctrl.h:605
  130.     BL_RESETCONTENTA         : constant := 16#40c#;         -- commctrl.h:606
  131.     BL_RESETCONTENTW         : constant := 16#40c#;         -- commctrl.h:607
  132.     BL_SETCARETINDEXA        : constant := 16#40d#;         -- commctrl.h:608
  133.     BL_SETCARETINDEXW        : constant := 16#40d#;         -- commctrl.h:609
  134.     BL_SETCURSELA            : constant := 16#40e#;         -- commctrl.h:610
  135.     BL_SETCURSELW            : constant := 16#40e#;         -- commctrl.h:611
  136.     BL_SETITEMDATAA          : constant := 16#40f#;         -- commctrl.h:612
  137.     BL_SETITEMDATAW          : constant := 16#40f#;         -- commctrl.h:613
  138.     BL_SETTOPINDEXA          : constant := 16#410#;         -- commctrl.h:614
  139.     BL_SETTOPINDEXW          : constant := 16#410#;         -- commctrl.h:615
  140.     BLN_ERRSPACE             : constant := -2;              -- commctrl.h:618
  141.     BLN_SELCHANGE            : constant := 1;               -- commctrl.h:619
  142.     BLN_CLICKED              : constant := 2;               -- commctrl.h:620
  143.     BLN_SELCANCEL            : constant := 3;               -- commctrl.h:621
  144.     BLN_SETFOCUS             : constant := 4;               -- commctrl.h:622
  145.     BLN_KILLFOCUS            : constant := 5;               -- commctrl.h:623
  146.     BL_OKAY                  : constant := 0;               -- commctrl.h:626
  147.     BL_ERR                   : constant := -1;              -- commctrl.h:627
  148.     BL_ERRSPACE              : constant := -2;              -- commctrl.h:628
  149.     TRACKBAR_CLASSA          : constant CHAR_Array := 
  150.                    "msctls_trackbar32" & Nul;  -- commctrl.h:688
  151.     TRACKBAR_CLASSW          : constant WCHAR_Array := 
  152.                    "msctls_trackbar32" & Wide_Nul;
  153.                                                             -- commctrl.h:689
  154.     TRACKBAR_CLASS           : CHAR_Array renames TRACKBAR_CLASSA;
  155.                                                             -- commctrl.h:694
  156.     TBS_AUTOTICKS            : constant := 16#1#;           -- commctrl.h:700
  157.     TBM_GETPOS               : constant := 16#400#;         -- commctrl.h:706
  158.     TBM_GETRANGEMIN          : constant := 16#401#;         -- commctrl.h:709
  159.     TBM_GETRANGEMAX          : constant := 16#402#;         -- commctrl.h:712
  160.     TBM_GETTIC               : constant := 16#403#;         -- commctrl.h:715
  161.     TBM_SETTIC               : constant := 16#404#;         -- commctrl.h:718
  162.     TBM_SETPOS               : constant := 16#405#;         -- commctrl.h:721
  163.     TBM_SETRANGE             : constant := 16#406#;         -- commctrl.h:724
  164.     TBM_SETRANGEMIN          : constant := 16#407#;         -- commctrl.h:727
  165.     TBM_SETRANGEMAX          : constant := 16#408#;         -- commctrl.h:730
  166.     TBM_CLEARTICS            : constant := 16#409#;         -- commctrl.h:733
  167.     TBM_SETSEL               : constant := 16#40a#;         -- commctrl.h:736
  168.     TBM_SETSELSTART          : constant := 16#40b#;         -- commctrl.h:739
  169.     TBM_SETSELEND            : constant := 16#40c#;         -- commctrl.h:740
  170.     TBM_GETPTICS             : constant := 16#40e#;         -- commctrl.h:745
  171.     TBM_GETTICPOS            : constant := 16#40f#;         -- commctrl.h:748
  172.     TBM_GETNUMTICS           : constant := 16#410#;         -- commctrl.h:750
  173.     TBM_GETSELSTART          : constant := 16#411#;         -- commctrl.h:753
  174.     TBM_GETSELEND            : constant := 16#412#;         -- commctrl.h:754
  175.     TBM_CLEARSEL             : constant := 16#413#;         -- commctrl.h:757
  176.     TB_LINEUP                : constant := 0;               -- commctrl.h:761
  177.     TB_LINEDOWN              : constant := 1;               -- commctrl.h:762
  178.     TB_PAGEUP                : constant := 2;               -- commctrl.h:763
  179.     TB_PAGEDOWN              : constant := 3;               -- commctrl.h:764
  180.     TB_THUMBPOSITION         : constant := 4;               -- commctrl.h:765
  181.     TB_THUMBTRACK            : constant := 5;               -- commctrl.h:766
  182.     TB_TOP                   : constant := 6;               -- commctrl.h:767
  183.     TB_BOTTOM                : constant := 7;               -- commctrl.h:768
  184.     TB_ENDTRACK              : constant := 8;               -- commctrl.h:769
  185.     DL_BEGINDRAG             : constant := 16#485#;         -- commctrl.h:784
  186.     DL_DRAGGING              : constant := 16#486#;         -- commctrl.h:785
  187.     DL_DROPPED               : constant := 16#487#;         -- commctrl.h:786
  188.     DL_CANCELDRAG            : constant := 16#488#;         -- commctrl.h:787
  189.     DL_CURSORSET             : constant := 0;               -- commctrl.h:789
  190.     DL_STOPCURSOR            : constant := 1;               -- commctrl.h:790
  191.     DL_COPYCURSOR            : constant := 2;               -- commctrl.h:791
  192.     DL_MOVECURSOR            : constant := 3;               -- commctrl.h:792
  193.     DRAGLISTMSGSTRING        : constant WCHAR_Array := 
  194.                    "commctrl_DragListMsg" & Wide_Nul;
  195.                                                             -- commctrl.h:794
  196.     UDS_WRAP                 : constant := 16#1#;           -- commctrl.h:871
  197.     UDS_SETBUDDYINT          : constant := 16#2#;           -- commctrl.h:874
  198.     UDS_ALIGNRIGHT           : constant := 16#4#;           -- commctrl.h:877
  199.     UDS_ALIGNLEFT            : constant := 16#8#;           -- commctrl.h:878
  200.     UDS_AUTOBUDDY            : constant := 16#10#;          -- commctrl.h:881
  201.     UDS_ARROWKEYS            : constant := 16#20#;          -- commctrl.h:884
  202.     UDM_SETRANGE             : constant := 16#465#;         -- commctrl.h:889
  203.     UDM_GETRANGE             : constant := 16#466#;         -- commctrl.h:895
  204.     UDM_SETPOS               : constant := 16#467#;         -- commctrl.h:901
  205.     UDM_GETPOS               : constant := 16#468#;         -- commctrl.h:907
  206.     UDM_SETBUDDY             : constant := 16#469#;         -- commctrl.h:913
  207.     UDM_GETBUDDY             : constant := 16#46a#;         -- commctrl.h:919
  208.     UDM_SETACCEL             : constant := 16#46b#;         -- commctrl.h:925
  209.     UDM_GETACCEL             : constant := 16#46c#;         -- commctrl.h:935
  210.     UDM_SETBASE              : constant := 16#46d#;         -- commctrl.h:941
  211.     UDM_GETBASE              : constant := 16#46e#;         -- commctrl.h:946
  212.     UPDOWN_CLASS             : constant WCHAR_Array := 
  213.                    "msctls_updown" & Wide_Nul; -- commctrl.h:963
  214.     HBN_BEGINDRAG            : constant := 16#101#;         -- commctrl.h:992
  215.     HBN_DRAGGING             : constant := 16#102#;         -- commctrl.h:993
  216.     HBN_ENDDRAG              : constant := 16#103#;         -- commctrl.h:994
  217.     HBN_BEGINADJUST          : constant := 16#111#;         -- commctrl.h:999
  218.     HBN_ENDADJUST            : constant := 16#112#;         -- commctrl.h:1000
  219.     TBN_BEGINDRAG            : constant := 16#201#;         -- commctrl.h:1007
  220.     TBN_ENDDRAG              : constant := 16#203#;         -- commctrl.h:1008
  221.     TBN_BEGINADJUST          : constant := 16#204#;         -- commctrl.h:1018
  222.     TBN_ADJUSTINFO           : constant := 16#205#;         -- commctrl.h:1019
  223.     TBN_ENDADJUST            : constant := 16#206#;         -- commctrl.h:1020
  224.     TBN_RESET                : constant := 16#207#;         -- commctrl.h:1021
  225.     TBN_QUERYINSERT          : constant := 16#208#;         -- commctrl.h:1031
  226.     TBN_QUERYDELETE          : constant := 16#209#;         -- commctrl.h:1032
  227.     TBN_TOOLBARCHANGE        : constant := 16#20a#;         -- commctrl.h:1033
  228.     TBN_CUSTHELP             : constant := 16#20b#;         -- commctrl.h:1041
  229.     CCS_TOP                  : constant := 16#1#;           -- commctrl.h:1053
  230.     CCS_NOMOVEY              : constant := 16#2#;           -- commctrl.h:1064
  231.     CCS_BOTTOM               : constant := 16#3#;           -- commctrl.h:1069
  232.     CCS_NORESIZE             : constant := 16#4#;           -- commctrl.h:1072
  233.     CCS_NOPARENTALIGN        : constant := 16#8#;           -- commctrl.h:1076
  234.     CCS_NOHILITE             : constant := 16#10#;          -- commctrl.h:1080
  235.     CCS_ADJUSTABLE           : constant := 16#20#;          -- commctrl.h:1083
  236.     SST_RESOURCE             : constant := 16#1#;           -- commctrl.h:1092
  237.     SST_FORMAT               : constant := 16#2#;           -- commctrl.h:1093
  238.  
  239.     type TBBUTTON;                                          -- commctrl.h:44
  240.     type ADJUSTINFO;                                        -- commctrl.h:62
  241.     type COLORMAP;                                          -- commctrl.h:70
  242.     type CREATELISTBUTTONA;                                 -- commctrl.h:635
  243.     type CREATELISTBUTTONW;                                 -- commctrl.h:646
  244.     type DRAGLISTINFO;                                      -- commctrl.h:781
  245.     type UDACCEL;                                           -- commctrl.h:862
  246.                                                         
  247.     type PTBBUTTON is access all TBBUTTON;                  -- commctrl.h:44
  248.     subtype LPTBBUTTON is PTBBUTTON;                        -- commctrl.h:44
  249.     type LPCTBBUTTON is access all TBBUTTON;           -- commctrl.h:45
  250.     type LPADJUSTINFO is access all ADJUSTINFO;             -- commctrl.h:62
  251.     type LPCOLORMAP is access all COLORMAP;                 -- commctrl.h:70
  252.     type LPCREATELISTBUTTONA is access all CREATELISTBUTTONA;
  253.                                                             -- commctrl.h:644
  254.     type LPCREATELISTBUTTONW is access all CREATELISTBUTTONW;
  255.                                                             -- commctrl.h:654
  256.     subtype LPCREATELISTBUTTON is LPCREATELISTBUTTONA;      -- commctrl.h:662
  257.     type LPDRAGLISTINFO is access all DRAGLISTINFO;         -- commctrl.h:781
  258.     type LPUDACCEL is access all UDACCEL;                   -- commctrl.h:866
  259.  
  260.     type TBBUTTON is                                        -- commctrl.h:44
  261.         record
  262.             iBitmap  : Win32.INT;                           -- commctrl.h:37
  263.             idCommand: Win32.INT;                           -- commctrl.h:38
  264.             fsState  : Win32.BYTE;                          -- commctrl.h:39
  265.             fsStyle  : Win32.BYTE;                          -- commctrl.h:40
  266.             idsHelp  : Win32.INT;                           -- commctrl.h:41
  267.             dwData   : Win32.DWORD;                         -- commctrl.h:42
  268.             iString  : Win32.INT;                           -- commctrl.h:43
  269.         end record;
  270.  
  271.     type ADJUSTINFO is                                      -- commctrl.h:62
  272.         record
  273.             tbButton     : Win32.Commctrl.TBBUTTON;         -- commctrl.h:60
  274.             szDescription: Win32.Winnt.TCHAR_Array(0..Win32.ANYSIZE_ARRAY);
  275.                                                             -- commctrl.h:61
  276.         end record;
  277.  
  278.     type COLORMAP is                                        -- commctrl.h:70
  279.         record
  280.             from: Win32.Windef.COLORREF;                    -- commctrl.h:68
  281.             to  : Win32.Windef.COLORREF;                    -- commctrl.h:69
  282.         end record;
  283.  
  284.     type CREATELISTBUTTONA is                               -- commctrl.h:635
  285.         record
  286.             cbSize    : Win32.UINT;                         -- commctrl.h:637
  287.             dwItemData: Win32.DWORD;                        -- commctrl.h:638
  288.             hBitmap   : Win32.Windef.HBITMAP;               -- commctrl.h:640
  289.             lpszText  : Win32.LPCSTR;                       -- commctrl.h:641
  290.         end record;                                     
  291.                                                         
  292.     subtype CREATELISTBUTTON is CREATELISTBUTTONA;          -- commctrl.h:659
  293.                                                         
  294.     type CREATELISTBUTTONW is                               -- commctrl.h:646
  295.         record                                          
  296.             cbSize    : Win32.UINT;                         -- commctrl.h:648
  297.             dwItemData: Win32.DWORD;                        -- commctrl.h:649
  298.             hBitmap   : Win32.Windef.HBITMAP;               -- commctrl.h:651
  299.             lpszText  : Win32.LPCWSTR;                      -- commctrl.h:652
  300.         end record;                                     
  301.                                                         
  302.     type DRAGLISTINFO is                                    -- commctrl.h:781
  303.         record                                          
  304.             uNotification: Win32.UINT;                      -- commctrl.h:778
  305.             hWnd         : Win32.Windef.HWND;               -- commctrl.h:779
  306.             ptCursor     : Win32.Windef.POINT;              -- commctrl.h:780
  307.         end record;                                        
  308.                                                            
  309.     type UDACCEL is                                         -- commctrl.h:862
  310.         record                                          
  311.             nSec: Win32.UINT;                               -- commctrl.h:864
  312.             nInc: Win32.UINT;                               -- commctrl.h:865
  313.         end record;                                     
  314.                                                         
  315.     function CreateToolbar(
  316.                 hwnd       : Win32.Windef.HWND;
  317.                 ws         : Win32.DWORD;
  318.                 wID        : Win32.WORD;
  319.                 nBitmaps   : Win32.INT;
  320.                 hBMInst    : Win32.Windef.HINSTANCE;
  321.                 wBMID      : Win32.WORD;
  322.                 lpButtons  : LPTBBUTTON;
  323.                 iNumButtons: Win32.INT)
  324.                return Win32.Windef.HWND;                    -- commctrl.h:65
  325.  
  326.     function CreateMappedBitmap(
  327.                 hInstance   : Win32.Windef.HINSTANCE;
  328.                 idBitmap    : Win32.INT;
  329.                 bDiscardable: Win32.BOOL;
  330.                 lpColorMap  : Win32.Commctrl.LPCOLORMAP;
  331.                 iNumMaps    : Win32.INT)
  332.                return Win32.Windef.HBITMAP;                 -- commctrl.h:72
  333.                                                         
  334.     procedure DrawStatusTextA(                          
  335.                 hDC   : Win32.Windef.HDC;               
  336.                 lprc  : Win32.Windef.LPRECT;            
  337.                 szText: Win32.LPCSTR;                   
  338.                 uFlags: Win32.UINT);                        -- commctrl.h:187
  339.                                                         
  340.     procedure DrawStatusText(                           
  341.                 hDC   : Win32.Windef.HDC;               
  342.                 lprc  : Win32.Windef.LPRECT;            
  343.                 szText: Win32.LPCSTR;                   
  344.                 uFlags: Win32.UINT)                     
  345.                renames DrawStatusTextA;                     -- commctrl.h:187
  346.                                                         
  347.     procedure DrawStatusTextW(                          
  348.                 hDC   : Win32.Windef.HDC;               
  349.                 lprc  : Win32.Windef.LPRECT;            
  350.                 szText: Win32.LPCWSTR;                  
  351.                 uFlags: Win32.UINT);                        -- commctrl.h:188
  352.                                                         
  353.     function CreateStatusWindowA(                       
  354.                 style     : Win32.LONG;                 
  355.                 lpszText  : Win32.LPCSTR;               
  356.                 hwndParent: Win32.Windef.HWND;          
  357.                 wID       : Win32.WORD)                 
  358.                return Win32.Windef.HWND;                    -- commctrl.h:205
  359.                                                         
  360.     function CreateStatusWindow(                        
  361.                 style     : Win32.LONG;                 
  362.                 lpszText  : Win32.LPCSTR;               
  363.                 hwndParent: Win32.Windef.HWND;          
  364.                 wID       : Win32.WORD)                 
  365.                return Win32.Windef.HWND                 
  366.                renames CreateStatusWindowA;                 -- commctrl.h:205
  367.                                                         
  368.     function CreateStatusWindowW(                       
  369.                 style     : Win32.LONG;                 
  370.                 lpszText  : Win32.LPCWSTR;              
  371.                 hwndParent: Win32.Windef.HWND;          
  372.                 wID       : Win32.WORD)                 
  373.                return Win32.Windef.HWND;                    -- commctrl.h:207
  374.                                                         
  375.     function CreateHeaderWindowA(                       
  376.                 style     : Win32.LONG;                 
  377.                 lpszText  : Win32.LPCSTR;               
  378.                 hwndParent: Win32.Windef.HWND;          
  379.                 wID       : Win32.WORD)                 
  380.                return Win32.Windef.HWND;                    -- commctrl.h:214
  381.  
  382.     function CreateHeaderWindow(
  383.                 style     : Win32.LONG;
  384.                 lpszText  : Win32.LPCSTR;
  385.                 hwndParent: Win32.Windef.HWND;
  386.                 wID       : Win32.WORD)
  387.                return Win32.Windef.HWND
  388.                renames CreateHeaderWindowA;                 -- commctrl.h:214
  389.                                                         
  390.     function CreateHeaderWindowW(                       
  391.                 style     : Win32.LONG;                 
  392.                 lpszText  : Win32.LPCWSTR;              
  393.                 hwndParent: Win32.Windef.HWND;          
  394.                 wID       : Win32.WORD)                 
  395.                return Win32.Windef.HWND;                    -- commctrl.h:216
  396.                                                         
  397.     function WritePrivateProfileStructA(                
  398.                 szSection  : Win32.LPCSTR;              
  399.                 szKey      : Win32.LPCSTR;              
  400.                 lpStruct   : Win32.LPBYTE;              
  401.                 uSizeStruct: Win32.UINT;                
  402.                 szFile     : Win32.LPCSTR)              
  403.                return Win32.BOOL;                           -- commctrl.h:421
  404.                                                         
  405.     function WritePrivateProfileStruct(                 
  406.                 szSection  : Win32.LPCSTR;              
  407.                 szKey      : Win32.LPCSTR;              
  408.                 lpStruct   : Win32.LPBYTE;              
  409.                 uSizeStruct: Win32.UINT;                
  410.                 szFile     : Win32.LPCSTR)              
  411.                return Win32.BOOL                        
  412.                renames WritePrivateProfileStructA;          -- commctrl.h:421
  413.                                                         
  414.     function WritePrivateProfileStructW(                
  415.                 szSection  : Win32.LPCWSTR;             
  416.                 szKey      : Win32.LPCWSTR;             
  417.                 lpStruct   : Win32.LPBYTE;              
  418.                 uSizeStruct: Win32.UINT;                
  419.                 szFile     : Win32.LPCWSTR)             
  420.                return Win32.BOOL;                           -- commctrl.h:423
  421.                                                         
  422.     function GetPrivateProfileStructA(                  
  423.                 szSection  : Win32.LPCSTR;              
  424.                 szKey      : Win32.LPCSTR;              
  425.                 lpStruct   : Win32.LPBYTE;              
  426.                 uSizeStruct: Win32.UINT;                
  427.                 szFile     : Win32.LPCSTR)              
  428.                return Win32.BOOL;                           -- commctrl.h:430
  429.                                                         
  430.     function GetPrivateProfileStruct(                   
  431.                 szSection  : Win32.LPCSTR;              
  432.                 szKey      : Win32.LPCSTR;              
  433.                 lpStruct   : Win32.LPBYTE;              
  434.                 uSizeStruct: Win32.UINT;                
  435.                 szFile     : Win32.LPCSTR)              
  436.                return Win32.BOOL                        
  437.                renames GetPrivateProfileStructA;            -- commctrl.h:430
  438.                                                         
  439.     function GetPrivateProfileStructW(                  
  440.                 szSection  : Win32.LPCWSTR;             
  441.                 szKey      : Win32.LPCWSTR;             
  442.                 lpStruct   : Win32.LPBYTE;              
  443.                 uSizeStruct: Win32.UINT;                
  444.                 szFile     : Win32.LPCWSTR)             
  445.                return Win32.BOOL;                           -- commctrl.h:432
  446.                                                         
  447.     procedure MenuHelp(                                 
  448.                 iMessage  : Win32.WORD;                 
  449.                 wParam    : Win32.WPARAM;               
  450.                 lParam    : Win32.LPARAM;               
  451.                 hMainMenu : Win32.Windef.HMENU;         
  452.                 hInst     : Win32.Windef.HINSTANCE;     
  453.                 hwndStatus: Win32.Windef.HWND;          
  454.                 lpdwIDs   : Win32.LPDWORD);                 -- commctrl.h:441
  455.                                                         
  456.     function ShowHideMenuCtl(                           
  457.                 hWnd  : Win32.Windef.HWND;              
  458.                 uFlags: Win32.UINT;                     
  459.                 lpInfo: Win32.LPINT)                    
  460.                return Win32.BOOL;                           -- commctrl.h:444
  461.                                                         
  462.     procedure GetEffectiveClientRect(                   
  463.                 hWnd  : Win32.Windef.HWND;              
  464.                 lprc  : Win32.Windef.LPRECT;            
  465.                 lpInfo: Win32.LPINT);                       -- commctrl.h:446
  466.                                                         
  467.     function MakeDragList(                              
  468.                 hLB: Win32.Windef.HWND)                 
  469.                return Win32.BOOL;                           -- commctrl.h:798
  470.                                                         
  471.     function LBItemFromPt(                              
  472.                 hLB        : Win32.Windef.HWND;         
  473.                 pt         : Win32.Windef.POINT;        
  474.                 bAutoScroll: Win32.BOOL)                
  475.                return Win32.INT;                            -- commctrl.h:799
  476.                                                         
  477.     procedure DrawInsert(                               
  478.                 handParent: Win32.Windef.HWND;          
  479.                 hLB       : Win32.Windef.HWND;          
  480.                 nItem     : Win32.INT);                     -- commctrl.h:800
  481.  
  482.     function CreateUpDownControl(
  483.                 dwStyle: Win32.DWORD;
  484.                 x      : Win32.INT;
  485.                 y      : Win32.INT;
  486.                 cx     : Win32.INT;
  487.                 cy     : Win32.INT;
  488.                 hParent: Win32.Windef.HWND;
  489.                 nID    : Win32.INT;
  490.                 hInst  : Win32.Windef.HINSTANCE;
  491.                 hBuddy : Win32.Windef.HWND;
  492.                 nUpper : Win32.INT;
  493.                 nLower : Win32.INT;
  494.                 nPos   : Win32.INT)
  495.                return Win32.Windef.HWND;                    -- commctrl.h:966
  496.                                                         
  497.     procedure InitCommonControls;                           -- commctrl.h:1090
  498.  
  499. private
  500.  
  501.     pragma Convention(C, TBBUTTON);                         -- commctrl.h:44
  502.     pragma Convention(C, ADJUSTINFO);                       -- commctrl.h:62
  503.     pragma Convention(C, COLORMAP);                         -- commctrl.h:70
  504.     pragma Convention(C, CREATELISTBUTTONA);                -- commctrl.h:635
  505.     pragma Convention(C, CREATELISTBUTTONW);                -- commctrl.h:646
  506.     pragma Convention(C, DRAGLISTINFO);                     -- commctrl.h:781
  507.     pragma Convention(C, UDACCEL);                          -- commctrl.h:862
  508.  
  509.     pragma Import(Stdcall, CreateToolbar, "CreateToolbar");       -- commctrl.h:65
  510.     pragma Import(Stdcall, CreateMappedBitmap, "CreateMappedBitmap");
  511.                                                             -- commctrl.h:72
  512.     pragma Import(Stdcall, DrawStatusTextA, "DrawStatusTextA");   -- commctrl.h:187
  513.     pragma Import(Stdcall, DrawStatusTextW, "DrawStatusTextW");   -- commctrl.h:188
  514.     pragma Import(Stdcall, CreateStatusWindowA, "CreateStatusWindowA");
  515.                                                             -- commctrl.h:205
  516.     pragma Import(Stdcall, CreateStatusWindowW, "CreateStatusWindowW");
  517.                                                             -- commctrl.h:207
  518.     pragma Import(Stdcall, CreateHeaderWindowA, "CreateHeaderWindowA");
  519.                                                             -- commctrl.h:214
  520.     pragma Import(Stdcall, CreateHeaderWindowW, "CreateHeaderWindowW");
  521.                                                             -- commctrl.h:216
  522.     pragma Import(Stdcall, WritePrivateProfileStructA, "WritePrivateProfileStructA");
  523.                                                             -- commctrl.h:421
  524.     pragma Import(Stdcall, WritePrivateProfileStructW, "WritePrivateProfileStructW");
  525.                                                             -- commctrl.h:423
  526.     pragma Import(Stdcall, GetPrivateProfileStructA, "GetPrivateProfileStructA");
  527.                                                             -- commctrl.h:430
  528.     pragma Import(Stdcall, GetPrivateProfileStructW, "GetPrivateProfileStructW");
  529.                                                             -- commctrl.h:432
  530.     pragma Import(Stdcall, MenuHelp, "MenuHelp");                 -- commctrl.h:441
  531.     pragma Import(Stdcall, ShowHideMenuCtl, "ShowHideMenuCtl");   -- commctrl.h:444
  532.     pragma Import(Stdcall, GetEffectiveClientRect, "GetEffectiveClientRect");
  533.                                                             -- commctrl.h:446
  534.     pragma Import(Stdcall, MakeDragList, "MakeDragList");         -- commctrl.h:798
  535.     pragma Import(Stdcall, LBItemFromPt, "LBItemFromPt");         -- commctrl.h:799
  536.     pragma Import(Stdcall, DrawInsert, "DrawInsert");             -- commctrl.h:800
  537.     pragma Import(Stdcall, CreateUpDownControl, "CreateUpDownControl");
  538.                                                             -- commctrl.h:966
  539.     pragma Import(Stdcall, InitCommonControls, "InitCommonControls"); 
  540.                                                             -- commctrl.h:1090
  541.  
  542. -------------------------------------------------------------------------------
  543. --
  544. -- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
  545. -- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
  546. -- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
  547. -- FITNESS FOR A PARTICULAR PURPOSE.  The user assumes the entire risk as to
  548. -- the accuracy and the use of this file.  This file may be used, copied,
  549. -- modified and distributed only by licensees of Microsoft Corporation's
  550. -- WIN32 Software Development Kit in accordance with the terms of the 
  551. -- licensee's End-User License Agreement for Microsoft Software for the
  552. -- WIN32 Development Kit.
  553. --
  554. -- Copyright (c) Intermetrics, Inc. 1995
  555. -- Portions (c) 1985-1994 Microsoft Corporation with permission.
  556. -- Microsoft is a registered trademark and Windows and Windows NT are
  557. -- trademarks of Microsoft Corporation.
  558. --
  559. -------------------------------------------------------------------------------
  560.  
  561. end Win32.Commctrl;
  562.