那你这个变量一定是写在TForm2的类里面了,而访问的时候还没有创建TForm2的对象实例,如form2:=Tform2.create(application),就去访问这个写在类离的变量,就会出现地质访问错误之类的错误.
解决方案 »
- TDataPacket的sizeof()最多能传多少个字节?
- 用CreateOleObject('Excel.Application');的方法如何实现打印指一定页,或部分页?
- 纸张设置的问题!!!!!!!!!!!!!!!!!
- Excel导入语句在Delphi中不可用
- 系统图形界面问题
- 请问delphi中有无函数可以把空字符转为float类型0.0?
- 真心请教各位大侠关于画图的问题,一定给分!!!
- 大家请指点,Delphi写的DLL在VB中使用的小问题?
- 用Delphi编写调用SQLSERVER 7.0存储过程的程序是否一定要安装BDE才能执行?
- 怎样才能通过我的应用程序得知其它应用程序的一个控件的handle?
- 急!请问用DELPHI如何实现网格单元的超链接?
- 关于数据库
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
//单元中的全局变量声明处
Form1: TForm1;
implementation{$R *.DFM}procedure TForm1.FormCreate(Sender: TObject);
beginend;end.
unit Unit1;
interfaceuses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
//单元中的全局变量声明处
Form1: TForm1;
implementation{$R *.DFM}procedure TForm1.FormCreate(Sender: TObject);
beginend;end.
变量名前面还要加form2.变量名
TfTrainBBS = class(TForm)
TVBBS: TTreeView; procedure TVBBSDblClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
fTrainBBS: TfTrainBBS;
data: array of array of Int64; //form2中這麼定義;
procedure TfTrainMain.Button3Click(Sender: TObject);
var
TrainBBS : TfTrainBBS;
begin
TrainBBS := TfTrainBBS .Create(Application); //調用form3
TrainBBS.Show;end;
taidy() 說的方法我想過,好像也不行.
為什麼 '你的访问代码最好不要放在FormCreate里面'???
你的form2是动态创建的吧,当你调用出form3的时候,你的form2已经释放了,所以地址访问未归!!!
為什麼 '你的访问代码最好不要放在FormCreate里面'???
form1點一個button調用form2,form2點一個button調用form3
form2定義變量,form3使用.
Unit Unit1
...
Var
Form1 : TForm1;
...//定义
你检查检查 是否在如TForm2中使用Form2变量什么的
另外正如zbpro所建议
最好使用独立的一个单元来声明全局变量、函数及类型//我的工程用了两个!
主要保存通用函数的单元//FunctionUnit.pas//如:字符串的处理函数等
主要保存全局资源的单元//PublicUnit.pas//如:用户登录的信息、软件版本信息等
所有的窗体单元都要uses她们
把函数写在这个新的单元中!
你检查检查 是否在如TForm2中使用Form2变量什么的
另外正如zbpro所建议
最好使用独立的一个单元来声明全局变量、函数及类型//我的工程用了两个!
主要保存通用函数的单元//FunctionUnit.pas//如:字符串的处理函数等
主要保存全局资源的单元//PublicUnit.pas//如:用户登录的信息、软件版本信息等
所有的窗体单元都要uses她们
Forms,
uTrainMain in 'uTrainMain.pas' {fTrainMain},
udmTrainPub in 'udmTrainPub.pas' {DM2: TDataModule};
//uBBSView in 'uBBSView.pas' {fTrainBBSView};{$R *.RES}begin
Application.Initialize;
Application.CreateForm(TfTrainMain, fTrainMain);
//Application.CreateForm(TfTrainBBSView, fTrainBBSView);
Application.CreateForm(TDM2, DM2);
Application.Run;end.