| Class TCPUName (unit CPUName) |
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;
function GetCPUKind: Integer;
function GetCPUName: String;
procedure NOPInteger (val: Integer);
procedure NOPString (val: String);| Properties |
property About : string
property CPUKind : Integer
property CPUName : String| Events |
| Variables |
FAbout : string;| 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 : stringPublished declarations
property CPUKind : Integer
property CPUName : Stringread-only!
| Events |
| Variables |
FAbout : string;Private declarations