home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / win32-lmconfig.ads < prev    next >
Encoding:
Text File  |  1996-03-15  |  3.0 KB  |  71 lines
  1. -- $Source: /home/harp/1/proto/monoBANK/winnt/win32-lmconfig.ads,v $ 
  2. -- $Revision: 1.10 $ $Date: 96/03/15 12:52:44 $ $Author: stm $ 
  3. -- See end of file for Copyright (c) information.
  4.  
  5. with Win32.Winnt;
  6.  
  7. package Win32.Lmconfig is
  8.  
  9.     type CONFIG_INFO_0;                                     -- lmconfig.h:95
  10.  
  11.     type PCONFIG_INFO_0 is access all CONFIG_INFO_0;        -- lmconfig.h:98
  12.     subtype LPCONFIG_INFO_0 is PCONFIG_INFO_0;              -- lmconfig.h:98
  13.  
  14.     type CONFIG_INFO_0 is                                   -- lmconfig.h:95
  15.         record
  16.             cfgi0_key : Win32.Winnt.LPTSTR;                 -- lmconfig.h:96
  17.             cfgi0_data: Win32.Winnt.LPTSTR;                 -- lmconfig.h:97
  18.         end record;
  19.  
  20.     function NetConfigGet(
  21.                 server   : Win32.Winnt.LPTSTR;
  22.                 component: Win32.Winnt.LPTSTR;
  23.                 parameter: Win32.Winnt.LPTSTR;
  24.                 bufptr   : access Win32.PBYTE)
  25.                return Win32.DWORD;                          -- lmconfig.h:55
  26.  
  27.     function NetConfigGetAll(
  28.                 server   : Win32.Winnt.LPTSTR;
  29.                 component: Win32.Winnt.LPTSTR;
  30.                 bufptr   : access Win32.PBYTE)
  31.                return Win32.DWORD;                          -- lmconfig.h:68
  32.  
  33.     function NetConfigSet(
  34.                 server   : Win32.Winnt.LPTSTR;
  35.                 reserved1: Win32.Winnt.LPTSTR;
  36.                 component: Win32.Winnt.LPTSTR;
  37.                 level    : Win32.DWORD;
  38.                 reserved2: Win32.DWORD;
  39.                 buf      : Win32.LPBYTE;
  40.                 reserved3: Win32.DWORD)
  41.                return Win32.DWORD;                          -- lmconfig.h:81
  42.  
  43. private
  44.  
  45.     pragma Convention(C, CONFIG_INFO_0);                    -- lmconfig.h:95
  46.  
  47.     pragma Import(Stdcall, NetConfigGet, "NetConfigGet");         -- lmconfig.h:55
  48.     pragma Import(Stdcall, NetConfigGetAll, "NetConfigGetAll");   -- lmconfig.h:68
  49.     pragma Import(Stdcall, NetConfigSet, "NetConfigSet");         -- lmconfig.h:81
  50.  
  51. -------------------------------------------------------------------------------
  52. --
  53. -- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
  54. -- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
  55. -- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
  56. -- FITNESS FOR A PARTICULAR PURPOSE.  The user assumes the entire risk as to
  57. -- the accuracy and the use of this file.  This file may be used, copied,
  58. -- modified and distributed only by licensees of Microsoft Corporation's
  59. -- WIN32 Software Development Kit in accordance with the terms of the 
  60. -- licensee's End-User License Agreement for Microsoft Software for the
  61. -- WIN32 Development Kit.
  62. --
  63. -- Copyright (c) Intermetrics, Inc. 1995
  64. -- Portions (c) 1985-1994 Microsoft Corporation with permission.
  65. -- Microsoft is a registered trademark and Windows and Windows NT are
  66. -- trademarks of Microsoft Corporation.
  67. --
  68. -------------------------------------------------------------------------------
  69.  
  70. end Win32.Lmconfig;
  71.