Скачать: CL | DM;

Перемещение кнопок по тулбару   Найти похожие ветки 

← →
Переяслов Григорий ©   (2004-03-18 18:47) [0]

Привет, мастера.
Мне необходмо управлять положением кнопок на тулбаре в рунтайме. Кнопки создаются динамически, порядок входа их может быть любой, но порядок отображения строго определенный. Как изменить позицию кнопки так, чтобы она оказалась на нужном мне месте.
Кнопки создаю так:

tbButtons : TToolBar;
Btn       : TToolButton;

begin
 ...
 Btn := TToolButton.Create(tbButtons);
 Btn.Parent := tbButtons;
 Btn.Style  := tbsButton;

---

← →
Defunct ©   (2004-03-18 19:01) [1]

Если размер всех кнопок одинаковый, то поможет:

ToolBtn.Left := (Позиция - 1)*Ширина

---

← →
Переяслов Григорий ©   (2004-03-18 19:04) [2]

> Defunct ©   (18.03.04 19:01) [1]
К сожалению, не катит

---

← →
Переяслов Григорий ©   (2004-03-18 19:23) [3]

Присваиваю
 ToolBtn.Left := <чего-то>
потом делаю
 Btn.Parent := tbButtons;
после чего Left = 0

---

← →
just me   (2004-03-18 20:13) [4]

Попробуй динамически создавать вместе с TToolButton соответствующие TAction и вязать TToolButton на них. Теперь у TAction есть свойство Index, которому можно значение присваивать

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c