| Class TOEHexEdit (unit oddscb) |
TOEEdit
| Constructors |
constructor Create( AOwner : TComponent );| Functions |
function IntToBaseStr(Value: Longint): string;
function IsValidChar( Key: Char) : Boolean;
procedure KeyDown(var Key: Word; Shift : TShiftState );
procedure KeyPress(var Key: Char );
function ValidCopy: Boolean;
function ValidCut: Boolean;
function ValidDelete: Boolean;
function ValidPaste: Boolean;
function BaseStrToInt(const S: string): Longint;
function CheckValue( NewValue: Longint): Longint;
procedure CMEnter(var Message: TCMGotFocus);
procedure CMExit(var Message: TCMExit);
function GetValue: Longint;
procedure SetMaxValue( NewValue: Longint);
procedure SetMinValue( NewValue: Longint);
procedure SetNumBase( NewValue: TEditBase);
procedure SetValidate( B: Boolean);
procedure SetValue( NewValue : Longint );
function SyntaxOk(const S: string): Boolean;| Properties |
property MaxValue : Longint
property MinValue : Longint
property NumBase : TEditBase
property Validate : Boolean
property Value : Longint
property ValueCheck : Boolean| Events |
| Variables |
FMaxValue : Longint;
FMinValue : Longint;
FNumBase : TEditBase;
FValidate : Boolean;
FValueCheck : Boolean;| Constructors |
constructor Create( AOwner : TComponent );TOEHexEdit
| Functions |
function IntToBaseStr(Value: Longint): string;
function IsValidChar( Key: Char) : Boolean;
procedure KeyDown(var Key: Word; Shift : TShiftState );
procedure KeyPress(var Key: Char );handle Copy-, Paste-, Cut-, Delete-Keys
function ValidCopy: Boolean;case
function ValidCut: Boolean;
function ValidDelete: Boolean;
function ValidPaste: Boolean;
function BaseStrToInt(const S: string): Longint;force Text to '0'
function CheckValue( NewValue: Longint): Longint;
procedure CMEnter(var Message: TCMGotFocus);syntax correct if Value inside bounds
procedure CMExit(var Message: TCMExit);
function GetValue: Longint;
procedure SetMaxValue( NewValue: Longint);
procedure SetMinValue( NewValue: Longint);
procedure SetNumBase( NewValue: TEditBase);
procedure SetValidate( B: Boolean);
procedure SetValue( NewValue : Longint );
function SyntaxOk(const S: string): Boolean;| Properties |
property MaxValue : Longint
property MinValue : Longint
property NumBase : TEditBase
property Validate : Boolean
property Value : Longint
property ValueCheck : BooleanSet CheckValue to true if you only want hex numbers that are within the LongInt range. Set to false if all you want is hex strings(which may represent numbers larger then Max(LongInt)
| Events |
| Variables |
FMaxValue : Longint;
FMinValue : Longint;
FNumBase : TEditBase;
FValidate : Boolean;
FValueCheck : Boolean;