Class TMultiBaseEdit (unit MultiBaseEdit)

Inherits from

TCustomEdit

Constructors


constructor Create(AOwner: TComponent);



Functions

procedure KeyPress( var key : char );


function BinStrToInt( s : string ) : LongInt;

Convert a binary string into a LongInt value.

function GetBinString( v : LongInt ) : string;

This function returns a string of 1 and 0's which is the binary representation of v.

function GetHexString( v : LongInt ) : string;

Get the hexadecimal string equivalent of v

function GetValue : LongInt;


function HexStrToInt( s : string ) : LongInt;

Convert a hexadecimal string into a LongInt value.

procedure SetBase( b : TBase );


procedure SetValue( v : LongInt );

change the base and display the new string

function StripLeadingZeros( s : string ) : string;

error check

Properties

property AutoSelect :


property AutoSize :


property Base : TBase


property BorderStyle :


property CharCase :


property Color :


property Ctl3D :


property DragCursor :


property DragMode :


property Enabled :


property Font :


property HideSelection :


property MaxLength :


property OEMConvert :


property ParentColor :


property ParentCtl3D :


property ParentFont :


property ParentShowHint :


property PopupMenu :


property ReadOnly :


property ShowHint :


property TabOrder :


property TabStop :


property Value : LongInt


property Visible :


Events

event OnChange :


event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


event OnStartDrag :


Variables

FBase : TBase;


FValue : LongInt;



Constructors


constructor Create(AOwner: TComponent);


Functions


procedure KeyPress( var key : char );


function BinStrToInt( s : string ) : LongInt;

Convert a binary string into a LongInt value. s must be no larger than 32 characters. Each character of s should be either a 1 or a 0.


function GetBinString( v : LongInt ) : string;

This function returns a string of 1 and 0's which is the binary representation of v.


function GetHexString( v : LongInt ) : string;

Get the hexadecimal string equivalent of v


function GetValue : LongInt;


function HexStrToInt( s : string ) : LongInt;

Convert a hexadecimal string into a LongInt value. s must be no larger than 8 characters. Each character of s should be either a 0..9 or A..F or a..f.


procedure SetBase( b : TBase );


procedure SetValue( v : LongInt );

change the base and display the new string


function StripLeadingZeros( s : string ) : string;

error check


Properties


property AutoSelect :


property AutoSize :


property Base : TBase


property BorderStyle :


property CharCase :


property Color :


property Ctl3D :


property DragCursor :


property DragMode :


property Enabled :


property Font :


property HideSelection :


property MaxLength :


property OEMConvert :


property ParentColor :


property ParentCtl3D :


property ParentFont :


property ParentShowHint :


property PopupMenu :


property ReadOnly :


property ShowHint :


property TabOrder :


property TabStop :


property Value : LongInt


property Visible :


Events


event OnChange :


event OnClick :


event OnDblClick :


event OnDragDrop :


event OnDragOver :


event OnEndDrag :


event OnEnter :


event OnExit :


event OnKeyDown :


event OnKeyPress :


event OnKeyUp :


event OnMouseDown :


event OnMouseMove :


event OnMouseUp :


event OnStartDrag :


Variables


FBase : TBase;


FValue : LongInt;