驱 驱动程序 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-06 #1 在D7中主程序form1， 子程序form2调用form3。form3有一变量str值，想在form2使用 应怎么设置变量str，如何调用？请大家赐教！
M mzr Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-06 #4 在form2的uses部分中 uses unit3 {unit3为form3对应的单元} 引用后就可以在form2对应的单元中引用str了。
A althon64 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-06 #5 呵呵，楼上的说的不错，不过如果你们看看，是Form3的变量，可不是Unit3的变量哦。 1：Form3必须实例化 2：Unit2 Uses Unit3 3:Str定义在public中
一 一条大鱼 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-06 #6 在form3中，把变量声明在public里面 然后在form2中调用时变量名前面加上form3. 就能调用了
驱 驱动程序 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-06 #8 to althon64 小弟不才你能具体点吗？什么就实例化？第二步与第三步我都做到，就差第一步 谢谢！
D darnis Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-06 #9 var a: TForm3; begin a := TForm3.Create(application); a.str := 'what?'; ... end;
驱 驱动程序 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-06 #11 各位兄台sorry！我是想在form2中把form3.str的值显示出来，怎么做？谢谢！
S stuwe Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-06 #12 在form3中寫一個過程 procedure TForm3.getvalue(var str1:string); begin str1:=str; end; 在form2中 var str; Form3.getvalue(str); form2.label1.caption:=str;
在form3中寫一個過程 procedure TForm3.getvalue(var str1:string); begin str1:=str; end; 在form2中 var str; Form3.getvalue(str); form2.label1.caption:=str;
A althon64 Unregistered / Unconfirmed GUEST, unregistred user! 2003-05-06 #13 to stuwe: 按你那样写，还不如用接口算了，连uses都可以不要了。有时，具体问题要具体解决。
U ulingjcj Unregistered / Unconfirmed GUEST, unregistred user! 2003-08-01 #15 to 驱动程序: 我来迟了,有没有分啊! 我的EMail fjaujcj@sina.com 跟我联系!
