Вниз
Скачать: CL | DM;

Работа с ToolButton   Найти похожие ветки 

← →
s ©   (2004-02-27 18:25) [0]

Подскажите, пожалуйста, как можно в панели ToolBar со свойством Flat := True необходимые кнопки ToolButton программно привести в активное состояние, так как если бы по ним проходил указатель мыши.
И можно ли кнопку ToolButton по первому нажатию утопить, а по второму поднять. Наверное, свойство Down работает некорректно или у меня руки кривые :)
В OnClick кнопки добавил ToolButton.Down := not ToolButton.Down
При первом нажатии топиться, а при втором остается утопленной.


← →
TButton ©   (2004-02-27 18:29) [1]

свойство даун работает :) при groupindex>0


← →
s ©   (2004-02-27 18:36) [2]

TButton:
Кнопки TToolButton в панели TToolBar не имеют groupindex. Там есть свойство grouped(boolean)


← →
s ©   (2004-02-27 18:42) [3]

Понял!
Надо TToolButton.Style установить в tbsCheck и в OnClick использовать ToolButton.Grouped := not ToolButton.Grouped

Только как быть с первой частью вопроса?
...как можно в панели ToolBar со свойством Flat := True необходимые кнопки ToolButton программно привести в активное
состояние, так как если бы по ним проходил указатель мыши.

Помогите!


← →
TButton ©   (2004-02-27 18:44) [4]

что значит
>привести в активное состояние, так как если бы по ним проходил указатель мыши.
???


← →
s ©   (2004-02-27 18:58) [5]

To TButton:
Если панель TToolBar имеет свойство Flat := true, то все кнопки сливаются с поверхностью. При прохождении курсора мыши над такими кнопками они как бы слегка приподнимаются. Так как сделать это с любой кнопкой не проводя над ней мышкой?


← →
TButton ©   (2004-02-27 19:05) [6]

никак... не узнаешь пока не по копаешься в исходниках кнопки. имхо, по честному - никак.


← →
s ©   (2004-02-27 19:08) [7]

Может есть способ?


← →
TButton ©   (2004-02-27 19:10) [8]

"o mama mia mama mia let me go..." (c)Queen
может быть


← →
s ©   (2004-02-27 19:18) [9]

Спасибо хоть за беседу :)


← →
TButton ©   (2004-02-27 19:20) [10]

не за что :)



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

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



Память: 0.47 MB
Время: 0.017 c
1-43485
TButton
2004-02-28 20:09
2004.03.14
Application.Active


1-43564
satron
2004-02-25 00:33
2004.03.14
Подскажите компонент и свойства.


1-43594
LaidBack
2004-02-27 11:20
2004.03.14
Как вызвать нажатие кнопки Minimize у формы?


1-43598
sniper
2004-01-23 13:27
2004.03.14
Срочно! Как из Delphi6 запустить приложение


4-43936
Saimon
2004-01-07 02:47
2004.03.14
Помоготе по SysTray ю...




   Наверх