Attribute VB_Name = "dwTypes" ' Desaware API Class library ' Copyright (c) 1995-1997 by Desaware Inc. ' All rights reserved Option Explicit #If Win32 Then Public Type RECT left As Long top As Long right As Long bottom As Long End Type #Else Public Type RECT left As Integer top As Integer right As Integer bottom As Integer End Type #End If 'WIN32 Types #If Win32 Then Type ACL AclRevision As Byte Sbz1 As Byte AclSize As Integer AceCount As Integer Sbz2 As Integer End Type Type SECURITY_DESCRIPTOR Revision As Byte Sbz1 As Byte Control As Long Owner As Long Group As Long Sacl As ACL Dacl As ACL End Type #End If