-- $Source: /home/harp/1/proto/monoBANK/winnt/win32-cpl.ads,v $
-- $Revision: 1.12 $ $Date: 96/09/04 08:02:06 $ $Author: mg $
-- See end of file for Copyright (c) information.
with Win32.Windef;
package Win32.Cpl is
WM_CPL_LAUNCH : constant := 16#7e8#; -- cpl.h:63
WM_CPL_LAUNCHED : constant := 16#7e9#; -- cpl.h:64
CPL_INIT : constant := 1; -- cpl.h:118
CPL_GETCOUNT : constant := 2; -- cpl.h:124
CPL_INQUIRE : constant := 3; -- cpl.h:131
CPL_SELECT : constant := 4; -- cpl.h:140
CPL_DBLCLK : constant := 5; -- cpl.h:146
CPL_STOP : constant := 6; -- cpl.h:153
CPL_EXIT : constant := 7; -- cpl.h:159
CPL_NEWINQUIRE : constant := 8; -- cpl.h:165
CPL_DO_PRINTER_SETUP : constant := 100; -- cpl.h:170
CPL_DO_NETPRN_SETUP : constant := 101; -- cpl.h:171
CPL_SETUP : constant := 200; -- cpl.h:176
type CPLINFO; -- cpl.h:73
type NEWCPLINFOA; -- cpl.h:81
type NEWCPLINFOW; -- cpl.h:93
type LPCPLINFO is access all CPLINFO; -- cpl.h:79
type LPNEWCPLINFOA is access all NEWCPLINFOA; -- cpl.h:111
type LPNEWCPLINFOW is access all NEWCPLINFOW; -- cpl.h:112
subtype LPNEWCPLINFO is LPNEWCPLINFOA; -- cpl.h:113
type APPLET_PROC is access function (
hwndCpl: Win32.Windef.HWND;
msg : Win32.UINT;
lParam1: Win32.LONG;
lParam2: Win32.LONG)
return Win32.LONG; -- cpl.h:69
pragma Convention(Stdcall, APPLET_PROC);
type CPLINFO is -- cpl.h:73
record
idIcon: Win32.INT; -- cpl.h:75
idName: Win32.INT; -- cpl.h:76
idInfo: Win32.INT; -- cpl.h:77
lData : Win32.LONG; -- cpl.h:78
end record;
type NEWCPLINFOA is -- cpl.h:81
record
dwSize : Win32.DWORD; -- cpl.h:83
dwFlags : Win32.DWORD; -- cpl.h:84
dwHelpContext: Win32.DWORD; -- cpl.h:85
lData : Win32.LONG; -- cpl.h:86
hIcon : Win32.Windef.HICON; -- cpl.h:87
szName : Win32.CHAR_Array(0..31); -- cpl.h:88
szInfo : Win32.CHAR_Array(0..63); -- cpl.h:89
szHelpFile : Win32.CHAR_Array(0..127); -- cpl.h:90
end record;
subtype NEWCPLINFO is NEWCPLINFOA; -- cpl.h:108
type NEWCPLINFOW is -- cpl.h:93
record
dwSize : Win32.DWORD; -- cpl.h:95
dwFlags : Win32.DWORD; -- cpl.h:96
dwHelpContext: Win32.DWORD; -- cpl.h:97
lData : Win32.LONG; -- cpl.h:98
hIcon : Win32.Windef.HICON; -- cpl.h:99
szName : Win32.WCHAR_Array(0..31); -- cpl.h:100
szInfo : Win32.WCHAR_Array(0..63); -- cpl.h:101
szHelpFile : Win32.WCHAR_Array(0..127); -- cpl.h:102
end record;
private
pragma Convention(C, CPLINFO); -- cpl.h:73
pragma Convention(C, NEWCPLINFOA); -- cpl.h:81
pragma Convention(C, NEWCPLINFOW); -- cpl.h:93
-------------------------------------------------------------------------------
--
-- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
-- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
-- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
-- FITNESS FOR A PARTICULAR PURPOSE. The user assumes the entire risk as to
-- the accuracy and the use of this file. This file may be used, copied,
-- modified and distributed only by licensees of Microsoft Corporation's
-- WIN32 Software Development Kit in accordance with the terms of the
-- licensee's End-User License Agreement for Microsoft Software for the
-- WIN32 Development Kit.
--
-- Copyright (c) Intermetrics, Inc. 1995
-- Portions (c) 1985-1994 Microsoft Corporation with permission.
-- Microsoft is a registered trademark and Windows and Windows NT are
-- trademarks of Microsoft Corporation.
--
-------------------------------------------------------------------------------
end Win32.Cpl;