有关toolbar的几个问题,请大家帮忙看看(30分)

Y

yhl1118

Unregistered / Unconfirmed
GUEST, unregistred user!
1.在toolbutton显示caption时,如果caption太长,如何用省略号代替后面部分文字,
如:mycaption 用myc...代替
2.如果在toolbar上太多按钮,如何象ie浏览器那样,在最右边显示一个双箭头的按钮。
 
1.
procedure TForm1.ToolBar1CustomDrawButton(Sender: TToolBar;
Button: TToolButton; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
if Length(Button.Caption) > 3 then
begin
Button.Caption:= Copy(Button.Caption,1,3)+'...';
end;
end;
 
用Toolbar97/2000
 
TPageScroller
 
哪个只有一个箭头的,和WINDOWS的不一样,而且很不好控制!!!
 
Toolbar97/2000,用的不是标准控件。
 
但是foxmail和很多软件都是用的这套控件,DELPHI的哪个有很多潜在的问题!
 
希望快推出Toolbar XP,这样XP下,就好看多了。
 
我也正想要第二个功能
 
有个浏览器叫GoSurf,就有此功能,可以用Spy查一下,他好像用的是Tcoolbar,Tpanel和Tmenuitem
 
多人接受答案了。
 
顶部