Class TCPUName (unit CPUName)

Inherits from

TComponent

Word align data } {$B-} { Complete Boolean Evaluation Directive } {$D-} { Debug Information Directive } {$L-} { Local Symbol Information Directive } {$R-} { Range checking off } {$S-} { Stack checking off } {$T-} { We don't need (nor want) this type checking!

Constructors



Functions

procedure ShowAbout;

Public declarations

function GetCPUKind: Integer;


function GetCPUName: String;


procedure NOPInteger (val: Integer);

shift the cpu type down to the low byte

procedure NOPString (val: String);


Properties

property About : string

Published declarations

property CPUKind : Integer


property CPUName : String

read-only!

Events

Variables

FAbout : string;

Private declarations


Constructors


Functions


procedure ShowAbout;

Public declarations


function GetCPUKind: Integer;


function GetCPUName: String;


procedure NOPInteger (val: Integer);

shift the cpu type down to the low byte


procedure NOPString (val: String);


Properties


property About : string

Published declarations


property CPUKind : Integer


property CPUName : String

read-only!


Events


Variables


FAbout : string;

Private declarations