摘要:
利用以下方法: 在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 = ... 阅读全文
|