比方说,有二个form,第一个form上有一按钮,在第二个form上我设一个全局变量var a:boolean,
在form1creat中设
boolean:=false
我想通过点form1上的按钮,来改变form2上变量a的值,但是,结果变量a在form2上
的值永远是false,但是在form1上值可以改变。这是怎么回事,请各位高手指点。
在form1creat中设
boolean:=false
我想通过点form1上的按钮,来改变form2上变量a的值,但是,结果变量a在form2上
的值永远是false,但是在form1上值可以改变。这是怎么回事,请各位高手指点。
在form2中form1creat事件中:
a := False;在form1中
procedure TForm1.Button1Click(Sender: TObject);
var
b: Boolean;
begin
b := true;
Form2.a := b;
end;
这样就可以改变form2中的值
首先 你要确保你的form2已经create了
其次 确定在form1中引用unit2单元,
再次 确定a不是私有变量
最后 确定在form2的create事件中,a没有再次被初始化为false;
这样
在form1中
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.a := true;
end;
所在的单元,则:
begin
a:=true;
end;