longfile
pFILETIME
PROCESS_INFORMATION
pWIN32_FIND_DATA
tFILETIME
tStartupInfo
tSYSTEMTIME
WIN32_FIND_DATA
ACCESS_SYSTEM_SECURITY
CREATE_ALWAYS
CREATE_NEW
FILE_ATTRIBUTE_ARCHIVE
FILE_ATTRIBUTE_ATOMICWRITE
FILE_ATTRIBUTE_DIRECTORY
FILE_ATTRIBUTE_HIDDEN
FILE_ATTRIBUTE_NORMAL
FILE_ATTRIBUTE_READONLY
FILE_ATTRIBUTE_SYSTEM
FILE_ATTRIBUTE_TEMPORARY
FILE_ATTRIBUTE_XACTIONWRITE
FILE_CASE_PRESERVED_NAMES
FILE_CASE_SENSITIVE_SEARCH
FILE_FILE_COMPRESSION
FILE_FLAG_BACKUP_SEMANTICS
FILE_FLAG_DELETE_ON_CLOSE
FILE_FLAG_NO_BUFFERING
FILE_FLAG_OVERLAPPED
FILE_FLAG_POSIX_SEMANTICS
FILE_FLAG_RANDOM_ACCESS
FILE_FLAG_SEQUENTIAL_SCAN
FILE_FLAG_WRITE_THROUGH
FILE_NOTIFY_CHANGE_ATTRIBUTES
FILE_NOTIFY_CHANGE_DIR_NAME
FILE_NOTIFY_CHANGE_FILE_NAME
FILE_NOTIFY_CHANGE_LAST_WRITE
FILE_NOTIFY_CHANGE_SECURITY
FILE_NOTIFY_CHANGE_SIZE
FILE_PERSISTENT_ACLS
FILE_SHARE_READ
FILE_SHARE_WRITE
FILE_UNICODE_ON_DISK
FILE_VOLUME_IS_COMPRESSED
GENERIC_ALL
GENERIC_EXECUTE
GENERIC_READ
GENERIC_WRITE
INVALID_HANDLE_VALUE
MAXIMUM_ALLOWED
MAX_PATH
OPEN_ALWAYS
OPEN_EXISTING
READ_CONTROL
SPECIFIC_RIGHTS_ALL
STANDARD_RIGHTS_ALL
STANDARD_RIGHTS_EXECUTE
STANDARD_RIGHTS_READ
STANDARD_RIGHTS_REQUIRED
STANDARD_RIGHTS_WRITE
SYNCHRONIZE
TRUNCATE_EXISTING
WRITE_DAC
WRITE_OWNER
_DELETE
id_W32CloseHandle
id_W32CreateDirectory
id_W32CreateFile
id_W32CreateProcess
id_W32Deletefile
id_W32DosDateTimeToFileTime
id_W32FileTimeToDosDateTime
id_W32FileTimeToLocalFileTime
id_W32FileTimeToSystemTime
id_W32FindClose
id_W32FindFirstFile
id_W32FindNextFile
id_W32FlushFileBuffers
id_W32GetCurrentDirectory
id_W32GetFileAttributes
id_W32GetFileTime
id_W32GetLastError
id_W32LocalFileTimeToFileTime
id_W32MoveFile
id_W32ReadFile
id_W32RemoveDirectory
id_W32SetCurrentDirectory
id_W32SetFileAttributes
id_W32SetFilePointer
id_W32SetFileTime
id_W32ShellExecute
id_W32SystemTimeToFileTime
id_W32WaitForSingleObject
id_W32WriteFile
W32CloseHandle
W32CreateDirectory
W32CreateFile
W32CreateProcess
W32Deletefile
W32DosDateTimeToFileTime
W32FileTimeToDosDateTime
W32FileTimeToLocalFileTime
W32FileTimeToSystemTime
W32FindClose
W32FindFirstFile
W32FindNextFile
W32FlushFileBuffers
W32GetCurrentDirectory
W32GetFileAttributes
W32GetFileTime
W32GetLastError
W32LocalFileTimeToFileTime
W32MoveFile
W32ReadFile
W32RemoveDirectory
W32SetCurrentDirectory
W32SetFileAttributes
W32SetFilePointer
W32SetFileTime
W32ShellExecute
W32SystemTimeToFileTime
W32WaitForSingleObject
W32WriteFile
longfile=longint
pFILETIME = ^tFILETIME
PROCESS_INFORMATION = record
hProcess : longint;
hThread : longint;
dwProcessId : longint;
dwThreadId : longint;
end;
pWIN32_FIND_DATA=^WIN32_FIND_DATA
tFILETIME = record
dwLowDateTime : longint;
dwHighDateTime : longint;
end;
tStartupInfo = record
cb : longint;
lpReserved : pchar;
lpDesktop : pchar;
lpTitle : pchar;
dwX : longint;
dwY : longint;
dwXSize : longint;
dwYSize : longint;
dwXCountChars : longint;
dwYCountChars : longint;
dwFillAttribute : longint;
dwFlags : longint;
wShowWindow : word;
cbReserved2 : word;
lpReserved2 : ^byte;
hStdInput : longint;
hStdOutput : longint;
hStdError : longint;
end;
tSYSTEMTIME = record
Year : word;
Month : word;
DayOfWeek : word;
Day : word;
Hour : word;
Min : word;
Sec : word;
Milliseconds : word;
end;
WIN32_FIND_DATA = record
dwFileAttributes : longint;
ftCreationTime : TFileTime;
ftLastAccessTime : TFileTime;
ftLastWriteTime : TFileTime;
nFileSizeHigh : longint;
nFileSizeLow : longint;
dwReserved0 : longint;
dwReserved1 : longint;
cFileName : array[0..MAX_PATH - 1] of Char;
cAlternateFileName : array[0..13] of Char;
end;
WIN32_FIND_DATA structure:
ACCESS_SYSTEM_SECURITY = $01000000
CREATE_ALWAYS = 2
CREATE_NEW = 1
FILE_ATTRIBUTE_ARCHIVE = $00000020
FILE_ATTRIBUTE_ATOMICWRITE = $00000200
FILE_ATTRIBUTE_DIRECTORY = $00000010
FILE_ATTRIBUTE_HIDDEN = $00000002
FILE_ATTRIBUTE_NORMAL = $00000080
FILE_ATTRIBUTE_READONLY = $00000001
FILE_ATTRIBUTE_SYSTEM = $00000004
FILE_ATTRIBUTE_TEMPORARY = $00000100
FILE_ATTRIBUTE_XACTIONWRITE = $00000400
FILE_CASE_PRESERVED_NAMES = 2
FILE_CASE_SENSITIVE_SEARCH = 1
FILE_FILE_COMPRESSION = $10
FILE_FLAG_BACKUP_SEMANTICS = $2000000
FILE_FLAG_DELETE_ON_CLOSE = $4000000
FILE_FLAG_NO_BUFFERING = $20000000
FILE_FLAG_OVERLAPPED = $40000000
FILE_FLAG_POSIX_SEMANTICS = $1000000
FILE_FLAG_RANDOM_ACCESS = $10000000
FILE_FLAG_SEQUENTIAL_SCAN = $8000000
FILE_FLAG_WRITE_THROUGH = $80000000
File creation flags must start at the high end since they } { are combined with the attributes
FILE_NOTIFY_CHANGE_ATTRIBUTES = $00000004
FILE_NOTIFY_CHANGE_DIR_NAME = $00000002
FILE_NOTIFY_CHANGE_FILE_NAME = $00000001
FILE_NOTIFY_CHANGE_LAST_WRITE = $00000010
FILE_NOTIFY_CHANGE_SECURITY = $00000100
FILE_NOTIFY_CHANGE_SIZE = $00000008
FILE_PERSISTENT_ACLS = 8
FILE_SHARE_READ = $00000001
Copied from Delphi 2 Windows.pas
FILE_SHARE_WRITE = $00000002
FILE_UNICODE_ON_DISK = 4
FILE_VOLUME_IS_COMPRESSED = $8000
GENERIC_ALL = $10000000
GENERIC_EXECUTE = $20000000
GENERIC_READ = $80000000
GENERIC_WRITE = $40000000
INVALID_HANDLE_VALUE = -1
MAXIMUM_ALLOWED = $02000000
MAX_PATH = 260
Copied from Delphi 2 Windows.pas
OPEN_ALWAYS = 4
OPEN_EXISTING = 3
READ_CONTROL = $00020000
Renamed from DELETE
SPECIFIC_RIGHTS_ALL = $0000FFFF
STANDARD_RIGHTS_ALL = $001F0000
STANDARD_RIGHTS_EXECUTE = READ_CONTROL
STANDARD_RIGHTS_READ = READ_CONTROL
STANDARD_RIGHTS_REQUIRED = $000F0000
STANDARD_RIGHTS_WRITE = READ_CONTROL
SYNCHRONIZE = $00100000
TRUNCATE_EXISTING = 5
WRITE_DAC = $00040000
WRITE_OWNER = $00080000
_DELETE = $00010000
The following are masks for the predefined standard access types; copied from Delphi 2 Windows.Pas
id_W32CloseHandle : longint
id_W32CreateDirectory : longint
id_W32CreateFile : longint
id_W32CreateProcess : longint
id_W32Deletefile : longint
id_W32DosDateTimeToFileTime : longint
Added 13Aug97 - BAL
id_W32FileTimeToDosDateTime : longint
id_W32FileTimeToLocalFileTime : longint
id_W32FileTimeToSystemTime : longint
id_W32FindClose : longint
id_W32FindFirstFile : longint
id_W32FindNextFile : longint
id_W32FlushFileBuffers : longint
id_W32GetCurrentDirectory : longint
Added 13Aug97 - BAL
id_W32GetFileAttributes : longint
id_W32GetFileTime : longint
id_W32GetLastError : longint
id_W32LocalFileTimeToFileTime : longint
id_W32MoveFile : longint
id_W32ReadFile : longint
id_W32RemoveDirectory : longint
id_W32SetCurrentDirectory : longint
id_W32SetFileAttributes : longint
id_W32SetFilePointer : longint
id_W32SetFileTime : longint
id_W32ShellExecute : longint
id_W32SystemTimeToFileTime : longint
id_W32WaitForSingleObject : longint
id_W32WriteFile : longint
W32CloseHandle : function(hfile,id: longint): longbool
W32CreateDirectory : function(path: pchar; security: pointer; id: longint): longbool
W32CreateFile : function(lpszName: pchar; fdwAccess, fdwShareMode: longint; lpsa: pointer;
fdwCreate, fdwAttrsAndFlags, hTemplateFile,id: longint): longint
W32CreateProcess : function(lpszImageName,lpszCommandLine: pchar; lpsaProcess,lpsaThread: pointer;
fInheritHandles: longbool; fdwCreate: longint; lpvEnvironment: pointer; lpszCurDir: pchar; var lpsiStartInfo: tstartupinfo;
var lppiProcInfo: PROCESS_INFORMATION; id: longint): longbool
W32Deletefile : function(path: pchar; id: longint): longbool
W32DosDateTimeToFileTime : function(wFatDate, wFatTime: Word; lpFileTime: pFILETIME; id: longint): longbool
W32FileTimeToDosDateTime : function(var lpfiletime: tFILETIME; var lpFatDate, lpFatTime: word; id: longint): longbool
Next 2 added 13Aug97 - BAL
W32FileTimeToLocalFileTime : function(var lpft, lpftlocal: tFILETIME; id: longint): longbool
W32FileTimeToSystemTime : function(var lpft: tFILETIME; var lpst: tsystemtime; id: longint): longbool
W32FindClose : function(hFindFile: longint; id: longint): Longbool
W32FindFirstFile : function(lpszSearchFile: pchar; var lpffd: WIN32_FIND_DATA; id: longint): longint
W32FindNextFile : function(hFindFile: longint; var lpffd: WIN32_FIND_DATA; id: longint): longbool
W32FlushFileBuffers : function(hfile,id: longint): longbool
W32GetCurrentDirectory : function(cchCurDir: longint; lpszCurDir: pchar; id: longint): longint
W32GetFileAttributes : function(path: pchar; id: longint): longint
W32GetFileTime : function(hFile: longint; lpftCreation,lpftLastAccess,lpftLastWrite: pfiletime;
id: longint): longbool
W32GetLastError : function(id: longint): longint
W32LocalFileTimeToFileTime : function(var lpftlocal, lpft: tFILETIME; id: longint): longbool
W32MoveFile : function(lpszExisting, lpszNew: pchar; id: longint): longbool
W32ReadFile : function(hFile: longint; var lpBuffer; nNumberOfBytesToRead: longint;
var lpNumberOfBytesRead: longint; lpOverlapped: pointer; id: longint): longbool
W32RemoveDirectory : function(path: pchar; id: longint): longbool
W32SetCurrentDirectory : function(lpszCurDir: pchar; id: longint): longbool
W32SetFileAttributes : function(path: pchar; attr,id: longint): longbool
W32SetFilePointer : function(hFile,lDistanceToMove: longint; lpDistanceToMoveHigh: pointer;
dwMoveMethod,id: longint): longint
W32SetFileTime : function(hFile: longint; lpftCreation,lpftLastAccess,lpftLastWrite: pfiletime;
id: longint): longbool
W32ShellExecute : function(hwnd: longint; lpszOp,lpszFile,lpszParams,lpszDir: pchar; wShowCmd,id: longint): longint
W32SystemTimeToFileTime : function(var lpst: tsystemtime; var lpft: tFILETIME; id: longint): longbool
W32WaitForSingleObject : function(hObject,dwTimeout,id: longint): longint
W32WriteFile : function(hFile: longint; var lpBuffer; nNumberOfBytesToWrite: longint;
var lpNumberOfBytesWritten: longint; lpOverlapped: pointer; id: longint): longbool