Unit MultiBaseEdit

Classes

TMultiBaseEdit -

Functions

Register -

Types

TBase

Constants

BinDigits
DecDigits
HexDigits
LowCaseHexLetters
UpCaseHexLetters

Variables


Functions


procedure Register;


Types


TBase = ( bDEC, bHEX, bBIN );

Constants

BinDigits = ['0'..'1']

DecDigits = ['0'..'9']

Copyright (c) 1996 David Novak Version 1.0, 12-16-96: New release Note from author: It is not required to notify me of uses of MultiBaseEdit, but it would be very interesting to know where it is being used. Also, please send me an email if you find a bug or have a suggestion for an enhancement. If you make changed to the code, email the code to me for possible inclusion in the next version. Thanks for using MultiBaseEdit, David Novak novak@valu-line.net Description: MultiBaseEdit behaves as an edit box, except that it only allows integers to be typed into it. The integers may be interpreted as decimal, hexadecimal, or binary. Properties: All properties of TEdit. Base (TBase) This specifies how the values typed in the edit box should be interpretted. Possible values are bDEC, bHEX, and bBIN, which correspond to decimal, hexadecimal, and binary, respectfully. Bounds checking is implemented so that only valid digits are allowed to be typed into the MultiBaseEdit control. Value (LongInt) This is the interpretted value of the text in the MultiBaseEdit. Methods: All the methods of TEdit. Events: All the events of TEdit. License: MultiBaseEdit is freeware. It may be freely used for any purpose. You may use it privately or in the course of your work; there is no fee, and no registration is required. You may distribute it to anyone, and you may place it on any archive or bulletin board system. You may not charge anyone for it other than a reasonable fee to cover your distribution costs. Normally, you should distribute MultiBaseEdit in the form as supplied by the author; however, you may repackage it to suit the conventions and needs of an archive or bulletin board system. Disclaimer: MultiBaseEdit is supplied on an as-is basis. The author offers no warranty of its fitness for any purpose whatsoever, and accepts no liability whatsoever for any loss or damage incurred by its use.

HexDigits = ['0'..'9', 'A'..'F', 'a'..'f']

LowCaseHexLetters = ['a'..'f']

UpCaseHexLetters = ['A'..'F']


Variables