Difference between revisions of "Unit Ultibo"

procedure UltiboInit;

function GetVersion:DWORD;

function GetVersionEx(lpVersionInformation:LPOSVERSIONINFOA):BOOL;

function GetVersionExA(lpVersionInformation:LPOSVERSIONINFOA):BOOL;

function GetVersionExW(lpVersionInformation:LPOSVERSIONINFOW):BOOL;

procedure GetSystemInfo(var lpSystemInfo:SYSTEM_INFO);

procedure GetNativeSystemInfo(lpSystemInfo:LPSYSTEM_INFO);

function GetLargePageMinimum:SIZE_T;

function GetComputerName(lpBuffer:LPSTR; var nSize:DWORD):BOOL;

function GetComputerNameA(lpBuffer:LPSTR; var nSize:DWORD):BOOL;

function GetComputerNameW(lpBuffer:LPWSTR; var nSize:DWORD):BOOL;

function SetComputerName(lpComputerName:LPCSTR):BOOL;

function SetComputerNameA(lpComputerName:LPCSTR):BOOL;

function SetComputerNameW(lpComputerName:LPCWSTR):BOOL;

function GetComputerNameEx(NameType:COMPUTER_NAME_FORMAT; lpBuffer:LPSTR; var nSize:DWORD):BOOL;

function GetComputerNameExA(NameType:COMPUTER_NAME_FORMAT; lpBuffer:LPSTR; var nSize:DWORD):BOOL;

function GetComputerNameExW(NameType:COMPUTER_NAME_FORMAT; lpBuffer:LPWSTR; var nSize:DWORD):BOOL;

function SetComputerNameEx(NameType:COMPUTER_NAME_FORMAT; lpBuffer:LPCSTR):BOOL;

function SetComputerNameExA(NameType:COMPUTER_NAME_FORMAT; lpBuffer:LPCSTR):BOOL;

function SetComputerNameExW(NameType:COMPUTER_NAME_FORMAT; lpBuffer:LPCWSTR):BOOL;

function ExitUltibo(dwReserved:DWORD; uReserved:UINT):BOOL;

function ExitUltiboEx(uFlags:UINT; dwReserved:DWORD):BOOL;

function RestartComputer(Delay:LongWord):Boolean;

function ShutdownComputer(Delay:LongWord):Boolean;

function Uptime:TFileTime;

function GetTickCount:DWORD;

function GetTickCount64:ULONGLONG;

procedure GetSystemTime(var lpSystemTime:SYSTEMTIME);

procedure GetSystemTimeAsFileTime(var lpSystemTimeAsFileTime:FILETIME);

function SetSystemTime(var lpSystemTime:SYSTEMTIME):BOOL;

procedure GetLocalTime(var lpSystemTime:SYSTEMTIME);

function SetLocalTime(var lpSystemTime:SYSTEMTIME):BOOL;

function SystemTimeToTzSpecificLocalTime(lpTimeZoneInformation:LPTIME_ZONE_INFORMATION; var lpUniversalTime,lpLocalTime:SYSTEMTIME):BOOL;

function TzSpecificLocalTimeToSystemTime(const lpTimeZoneInformation:TIME_ZONE_INFORMATION; const lpLocalTime:SYSTEMTIME; var lpUniversalTime:SYSTEMTIME):BOOL;

function GetTimeZoneInformation(var lpTimeZoneInformation:TIME_ZONE_INFORMATION):DWORD;

function SetTimeZoneInformation(const lpTimeZoneInformation:TIME_ZONE_INFORMATION):BOOL;

function SystemTimeToFileTime(const lpSystemTime:SYSTEMTIME; var lpFileTime:FILETIME):BOOL;

function FileTimeToSystemTime(const lpFileTime:FILETIME; var lpSystemTime:SYSTEMTIME):BOOL;

function FileTimeToLocalFileTime(const lpFileTime:FILETIME; var lpLocalFileTime:FILETIME):BOOL;

function LocalFileTimeToFileTime(const lpLocalFileTime:FILETIME; var lpFileTime:FILETIME):BOOL;

function CompareFileTime(const lpFileTime1,lpFileTime2:FILETIME):LONG;

function FileTimeToDosDateTime(const lpFileTime:FILETIME; var lpFatDate,lpFatTime:WORD):BOOL;

function DosDateTimeToFileTime(wFatDate,wFatTime:WORD; var lpFileTime:FILETIME):BOOL;

function GetCurrentTime:TFileTime;

procedure SetCurrentTime(const ATime:TFileTime);

function GetTimeAdjust:LongInt;

procedure SetTimeAdjust(AAdjust:LongInt);

function GetCurrentTimezone:String;

function SetCurrentTimezone(const AName:String):Boolean;

function GetTimezoneActiveOffset:LongInt;

function GetTimezoneStandardOffset:LongInt;

procedure SetTimezoneStandardOffset(AOffset:LongInt);

function GetTimezoneDaylightOffset:LongInt;

procedure SetTimezoneDaylightOffset(AOffset:LongInt);

function GetTimezoneStandardStart:String;

function GetTimezoneDaylightStart:String;

function GetTimezoneStandardDate:TDateTime;

function GetTimezoneDaylightDate:TDateTime;

function FileTimeToDateTime(const AFileTime:TFileTime):TDateTime;

function DateTimeToFileTime(ADateTime:TDateTime):TFileTime;

function LocalFileTimeToDateTime(const AFileTime:TFileTime):TDateTime;

function DateTimeToLocalFileTime(ADateTime:TDateTime):TFileTime;

function SystemFileTimeToDateTime(const AFileTime:TFileTime):TDateTime;

function DateTimeToSystemFileTime(ADateTime:TDateTime):TFileTime;

function FileTimeToUnixTime(const AFileTime:TFileTime):LongInt;

function UnixTimeToFileTime(AUnixTime:LongInt):TFileTime;

function UnixTimeToDateTime(AUnixTime:LongInt):TDateTime;

function DateTimeToUnixTime(ADateTime:TDateTime):LongInt;

function FileTimeToFileDate(const AFileTime:TFileTime):Integer;

function FileDateToFileTime(AFileDate:Integer):TFileTime;

function FileTimeToAdjustedTime(const AFileTime:TFileTime):TFileTime;

function AdjustedTimeToFileTime(const AFileTime:TFileTime):TFileTime;

function RoundFileTime(const AFileTime:TFileTime):TFileTime;

function ConvertFileTime(const AFileTime:TFileTime; AOffset:Integer; ALocal:Boolean):TFileTime;

function ConvertDateTime(ADateTime:TDateTime; AOffset:Integer; ALocal:Boolean):TDateTime;

function GetDiskType(lpRootPathName:LPCSTR):UINT;

function GetDriveTypeA(lpRootPathName:LPCSTR):UINT;

function GetDriveTypeW(lpRootPathName:LPCWSTR):UINT;

function GetLogicalDrives:DWORD;

function GetLogicalDriveStrings(nBufferLength:DWORD; lpBuffer:LPSTR):DWORD;

function GetLogicalDriveStringsA(nBufferLength:DWORD; lpBuffer:LPSTR):DWORD;

function GetLogicalDriveStringsW(nBufferLength:DWORD; lpBuffer:LPWSTR):DWORD;

function DefineDosDevice(dwFlags:DWORD; lpDeviceName,lpTargetPath:LPCSTR):BOOL;

function DefineDosDeviceA(dwFlags:DWORD; lpDeviceName,lpTargetPath:LPCSTR):BOOL;

function DefineDosDeviceW(dwFlags:DWORD; lpDeviceName,lpTargetPath:LPCWSTR):BOOL;

function QueryDosDevice(lpDeviceName,lpTargetPath:LPSTR; ucchMax:DWORD):DWORD;

function QueryDosDeviceA(lpDeviceName,lpTargetPath:LPSTR; ucchMax:DWORD):DWORD;

function QueryDosDeviceW(lpDeviceName,lpTargetPath:LPWSTR; ucchMax:DWORD):DWORD;

function SetVolumeLabel(lpRootPathName,lpVolumeName:LPCSTR):BOOL;

function SetVolumeLabelA(lpRootPathName,lpVolumeName:LPCSTR):BOOL;

function SetVolumeLabelW(lpRootPathName,lpVolumeName:LPCWSTR):BOOL;

function GetVolumeInformation(lpRootPathName:LPCSTR; lpVolumeNameBuffer:LPSTR; nVolumeNameSize:DWORD; lpVolumeSerialNumber:LPDWORD; var lpMaximumComponentLength,lpFileSystemFlags:DWORD; lpFileSystemNameBuffer:LPSTR; nFileSystemNameSize:DWORD):BOOL;

function GetVolumeInformationA(lpRootPathName:LPCSTR; lpVolumeNameBuffer:LPSTR; nVolumeNameSize:DWORD; lpVolumeSerialNumber:LPDWORD; var lpMaximumComponentLength,lpFileSystemFlags:DWORD;lpFileSystemNameBuffer:LPSTR; nFileSystemNameSize:DWORD):BOOL;

function GetVolumeInformationW(lpRootPathName:LPCWSTR; lpVolumeNameBuffer:LPWSTR; nVolumeNameSize:DWORD; lpVolumeSerialNumber:LPDWORD; var lpMaximumComponentLength,lpFileSystemFlags:DWORD;lpFileSystemNameBuffer:LPWSTR; nFileSystemNameSize:DWORD):BOOL;

function GetDiskFreeSpace(lpRootPathName:LPCSTR; var lpSectorsPerCluster,lpBytesPerSector,lpNumberOfFreeClusters,lpTotalNumberOfClusters:DWORD):BOOL;

function GetDiskFreeSpaceA(lpRootPathName:LPCSTR; var lpSectorsPerCluster,lpBytesPerSector,lpNumberOfFreeClusters,lpTotalNumberOfClusters:DWORD):BOOL;

function GetDiskFreeSpaceW(lpRootPathName:LPCWSTR; var lpSectorsPerCluster,lpBytesPerSector,lpNumberOfFreeClusters,lpTotalNumberOfClusters:DWORD):BOOL;

function GetDiskFreeSpaceEx(lpDirectoryName:LPCSTR; var lpFreeBytesAvailableToCaller,lpTotalNumberOfBytes:ULARGE_INTEGER; lpTotalNumberOfFreeBytes:PULARGE_INTEGER):BOOL;

function GetPathDrive(const APath:String):Byte;

function GetDriveType(ADrive:Byte):TDriveType;

function GetDriveData(ADrive:Byte):TDriveData;

function GetDriveAttr(ADrive:Byte):LongWord;

function GetDriveLabel(ADrive:Byte):String;

function SetDriveLabel(ADrive:Byte; const ALabel:String):Boolean;

function GetDriveSerial(ADrive:Byte):LongWord;

function SetDriveSerial(ADrive:Byte; ASerial:LongWord):Boolean;

function IsDriveValid(ADrive:Byte):Boolean;

function GetValidDrives:LongWord;

function GetValidDriveNames:String;

function GetDriveFreeSpace(ADrive:Byte):LongWord;

function GetDriveFreeSpaceEx(ADrive:Byte):Int64;

function GetDriveTotalSpace(ADrive:Byte):LongWord;

function GetDriveTotalSpaceEx(ADrive:Byte):Int64;

function GetCurrentDrive:Byte;

function SetCurrentDrive(const ADrive:String):Boolean;

function AreFileApisANSI:BOOL;

procedure SetFileApisToOEM;

procedure SetFileApisToANSI;

function CreateFile(lpFileName:LPCSTR; dwDesiredAccess,dwShareMode:DWORD; lpSecurityAttributes:LPSECURITY_ATTRIBUTES; dwCreationDisposition:DWORD; dwFlagsAndAttributes:DWORD; hTemplateFile:HANDLE):HANDLE;

function CreateFileA(lpFileName:LPCSTR; dwDesiredAccess,dwShareMode:DWORD; lpSecurityAttributes:LPSECURITY_ATTRIBUTES; dwCreationDisposition:DWORD; dwFlagsAndAttributes:DWORD; hTemplateFile:HANDLE):HANDLE;

function CreateFileW(lpFileName:LPCWSTR; dwDesiredAccess,dwShareMode:DWORD; lpSecurityAttributes:LPSECURITY_ATTRIBUTES; dwCreationDisposition:DWORD; dwFlagsAndAttributes:DWORD; hTemplateFile:HANDLE):HANDLE;

function SetFileAttributes(lpFileName:LPCSTR; dwFileAttributes:DWORD):BOOL;

function SetFileAttributesA(lpFileName:LPCSTR; dwFileAttributes:DWORD):BOOL;

function SetFileAttributesW(lpFileName:LPCWSTR; dwFileAttributes:DWORD):BOOL;

function GetFileAttributes(lpFileName:LPCSTR):DWORD;

function GetFileAttributesA(lpFileName:LPCSTR):DWORD;

function GetFileAttributesW(lpFileName:LPCWSTR):DWORD;

function DeleteFile(lpFileName:LPCSTR):BOOL;

function DeleteFileA(lpFileName:LPCSTR):BOOL;

function DeleteFileW(lpFileName:LPCWSTR):BOOL;

function MoveFile(lpExistingFileName,lpNewFileName:LPCSTR):BOOL;

function MoveFileA(lpExistingFileName,lpNewFileName:LPCSTR):BOOL;

function MoveFileW(lpExistingFileName,lpNewFileName:LPCWSTR):BOOL;

function FindFirstFile(lpFileName:LPCSTR; var lpFindFileData:WIN32_FIND_DATAA):HANDLE;

function FindFirstFileA(lpFileName:LPCSTR; var lpFindFileData:WIN32_FIND_DATAA):HANDLE;

function FindFirstFileW(lpFileName:LPCWSTR; var lpFindFileData:WIN32_FIND_DATAW):HANDLE;

function FindNextFile(hFindFile:HANDLE; var lpFindFileData:WIN32_FIND_DATAA):BOOL;

function FindNextFileA(hFindFile:HANDLE; var lpFindFileData:WIN32_FIND_DATAA):BOOL;

function FindNextFileW(hFindFile:HANDLE; var lpFindFileData:WIN32_FIND_DATAW):BOOL;

function FindCloseFile(hFindFile:HANDLE):BOOL;

function GetFileSize(hFile:HANDLE;lpFileSizeHigh:LPDWORD):DWORD;

function GetFileSizeEx(hFile:HANDLE; var lpFileSize:LARGE_INTEGER):BOOL;

function GetFileTime(hFile:HANDLE; lpCreationTime,lpLastAccessTime,lpLastWriteTime:PFILETIME):BOOL;

function SetFileTime(hFile:HANDLE; lpCreationTime,lpLastAccessTime,lpLastWriteTime:PFILETIME):BOOL;

function ReadFile(hFile:HANDLE; lpBuffer:LPVOID; nNumberOfBytesToRead:DWORD; lpNumberOfBytesRead:LPDWORD; lpOverlapped:LPOVERLAPPED):BOOL;

function WriteFile(hFile:HANDLE; lpBuffer:LPCVOID; nNumberOfBytesToWrite:DWORD; lpNumberOfBytesWritten:LPDWORD; lpOverlapped:LPOVERLAPPED):BOOL;

function SetEndOfFile(hFile:HANDLE):BOOL;

function SetFilePointer(hFile:HANDLE; lDistanceToMove:LONG; lpDistanceToMoveHigh:PLONG; dwMoveMethod:DWORD):DWORD;

function SetFilePointerEx(hFile:HANDLE; liDistanceToMove:LARGE_INTEGER; lpNewFilePointer:PLARGE_INTEGER; dwMoveMethod:DWORD):BOOL;

function FlushFileBuffers(hFile:HANDLE):BOOL;

function CopyFile(lpExistingFileName,lpNewFileName:LPCSTR; bFailIfExists:BOOL):BOOL;

function CopyFileA(lpExistingFileName,lpNewFileName:LPCSTR; bFailIfExists:BOOL):BOOL;

function CopyFileW(lpExistingFileName,lpNewFileName:LPCWSTR; bFailIfExists:BOOL):BOOL;

function SetFileShortName(hFile:HANDLE; lpShortName:LPCSTR):BOOL;

function SetFileShortNameA(hFile:HANDLE; lpShortName:LPCSTR):BOOL;

function SetFileShortNameW(hFile:HANDLE; lpShortName:LPCWSTR):BOOL;

function CreateHardLink(lpFileName,lpExistingFileName:LPCSTR; lpSecurityAttributes:LPSECURITY_ATTRIBUTES):BOOL;

function CreateHardLinkA(lpFileName,lpExistingFileName:LPCSTR; lpSecurityAttributes:LPSECURITY_ATTRIBUTES):BOOL;

function CreateHardLinkW(lpFileName,lpExistingFileName:LPCWSTR; lpSecurityAttributes:LPSECURITY_ATTRIBUTES):BOOL;

function CreateSymbolicLink(lpSymlinkFileName,lpTargetFileName:LPCSTR; dwFlags:DWORD):BOOL;

function CreateSymbolicLinkA(lpSymlinkFileName,lpTargetFileName:LPCSTR; dwFlags:DWORD):BOOL;

function CreateSymbolicLinkW(lpSymlinkFileName,lpTargetFileName:LPCWSTR; dwFlags:DWORD):BOOL;

function CreateDirectory(lpPathName:LPCSTR; lpSecurityAttributes:LPSECURITY_ATTRIBUTES):BOOL;

function CreateDirectoryA(lpPathName:LPCSTR; lpSecurityAttributes:LPSECURITY_ATTRIBUTES):BOOL;

function CreateDirectoryW(lpPathName:LPCWSTR; lpSecurityAttributes:LPSECURITY_ATTRIBUTES):BOOL;

function RemoveDirectory(lpPathName:LPCSTR):BOOL;

function RemoveDirectoryA(lpPathName:LPCSTR):BOOL;

function RemoveDirectoryW(lpPathName:LPCWSTR):BOOL;

function SetCurrentDirectory(lpPathName:LPCSTR):BOOL;

function SetCurrentDirectoryA(lpPathName:LPCSTR):BOOL;

function SetCurrentDirectoryW(lpPathName:LPCWSTR):BOOL;

function GetCurrentDirectory(nBufferLength:DWORD; lpBuffer:LPSTR):DWORD;

function GetCurrentDirectoryA(nBufferLength:DWORD; lpBuffer:LPSTR):DWORD;

function GetCurrentDirectoryW(nBufferLength:DWORD; lpBuffer:LPWSTR):DWORD;

function GetLongPathName(lpszShortPath:LPCSTR; lpszLongPath:LPSTR; cchBuffer:DWORD):DWORD;

function GetLongPathNameA(lpszShortPath:LPCSTR; lpszLongPath:LPSTR; cchBuffer:DWORD):DWORD;

function GetLongPathNameW(lpszShortPath:LPCWSTR; lpszLongPath:LPWSTR; cchBuffer:DWORD):DWORD;

function GetShortPathName(lpszLongPath:LPCSTR; lpszShortPath:LPSTR; cchBuffer:DWORD):DWORD;

function GetShortPathNameA(lpszLongPath:LPCSTR; lpszShortPath:LPSTR; cchBuffer:DWORD):DWORD;

function GetShortPathNameW(lpszLongPath:LPCWSTR; lpszShortPath:LPWSTR; cchBuffer:DWORD):DWORD;

function GetFullPathName(lpFileName:LPCSTR; nBufferLength:DWORD; lpBuffer:LPSTR; var lpFilePart:LPSTR):DWORD;

function GetFullPathNameA(lpFileName:LPCSTR; nBufferLength:DWORD; lpBuffer:LPSTR; var lpFilePart:LPSTR):DWORD;

function GetFullPathNameW(lpFileName:LPCWSTR; nBufferLength:DWORD; lpBuffer:LPWSTR; var lpFilePart:LPWSTR):DWORD;

function SysParamCount:LongInt;

function SysParamStr(Index:LongInt):String;

function GetCommandLine:LPSTR;

function GetCommandLineA:LPSTR;

function GetCommandLineW:LPWSTR;

function IsParamPresent(const AParam:String):Boolean;

function GetParamIndex(const AParam:String):Integer;

function GetParamValue(const AParam:String):String;

function GetEnvironmentStrings:LPSTR;

function GetEnvironmentStringsA:LPSTR;

function GetEnvironmentStringsW:LPWSTR;

function FreeEnvironmentStrings(pstr:LPSTR):BOOL;

function FreeEnvironmentStringsA(pstr:LPSTR):BOOL;

function FreeEnvironmentStringsW(pstr:LPWSTR):BOOL;

function GetEnvironmentVariable(lpName:LPCSTR; lpBuffer:LPSTR; nSize:DWORD):DWORD;

function GetEnvironmentVariableA(lpName:LPCSTR; lpBuffer:LPSTR; nSize:DWORD):DWORD;

function GetEnvironmentVariableW(lpName:LPCWSTR; lpBuffer:LPWSTR; nSize:DWORD):DWORD;

function SetEnvironmentVariable(lpName,lpValue:LPCSTR):BOOL;

function SetEnvironmentVariableA(lpName,lpValue:LPCSTR):BOOL;

function SetEnvironmentVariableW(lpName,lpValue:LPCWSTR):BOOL;

function ExpandEnvironmentStrings(lpSrc:LPCSTR; lpDst:LPSTR; nSize:DWORD):DWORD;

function ExpandEnvironmentStringsA(lpSrc:LPCSTR; lpDst:LPSTR; nSize:DWORD):DWORD;

function ExpandEnvironmentStringsW(lpSrc:LPCWSTR; lpDst:LPWSTR; nSize:DWORD):DWORD;