//--------------------------------------------------------------------------- void __fastcall TForm1::About1Click(TObject *Sender) { TAbout *About; About = new TAbout(Form1); About->ShowModal(); delete About; }
//--------------------------------------------------------------------------- void __fastcall TFScheduler::m_ToolAboutClick(TObject *Sender) { TAbout * about = new TAbout(this); about->ShowModal(); }