摘要：
利用以下方法： 在form1里面编写函数: function ExecuteForm1(var S : string) : word; var Form1 : TForm1; begin Form1 := TForm1.createform(application); result := form1.showmodual; try if result = ... 阅读全文
|
摘要：
利用以下方法： 在form1里面编写函数: function ExecuteForm1(var S : string) : word; var Form1 : TForm1; begin Form1 := TForm1.createform(application); result := form1.showmodual; try if result = ... 阅读全文
|