unit sysutils

Various system utilities

author: Tomasz Biela (Tebe)

http://www.freepascal.org/docs-html/rtl/sysutils/index-5.html

Constants:

name:	value:	description:
faReadOnly	$01
faHidden	$02
faSysFile	$04
faVolumeID	$08
faDirectory	$10
faArchive	$20
faAnyFile	$3f

Types:

name:	type:	description:
TSearchRec	record Attr: Byte; Name: TString; FindHandle: Pointer; end;

Interface:

name:	description:
Beep	procedure Beep; Sound the system bell
Click	procedure Click ; assembler; Sound the system click
GetTickCount	function GetTickCount: cardinal; assembler; Get tick count returns: 32bit tick count
FindFirst	function FindFirst (const FileMask: TString; Attributes: Byte; var SearchResult: TSearchRec): byte; Start a file search and return a findhandle parameters: FileMask: string[32] Attributes: Byte SearchResult: TSearchRec returns: =0 file matching the specified criteria is found
FindNext	function FindNext(var f: TSearchRec): byte; assembler; Find the next entry in a findhandle parameters: var f: TSearchRec returns: =0 record matching the criteria, successful
FindClose	procedure FindClose(var f: TSearchRec); assembler; Close a find handle parameters: var f: TSearchRec
RenameFile	function RenameFile(var OldName,NewName: TString): Boolean; assembler; Renames a file from OldName to NewName parameters: var OldName: string[32] var NewName: string[32] returns: TRUE - successful FALSE - I/O error
DeleteFile	function DeleteFile(var FileName: TString): Boolean; assembler; Delete a file from the filesystem parameters: var FileName: string[32] returns: TRUE - the file was successfully removed FALSE - I/O error
FileExists	function FileExists(name: TString): Boolean; Check whether a particular file exists in the filesystem parameters: name: string[32] returns: TRUE - file exists FALSE - file not exists
IntToStr	function IntToStr(a: integer): ^string; assembler; Convert an integer value to a decimal string parameters: a: integer returns: pointer to string
StrToInt	function StrToInt(const s: char): byte; assembler; overload; Convert a char to an byte value parameters: s: char returns: byte
StrToInt	function StrToInt(const s: TString): integer; assembler; overload; Convert a string to an integer value parameters: s: string[32] returns: integer (32bit)
IntToHex	function IntToHex(Value: cardinal; Digits: byte): TString; register; assembler; Convert an integer value to a hexadecimal string parameters: Value: cardinal (32bit) Digits - number of characters returns: string[32]
StrToFloat	function StrToFloat(var s: TString): real; Convert a string to a floating-point value parameters: var s: string[32] returns: real (Q24.8)
ExtractFileExt	function ExtractFileExt(const a: string): TString; Return the extension from a filename parameters: const a: string[255] returns: string[32]
ExtractFilePath	function ExtractFilePath(const a: string): string; Extract the path from a filename parameters: const a: string[255] returns: string[255]
AnsiUpperCase	function AnsiUpperCase(const a: string): string; Return an uppercase version of a string parameters: const a: string[255] returns: string[255]