604
社区成员




//---------------------------------------------------------------------------
#ifndef Unit5H
#define Unit5H
//---------------------------------------------------------------------------
extern void sss(TObject *Sender);
#endif
//---------------------------------------------------------------------------
#pragma hdrstop
#include "Unit5.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
void sss(TObject *Sender)
{
TButton *newbtn=new TButton(TTabControl *Sender); //注意以下2行代码
newbtn->Parent = TTabControl *Sender; //这行! TTabControl *Sender
}