首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

怎么动态获取窗体TForm.caption的方法

2012-03-17 
如何动态获取窗体TForm.caption的方法?我的程序有三个界面main.pas/user.pas/pubfunction.pas,我以前在mai

如何动态获取窗体TForm.caption的方法?
我的程序有三个界面main.pas/user.pas/pubfunction.pas,我以前在main界面里面写了个function方法时,获取窗体标题是TForm(self).Caption,现在想将这个function移动到pubfunction.pas里面,结果报self错误?然后,我改为TForm(application).Caption,还是报错?,请问该如何写啊?

[解决办法]
uses main
mainform.Caption
[解决办法]
添加主窗体单元引用,
根据窗体名称调用CAPTION
[解决办法]
其实你可以在pubfunction.pas里定义一个全局变量
var
gCaption: string;

然后在main.pas中create的时候对gCaption赋值
gCaption := TForm(self).Caption;

这样gCaption就是窗体标题了.
[解决办法]
纠正一个错误application不是你看到的form,另外delphi的self传递的是实例自己,所以当移出tform类后就不是tform实例了
可以保存你创建的窗体句柄,然后传递窗口句柄到你的函数中,用windowsapi getwindowtext来获取窗口标题

热点排行