ToolBar

← →
ПроНыРа © (2005-03-05 17:38) [0]

Ув. Мастера, здравствуйте! ToolBar1.ShowCaptions := true; Подскажите пожалуйста, как сделать так, чтобы у ToolButton, при изменении длинны Caption ширина кнопки не менялась. Так можно сделать тогда, когда на ToolBar есть несколько кнопок, а на моём ToolBar есть только одна кнопка. Или же подскажите компонент у которого была-бы возможность DropDownMenu, и стиль как у ToolButton.

← →
MU (2005-03-05 18:02) [1]

можно вместо TToolbar и TToolButton
взять TPanel и TSpeedButton
и написать

procedure TForm1.MyButtonClick(Sender: TObject);
var P : TPoint;
begin
P := ClientToScreen(MyButton.BoundsRect.TopLeft);
PopupMenu1.Popup(P.X, P.Y + MyButton.Height);
end;

ToolBar Найти похожие ветки