请教如何看TcxLookupComboBox的控件的源代码 ( 积分: 200 )

  • 主题发起人 主题发起人 willing66
  • 开始时间 开始时间
W

willing66

Unregistered / Unconfirmed
GUEST, unregistred user!
请教如何看TcxLookupComboBox的控件的源代码
我主要想写个通用的弹出菜单,我想在菜单上可以有Grid之类的功能。
我看到TcxLookupComboBox有实现这一功能,但是它不符合我系统的要求。所以想自己写一个菜单功能的东西。对TcxLookupComboBox的源代码又看不大明白。我知道TcxLookupComboBox的菜单是从TForm上继承下来的。继承关系:
TForm --> TcxPopupWindow --> TcxCustomPopupWindow --> TcxCustomEditPopupWindow
有没有人能给点指点如何看一几个类的代码。
 
按住 Ctrl键,在 代码编辑窗口 左键点击 那些 类 就可以跳到源码文件里的对应位置。
 
这个我知道。
如何知道这些类的内部函数和过程之间的关系。
而且有很我函数和属性根本不知道看不懂它在做什么。
 
var
vPopWin: TcxCustomPopupWindow;
begin
vPopWin := TcxCustomPopupWindow.Create(self);
vPopWin.Color := clWindowText;
vPopWin.Height := 300;
vPopWin.Width := 300;
vPopWin.Color := clBtnHighlight;
vPopWin.BorderStyle := pbs3D;
vPopWin.Show;
vPopWin.SetFocus;
// PopupWindow.CalculateSize;
// P := PopupWindow.CalculatePosition;
vPopWin.Refresh;
// PopupWindow.RefreshPopupWindow;
// PositionPopupWindowChilds(PopupWindow.ViewInfo.ClientRect);
// SetEditPopupWindowShadowRegion(PopupWindow);
// vPopWin.ShowModal;
if vPopWin.Visible then ShowMessage('vPopWin.Visible');
showMessage(IntToStr(vPopWin.Top) + '|' + IntToStr(vPopWin.Left));
showMessage(IntToStr(vPopWin.Height) + '|' + IntToStr(vPopWin.Width));
// vPopWin.Popup(self.Button1);
end;

通过这种方式创建菜单,菜单有创建出来,但是是透明的。但确实有窗体存在。有鼠标的点的时候就可以感觉到。希望有人来帮忙指点一下。
 
分数不够可以加。只有能解决问题。
 
学习中,
 
它的类体系比较庞大,牵扯太多,确实不是那么容易看懂的。
 
请问Passion,你有没有看一部分,能不能一起来讨论一下。
一个人看,没有讨论,连问的地方都找不到。希望能有人一去起来研究这些代码,如果搞清楚了这些代码,编程水平肯定会有很大的提高。
 
惭愧。我是几年前看的,现在已经忘得差不多了。[:(]
 
后退
顶部