可以把一个窗体作为一个参数传给另一个通用的单元中的一个函数吗?而在通用过程不用引用其它窗体。我要在函数中使用那个窗体的所有属性和方法。快快。如能答复正确,我给一百分。 在函数中调用另外一个单元中定义的类的公共属性方法一定要在implementation中引用,所以你说的情况应该不可能实现。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 function hehe(mwin:Pointer);beginTForm(mWIn).caption := '就是这样啊';end;引用hehe(self); to QQCAT:你的例子实际上还是引用的TFORm中的属性,如果在FORM1中加一个TFORm没有的公共属性,连编译都通不过。按你说的方法:像这样就可以实现了function hehe(aForm:TForm);beginaForm.caption := '就是这样啊';end;引用hehe(TForm1(self)) 我认为不可能能实现要引用TFormX的属性要么强制传递的对象要么直接传递该对象 要在通用函数中使用某类所有的信息,函数如果不知道类信息,神仙也没有办法啊,所以我同意yzhshi给函数传递两个参数,一个对象指针引用,一个类型信息,用TFormClass定义。 delphi压缩ACCESS数据库时出现错误 取得第二個硬盤物理序列號,高分相送 请问如何打印DBGRID表中的内容 怎样在 toolbutton上显示一个系统图标 为什么在安装delphi7时老是报1309错误然后只有退出安装?? 有关TOleContainer的问题 窗口最小化问题??? 如何用RAVE自己写一个打印预览窗体? [提问]要做一个拨号通讯的程序,并且比较急,请各位帮忙理一下思路和实现方法。不胜感谢!希望大家集思广益! 树状结构delphi Midas:应用程序服务器死机 Delphi中如何调用VB编的ActiveX控件?
function hehe(mwin:Pointer);
begin
TForm(mWIn).caption := '就是这样啊';
end;引用hehe(self);
你的例子实际上还是引用的TFORm中的属性,
如果在FORM1中加一个TFORm没有的公共属性,连编译都通不过。按你说的方法:
像这样就可以实现了function hehe(aForm:TForm);
begin
aForm.caption := '就是这样啊';
end;引用hehe(TForm1(self))
我同意yzhshi给函数传递两个参数,一个对象指针引用,一个类型信息,用TFormClass
定义。