| | @@ -0,0 +1,32 @@ |
| 1 | +//---------------------------------------------------------------------------
|
| 2 | +
|
| 3 | +#include <vcl.h>
|
| 4 | +
|
| 5 | +#pragma hdrstop
|
| 6 | +
|
| 7 | +#include "NumberEdit.h"
|
| 8 | +#pragma package(smart_init)
|
| 9 | +//---------------------------------------------------------------------------
|
| 10 | +// ValidCtrCheck を使用して,作成済みコンポーネントに
|
| 11 | +// 純粋仮想関数がないことを確認。
|
| 12 | +//
|
| 13 | +
|
| 14 | +static inline void ValidCtrCheck(TActionList1 *)
|
| 15 | +{
|
| 16 | + new TActionList1(NULL);
|
| 17 | +}
|
| 18 | +//---------------------------------------------------------------------------
|
| 19 | +__fastcall TActionList1::TActionList1(TComponent* Owner)
|
| 20 | + : TActionList(Owner)
|
| 21 | +{
|
| 22 | +}
|
| 23 | +//---------------------------------------------------------------------------
|
| 24 | +namespace Numberedit
|
| 25 | +{
|
| 26 | + void __fastcall PACKAGE Register()
|
| 27 | + {
|
| 28 | + TComponentClass classes[1] = {__classid(TActionList1)};
|
| 29 | + RegisterComponents(L"Samples", classes, 0);
|
| 30 | + }
|
| 31 | +}
|
| 32 | +//---------------------------------------------------------------------------
|