Question

delphi打开工程文件时出错!

Error in module: call to application.CreateForm is missing or incorret

打开工程文件时出现这个错误怎么办?
我也知道是窗体的问题,就是不知道怎么解决!!!!!上火啊.....
program za;

uses
windows,forms,
main in 'main.pas' {Form1},
gdly in 'gdly.pas' {zagdly},
ggb in 'ggb.pas' {ggbform},
data in 'data.pas' {dataform},
dl in 'dl.pas' {dlform},
jm in 'jm.pas',
zagl in 'zagl.pas' {zaglform},
wdrunonce in 'wdrunonce.pas';

{$R *.res}

begin
Application.Initialize;
if not AppHasRun(Application.Handle) then
Application.CreateForm(TForm1, Form1)
else
halt;
Application.CreateForm(Tdataform, dataform);
Application.Run;

end.
大家看看,有没有毛病!
---------------
终于找到原因了!
begin
Application.Initialize;
if not AppHasRun(Application.Handle) then
begin
Application.CreateForm(TForm1, Form1);
Application.CreateForm(Tdataform, dataform);
end;
Application.Run;
end.
这样改一下,一切正常.

Answer 1

其实这个问题是由于你使用了不同版本的Delphi的原因,比如你用Delphi 5 去打开原来用旧版本如delphi 4 或更早,就会出现.这还表现为应用程序的图标不与当前所编程序相同.
编程书籍的所带光盘中的例子程序也出过这种问题.解决的办法是查找 *.res(经常出问题的那个子目录),然后删除之,再次用delphi打开,就会提示"找不到.res,Recreate?",
点击 OK,保存后就不会再出现这种问题.

Answer 2

这个工程文件中的窗体文件有问题。。

我一直用DELPHI写软件的，也遇过这样的问题。

希望能帮到你！~