问问?我用application.MainForm得到主窗体,单application.MainForm.后什么都没有,我在主窗体的public 里面有放了变量,但是怎么看不见。不知怎么操作呢?
解决方案 »
- Excel導入Access
- 请问怎么写程序获得真实的IP地址。是ISP当前分配给我使用的IP地址。不是192.168.1...
- vsflexgrid 为何不能使用
- 如何实现截获Bitbtn的OnMouseEnter,OnMouseLeave,?在线等
- 如何在Delphi中不连接数据库而执行SQL语句!!
- 在csdn中从来没有人解决这个问题。。。。。。。
- 請問如何判斷TList對象中每一個對象的數据類型?
- 再问,关于jpg文件的显示?
- 请问,如何使程序在系统托盘上的图标有动态效果?
- 时间查询的 sql ...100分
- javascript调用oxc控件,怎么判断oxc控件注册是否成功
- Delphi提取SQL数据库Image类型字段问题
因为你的application.MainForm 是tform型不是tform1型,只能转化一下
(application.MainForm as Tform1).x
这是mainform在Tapplication中的赋值红色部分。你应该能看懂mainform为Tform型,并不是你的主窗体的类型,(Tform1或者Tformmain等),你的公共变量并不是tform的变量。而是Tform1的变量,所以你要用就象我说那样用procedure TApplication.CreateForm(InstanceClass: TComponentClass; var Reference);
var
Instance: TComponent;
begin
Instance := TComponent(InstanceClass.NewInstance);
TComponent(Reference) := Instance;
try
Instance.Create(Self);
except
TComponent(Reference) := nil;
raise;
end;
if (FMainForm = nil) and (Instance is TForm) then
begin
TForm(Instance).HandleNeeded;
FMainForm := TForm(Instance);
end;
end;