delphi 提示variable form2might not have been initialized.
一运行就提示错误并显示progect1
program Project1;
uses
Forms,
Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm1,Form1);
Application.Run;
end.
在主程序中引用了form2
implementation
uses midaslib,Unit2,Unit3,unit4 ;
.
.
rocedure TForm1.Button1Click(Sender:TObject);
var i,y1,m1,y2,m2:integer;
form2:Tform2;
begin
try
form2:=Tform2.Create(self);
form2.ShowModal ;
.
.
form2.free
delphi 提示variable form2might not have been initialized.
答案:1 悬赏:30 手机版
解决时间 2021-04-05 21:26
- 提问者网友:黑米和小志
- 2021-04-05 04:50
最佳答案
- 五星知识达人网友:蕴藏春秋
- 2021-04-05 05:17
DELPHI主菜单:prooject>Options>forms页,在auto-create forms列表框中,将form2移动到Available forms列表框中,就不会出现那提示了.
再问: 在Available forms列表框中只有form1.
再答: 不对,form1应该在auto-create forms列表框中;form2应该在Available forms列表框中。
再问: form1在auto-create forms列表框中;form2两个列表框都不在。
再答: 哦,你的form2不在工程里,先prooject>add to prooject,选中form2的.pas文件,增加该文件到工程。这时工程文件会出现如下改变 program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; Unit2 in 'Unit2.pas'{Form2}; 然后点击一下form1,再file>use unit 将form的单元文件加入到form1的单元文件中,这样,form1就可以调用form2单元了
再问: 解释非常详细~!谢谢!
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯