|
임프님께 부탁 하기를...
563번 질문으로부터 한참을 도움을 받으며 질문을 진행 했었거든요.
임프님께서 갈켜주신대로 했는데 에러가 나거든요. 아직도 해결을 못했구요.
그래서 다시 소스랑 함께 올리오니 부디 해결을 좀...
<아래는 헤더파일 입니다.>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Db.hpp>
#include <DBClient.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
void __fastcall FormCreate(TObject *Sender);
private: // User declarations
public: // User declarations
TButton *EXButton;
void __fastcall BtnClick(TObject *Sender);
__fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
<여기서부터는 소스파일이구요.>
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit4.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BtnClick(TObject *Sender)
{
delete EXButton;
}
void __fastcall TForm1::FormCreate(TObject *Sender)
{
EXButton = new TButton((TComponent *)NULL);//이 부분 때문에 안 되었다고 하셨는데 임프님깨서
EXButton->Parent = Form1; //갈켜주신 위에 처럼 했는데도 안되는군요.
EXButton->Caption = "동적버튼";
EXButton->OnClick = BtnClick;
}
//---------------------------------------------------------------------------
|