T
tomchen
Unregistered / Unconfirmed
GUEST, unregistred user!
我在表单1（fmjhhc）的PUBLIC 定义一个变量 VP
然后用一个：
procedure Tfmjhhc.BitBtn1Click(Sender: TObject);
var
fmjhqu:tform;
begin
vp:=37;
fmjhqu:=tfmjhqu.Create(fmjhhc);
fmjhqu.ShowModal;
end;
当我在表单2（Fmjhqu）中引用VP（fmjhhc.vp）时
提示错误：
access violation at address 004acbob in module 'myexe.exe'.read
of address fffffff
然后用一个：
procedure Tfmjhhc.BitBtn1Click(Sender: TObject);
var
fmjhqu:tform;
begin
vp:=37;
fmjhqu:=tfmjhqu.Create(fmjhhc);
fmjhqu.ShowModal;
end;
当我在表单2（Fmjhqu）中引用VP（fmjhhc.vp）时
提示错误：
access violation at address 004acbob in module 'myexe.exe'.read
of address fffffff