13/10/09 16:57:13.87 .net
(>>429の続き)
呼び出しサンプル…といっても生成するだけですが
uses (中略), unko;
type
TForm1 = class(TForm)
private
FUnko: TUnko;
public
constructor Create(AOwner: TComponent); override;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
constructor TForm1.Create(AOwner: TComponent);
begin
inherited;
FUnko := TUnko.Create(Self);
FUnko.Parent := Self;
end;
>>427-429のうちコードのところだけをコピペ、
見やすくするために全角空白にしているところを半角空白かタブに置換して、
unko.pasで保存すれば使えるはず。