高手請幫忙, 程序运行正常,pass variable to another form時显示异常地址 (100). (100分)

H

herder

Unregistered / Unconfirmed
GUEST, unregistred user!
我想將 form1 的 variable pass to form2


在form1 執行
form2.guname.text := name.text
時, 显示异常地址

pls help me....
 
有可能赋值时Form2还没生成,或是已经被灭掉了。
 
補充: form2 create form1 的

form2 是 mdichild and form1 是 normal

在 form2 click button to create form1
當 在form1 填好資料, 離開前 pass variable to form2 時 便显示异常地址
那時我用 mouse 指住那句 form2.guname.text := name.text 時.
form2 显示出 = nil

請幫幫我. 可以再加多100分呢
 
在FORM1的IMPLEMENT前使用
USES UNIT2
//UNIT2是FORM2的PAS文件
 
这种情况一般是你创建Form2时没有用 form2 := TForm2.Create(...)的形式将所创建的
窗体实例赋给 form2 变量,而是使用象
with TForm2.Create(...) do
try
//do something
finally
Free;
end;
这样的格式来创建类型为 TForm2 的窗体,这样 Form2 没有被实例化,仍为 nil。
 
bbkxjy说得对
 
同意楼上的楼上。

同时请你再看看工程文件(DPR),把创建FORM的语句转移至你生成FORM2文件的语句中
 
同意楼上的,若还不行,请将源代码都贴出来.FORM2=nil,说明表单跟本都还没有生成.
 
接受答案了.
 
顶部