請教各位前輩 我動態產生Form的方式如下 Form001 :=TForm001.Create(Application); Form001.show; 但在我的程式中有很多的Form 如: Form001 ~ Form999 那是否都要寫一次相同的Create程序 還是可以寫一個Function代入參數如:OpenMyForm('Form001') 非常非常的謝謝你,因為有你這世界變的更美好 ☆ ^_^ ☆ °∴°﹒☆°．﹒‧°∴°﹒°．﹒‧°∴°﹒ ﹒‧°∴°﹒☆°．﹒‧°∴°﹒°．﹒‧°∴°﹒﹒‧°∴°﹒☆°．

http://delphi.ktop.com.tw/link.asp?topic_id=19627

參考拙作 : 動態以 Form 的 ClassName (字串) 建立唯一視窗 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=30803 若你不需要唯一，可刪掉 for i := 0 to Screen.FormCount - 1 do 那段。