VCL开发(10分)

  • 主题发起人 主题发起人 houfuzhu1982
  • 开始时间 开始时间
H

houfuzhu1982

Unregistered / Unconfirmed
GUEST, unregistred user!
我从TTreeview继承一下来
在里面加了一个DataSet属性,是TAdoQuery类型的
在重载的Create事件里,跟踪到的DataSet是空指针
我再加一个Active属性是Boolean类型的,
定义是这样的:
Property Active:Boolean read FActive write CreateTreeNode;
CreateTreeNode是个自定义方法,我在CreateTreeNode跟踪到DataSet也是个空指针
我要在该控件出现在窗体上的时候,就要用到DataSet属性,请大侠教我一下吧,拜求了!!!!
 
成员变量指向的对象要靠构造函数创建的吧
 
那为什么我在CreateTreeNode跟踪到的指针也是空的呢
 
把 create 的代码贴上来看看
 
里面没什么代码,就几句
constructor THFZTreeGroup.Create(AOnwer: TComponent);
begin
inherited; //InitiateAction
OnChange:=TreeNodeChange;
OnDblClick:=NodeDlClick;
vIsSetVal:=False;
end;
 
hdzgy,恩人,帮帮我,在线等待
 
应该可以做一个类函数的,可以调用类函数的方式来实现
 
chizeng具体怎么写,帮帮忙吧我的恩人
 
class function CreateDataSetAndForm(ADataSet:TDataSet);
begin
//创建当前本窗体
Form1 := TApplication.createForm(TForm1);
//在显示窗体之前创建或调用传入的参数ADataSet (在做为参数之前已创建此数据集)
Form1.showModal;
//调用对应的数据集
end;

这个函数在别的窗体要调用本窗体时只需要调用该类就可以啦

如果还有不清楚的可以先了解一下关于类函数的一些用法
 
多人接受答案了。
 
后退
顶部