xpmenu控件如何用?(50分)

  • 主题发起人 主题发起人 nxyzg
  • 开始时间 开始时间
N

nxyzg

Unregistered / Unconfirmed
GUEST, unregistred user!
xpmenu控件如何用?说详细些.
 
直接放一个到Form里就可以了!
 
active设为true
 
放到Form里了.
to 影子 我的xpmenu中没有active属性或事件
 

没有?第一个属性就是Active。
 
procedure TFormMain.FormCreate(Sender: TObject);
begin
XPBarMenu1 := TXPBarMenu.Create(Self);
XPBarMenu1.BarCaption := '111222';
XPBarMenu1.Active := True;
end;

procedure TFormMain.FormDestroy(Sender: TObject);
begin
XPBarMenu1.Free;
end;
 
AutoDetect有没有?设置为True;
 
我已搞定,原来是我将控件装错。分数每人分一点。
 
后退
顶部