各位大侠,如何设计可移动的工具条啊! |
|
答題得分者是：william
|
|
HarryZhang
一般會員   發表：19 回覆：25 積分：8 註冊：2003-01-03 發送簡訊給我 |
|
|
william
版主   發表：66 回覆：2535 積分：3048 註冊：2002-07-11 發送簡訊給我 |
1) put a TCoolBar (CoolBar1) on a form (Form1)
2) set DragKind of CoolBar1 to dkDock
3) set DragMode of CoolBar1 to dmAutomatic
4) put a TToolBar (ToolBar1) inside CoolBar1
5) set Align of ToolBar1 to alClient
6) create the button on ToolBar1
7) set DockSite of Form1 to True Now you get a dockable toolbar
|
|
HarryZhang
一般會員 發表：19 回覆：25 積分：8 註冊：2003-01-03 發送簡訊給我 |
|
|
william
版主 發表：66 回覆：2535 積分：3048 註冊：2002-07-11 發送簡訊給我 |
引言: if I don't use coolbar. then it will not able to drag ,right? but the toolbar in the picture seems that it is not use coolbar.and it may connect every direction. Harry ZhangI do think it is a ToolBar placed inside CoolBar with both EdgeInner and EdgeOuter set to esNone. Without a CoolBar, a ToolBar can be made dockable also. Just set the DragMode and DragKind of the ToolBar should work. You may need to write some code if you want to dock the bar onto the edge of the form only. |
|
HarryZhang
一般會員 發表：19 回覆：25 積分：8 註冊：2003-01-03 發送簡訊給我 |
|
|
william
版主 發表：66 回覆：2535 積分：3048 註冊：2002-07-11 發送簡訊給我 |
|
發表時間：2003-07-24 09:04:04
IP:61.144.xxx.xxx 未訂閱
系統時間：2024-05-10 4:15:57
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |