TDiskInfo - TDiskInfo
TInformationEditor - TInformationProperty
TInformationProperty - TSysInfo
TMemoryInfo - TVolInfo TMemoryInfo
TProcInfo -
TSysInfo - TMemoryInfo TSysInfo
TVersionInfo - TProcInfo TVersionInfo
TVolInfo -
Register - Assumed
Edit
TBoolMask
TFSFlag
TFSFlags
TInfoStr
TLanguage
TSpaceUnit
TUniqStr
DS_SIZES
INFO_STRS
PROCESSOR_ALPHA_21046
PROCESSOR_ARCHITECTURE_ALPHA
PROCESSOR_ARCHITECTURE_INTEL
PROCESSOR_ARCHITECTURE_MIPS
PROCESSOR_ARCHITECTURE_PPC
PROCESSOR_INTEL_386
PROCESSOR_INTEL_486
PROCESSOR_INTEL_PENTIUM
PROCESSOR_MIPS_R4000
UNIQ_STRS
VERSION_ID
procedure Register;
Assumed Edit
TBoolMask = array[0..31] of boolean;
TDiskInfo TProcInfo
TFSFlag = (ffCasePreserved, ffCaseSensitive, ffUnicodeStored,
ffFileCompression, ffCompressedVolume);
TVersionInfo TVolInfo
TFSFlags = set of TFSFlag
TInfoStr = (isVer32s, isVer9532, isVerNT, isUnknown, isArchBlocked, isModel,
isStepPass, isNoRoot, isRemovable, isFixed, isRemote, isCDRom,
isRamDisk, isByte, isKB, isMB);
TLanguage = (lgFrench, lgEnglish, lgItalian);
TSpaceUnit = (suByte, suKB, suMB);
TUniqStr = (usPAIntel, usPAMips, usPAAlpha, usPAPPC, usI386, usI486, usI586,
usR4000, usA21046, usK386, usK486, usK586, usK4000, usK21064,
usK21066, usK21164, usK601, usK603, usK604, usK603p, usK604p,
usK620);
DS_SIZES = (1, 1024, 1048576)
TInformationEditor
INFO_STRS = (
('Windows 3.1x avec Win32s','Windows 95 ou Win32',
'Windows NT','Introuvable','Introuvable car l''architecture est'+
' inconnue','Modèle','Passe','Racine inexistante','Amovible/'+
'Disquette','Fixe','Lecteur réseau','Lecteur CD-ROM','Disque '+
'RAM','octet(s)','Ko','Mo'
),
('Windows 3.1x with Win32s','Windows 95 or Win32',
'Windows NT','Unknown','Unknown because architecture is missing',
'Model','Pass','Inexistant root','Removable/Floppy','Fixed',
'Remote drive','CD-ROM drive','RAM Disk','byte(s)','Kb','Mb'
),
('Windows 3.1x con Win32s','Windows 95 o Win32',
'Windows NT','Sconosciuto','Architettura sconosciuta',
'Modello','Num.','Root inesistente','Rimovibile/Floppy','Fisso',
'Drive remoto','Drive CD','Disco RAM','byte(s)','Kb','Mb'
)
)
PROCESSOR_ALPHA_21046 = 21046
Assumed
PROCESSOR_ARCHITECTURE_ALPHA = 2
Assumed
PROCESSOR_ARCHITECTURE_INTEL = 0
PROCESSOR_ARCHITECTURE_MIPS = 1
PROCESSOR_ARCHITECTURE_PPC = 3
Assumed
PROCESSOR_INTEL_386 = 386
Assumed
PROCESSOR_INTEL_486 = 486
Assumed
PROCESSOR_INTEL_PENTIUM = 586
Assumed
PROCESSOR_MIPS_R4000 = 4000
UNIQ_STRS = (
'Intel','MIPS','Alpha','Power PC',
'Intel 386','Intel 486','Intel Pentium','MIPS R4000','Alpha 21046',
'386','486','Pentium','R4000','21064','21066','21164','601','603',
'604','603+','604+','620'
)
VERSION_ID = '1.4'
Renamed from SysInfo.pas 6/18/1998 Paul Rice to avoid conflicts with others' work.
Name: SysInfo.Pas
Project: TSysInfo component stuff
Version: 1.4
Coder: Christophe Porteneuve aka TDD
URL: http://www.epita.fr/~porten_c - E-mail: porten_c@epita.fr
Started: 12/15/96
Effici.: 12/15/96
Latest: 03/19/98
** USE THE APPROPRIATE DFM/PAS FILE FOR F_SysInf WITH IT! **