Class TCPUID (unit CPUID)

Inherits from

TComponent

Constructors


Constructor Create(aOwner:TComponent);

*****************************************************************************)


Functions

Procedure ShowAbout;

Public declarations

*****************************************************************************)


Function GetIDInfo:Boolean;

*****************************************************************************)

Properties

property About : string

Published declarations

property Family : LongInt


property ID1 : LongInt


property ID2 : LongInt


property ID3 : LongInt


property ID4 : LongInt


property IDAvailable : Boolean


property Model : LongInt


property ProcessorType : LongInt


property Stepping : LongInt


property Vendor : String


Events

Variables

FAbout : string;

Private declarations

fDummyIDAvailable : Boolean;


fDummyLongInt : LongInt;


fDummyString : String;


fFamily : LongInt;


fId1 : LongInt;


fId2 : LongInt;


fId3 : LongInt;


fId4 : LongInt;


fIDAvailable : Boolean;


fModel : LongInt;


fProcessorType : LongInt;


fStepping : LongInt;


fsVendor : String;


fVendor : TVendor;



Constructors


Constructor Create(aOwner:TComponent);

*****************************************************************************)


Functions


Procedure ShowAbout;

Public declarations

*****************************************************************************)


Function GetIDInfo:Boolean;

*****************************************************************************)


Properties


property About : string

Published declarations


property Family : LongInt


property ID1 : LongInt


property ID2 : LongInt


property ID3 : LongInt


property ID4 : LongInt


property IDAvailable : Boolean


property Model : LongInt


property ProcessorType : LongInt


property Stepping : LongInt


property Vendor : String


Events


Variables


FAbout : string;

Private declarations


fDummyIDAvailable : Boolean;


fDummyLongInt : LongInt;


fDummyString : String;


fFamily : LongInt;


fId1 : LongInt;


fId2 : LongInt;


fId3 : LongInt;


fId4 : LongInt;


fIDAvailable : Boolean;


fModel : LongInt;


fProcessorType : LongInt;


fStepping : LongInt;


fsVendor : String;


fVendor : TVendor;