myeditcomponent.cpp

《C++ Builder 5技术内幕》一书附带的程序源代码

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "MyEditComponent.h"
//--------------------------------------------------------------------------
static inline TMyEdit *ValidCtrCheck()
{
  return new TMyEdit( NULL );
}

//--------------------------------------------------------------------------
__fastcall TMyEdit::TMyEdit( TComponent* Owner ) : TEdit( Owner )
{
  Color = clInfoBk;
  Font->Color = clInfoText;
  Font->Name = "Times New Roman";
  Font->Size = 12;
  Font->Style = TFontStyles() << fsBold << fsItalic;
}

//--------------------------------------------------------------------------
namespace MyComponents
{

void __fastcall Register()
{
  TComponentClass classes[1] = {__classid( TMyEdit )};
  RegisterComponents("MyComponents", classes, 0);
}

}
//---------------------------------------------------------------------------
#pragma package(smart_init)