hi everybody,          我動態 create 了一個 Form, 在同一個 Form1     內用 delete AboutBox1; 可行!          但是若在 AbourBox 本尊呼叫 delete this; (殺自己)     卻會出現 "Abstract error" 的錯誤...          這為是什麼哩?                //Form1 TAboutBox *AboutBox1; // extern to AboutBox try { AboutBox1= new TAboutBox(Application); AboutBox1->Show(); } catch (Exception &exception) { delete AboutBox1; Application->ShowException(&exception); } void __fastcall TForm1::btn1Click(TObject *Sender) { delete this; } //Form2:AboutBox 本尊 (dynamic instance) extern TAboutBox *AboutBox1; void __fastcall TAboutBox::btn2Click(TObject *Sender) { delete this; } 謝謝大家幫忙!

In general, an object cannot delete itself, otherwise 'how to execute the next statement'? If you want to free the form automatically, set Action to caFree in the OnClose event.

引言: hi everybody, 我動態 create 了一個 Form, 在同一個 Form1 內用 delete AboutBox1; 可行! 但是若在 AbourBox 本尊呼叫 delete this; (殺自己) 卻會出現 "Abstract error" 的錯誤... 這為是什麼哩? //Form1 TAboutBox *AboutBox1; // extern to AboutBox try { AboutBox1= new TAboutBox(Application); AboutBox1->Show(); } catch (Exception &exception) { delete AboutBox1; Application->ShowException(&exception); } void __fastcall TForm1::btn1Click(TObject *Sender) { delete this; } //Form2:AboutBox 本尊 (dynamic instance) extern TAboutBox *AboutBox1; void __fastcall TAboutBox::btn2Click(TObject *Sender) { delete this; } 謝謝大家幫忙! < face="Verdana, Arial, Helvetica"> newbie 你好: delete 自己一定是不行的 請嘗試以下做法

AboutBox1= new TAboutBox(Application);        
AboutBox1->ShowModal();
delete AboutBox1;

然後再 AboutBox1 中不要再 delete this 了 -- Enjoy Researching & Developing --