   ____________________419

_fastcall TEditLetNum(TComponent* Owner) ;

_published:

};

//-

ttendif

 EditLetNum.cpp:

//

#include <vcl.h>
ttpragma hdrstop

^include "EditLetNum.h"
ttpragma package(smart_init)

//

// ValidCtrCheck is used to assure that the components created

// do not have any pure virtual functions.

//

static inline void ValidCtrCheck(TEditLetNum *)
{

new TEditLetNum(NULL);

}

//-

fastcall TEditLetNum::TEditLetNum(TComponent* Owner)
: TEdit(Owner)

//-

namespace Editletnum
(

void _fastcall PACKAGE Register!)
<

TComponentClass classes[1] = {_classid(TEditLetNum)
RegisterComponents("MyComponents", classes, 0) ;

//-

 ,         -
.  EditLetNum.cpp   : ValidCtrCheck, 
TEditLetNum  Register.  ValidCtrCheck   -
    ,      -
 .   TEditLetNum  .   -
 .   Register,     
,   .

      namespace. 
 namespace      .
      ,  . 
    ,    .

   Register     -
  classes  TComponentClass     -
 .      (     -
dit2),     ,      
 :

TComponentClass classes[2] = {_classid(TEditLetNum),
_classid(TEdit2));

      Regis-
terComponents ,   classes (  ) 

14*