|
좀 무식한 방법일지 모르겠지만 생각이나서 한번 써 봅니다.
TTimer를 사용하는 방법인데요...
코드는 다음과 같습니다.
참고로 테스트는 해보지 못해봐서 버그가 있을 지도 모릅니다. ^^;
void __fastcall TForm1::BtnClick(TObject *Sender)
{
Timer1->Interval = 100; // 0.1초 후에 삭제됩니다.
Timer1->Enabled = true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
EXButton = new TButton((TComponent *)NULL);//이 부분 때문에 안 되었다고 하셨는데 임프님깨서
EXButton->Parent = Form1; //갈켜주신 위에 처럼 했는데도 안되는군요.
EXButton->Caption = "동적버튼";
EXButton->OnClick = BtnClick;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
delete EXButton;
Timer1->Enabled = false;
}
//---------------------------------------------------------------------------
|