Class TSystemInfo (unit SystemInfo)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);

Protected declarations


Functions

procedure GetComputer;

getosversion must be called before getreginfo

procedure GetDirectories;


procedure GetOSVersion;

of try

procedure GetRegInfo;

of try

procedure GetUser;


Properties

property ComputerName : String

Published declarations

property OSPlatform : String


property OSVersion : String


property RegCompany : String


property RegOwner : String


property SysDir : String


property UserName : String


property WinDir : String


Events

Variables

FComputerName : String;

Private declarations

FPlatform : String;


FPlatformID : DWord;


FRegCompany : String;


FRegOwner : String;


FSysDir : String;


FUserName : String;


FVersion : String;


FWinDir : String;



Constructors


constructor Create(AOwner: TComponent);

Protected declarations


Functions


procedure GetComputer;

getosversion must be called before getreginfo


procedure GetDirectories;


procedure GetOSVersion;

of try


procedure GetRegInfo;

of try


procedure GetUser;


Properties


property ComputerName : String

Published declarations


property OSPlatform : String


property OSVersion : String


property RegCompany : String


property RegOwner : String


property SysDir : String


property UserName : String


property WinDir : String


Events


Variables


FComputerName : String;

Private declarations


FPlatform : String;


FPlatformID : DWord;


FRegCompany : String;


FRegOwner : String;


FSysDir : String;


FUserName : String;


FVersion : String;


FWinDir : String;