422______________________________________________ 7

void _fastcall SetEnableLet(bool AEnableLet);

void _fastcall SetEnableNum(bool AEnableNum);

public:

//  

fastcall TEditLetNum(TComponent* Owner);

//    

property bool Modified = (read=FModified, default=false);

_published:

//  ,    

_property bool EnableLet = fread=FEnableLet, write=SetEnableLet,
default=true};

property bool EnableNum = {read=FEnableNum, write=SetEnableNum,
default=true) ;

\ ;

 EditLetNum.cpp:

static inline void ValidCtrCheck(TEditLetNum *)
(

new TEditLetNum(NULL);

)

//-

_fastcall TEditLetNum::TEditLetNum(TComponent* Owner)

: TEdit(Owner)
{

FEnableLet = true;

FEnableNum = true;

FModified = false;

//-

namespace Editletnum
{

void _fastcall PACKAGE Register()
{

TComponentClass classes[l] = {  classid(TEditLetNum)}
RegisterComponents("MyComponents", classes, 0);

)
}
//-

void   fastcall TEditLetNum::SetEnableNum(bool AEnableNum)
(    

//   FEnableNum
FEnableNum = AEnableNum;

//   FEnableNum  FEnableLet = false,
//   FEnableLet  true

if (! AEnableNum)
if (! FEnableLet) FEnableLet = true;

)

//-

void _fastcall TEditLetNum::SetEnableLet(bool AEnableLet)

(

//   FEnableLet

FEnableLet = AEnableLet;

//   FEnableNum  FEnableLet = false,
//   FEnableNum  true
if (! AEnabieLet)
if (! FEnableNum) FEnableNum = true;