Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 24.06.2009, 11:49   #1
Alex217Vish
Пользователь
 
Регистрация: 07.02.2009
Сообщений: 31
Печаль Delphi 2009. Кнопки в Ribbon. Свойство CommandStyle со значением csGallery

В своей программе в Delphi 2009 пытаюсь настроит интересную штуку - кнопку, с выпадающим списком ввиде сетки (у TActionClientItem свойство CommandStyle=csGallery, в CommandProperties ButtonType=btSplit). При этом почему-то, в сетке должно быть несколько элементов, но отображается только один. Каковы возможные причины?
Alex217Vish вне форума Ответить с цитированием
Старый 27.06.2009, 09:46   #2
Alex217Vish
Пользователь
 
Регистрация: 07.02.2009
Сообщений: 31
По умолчанию

В Delphi 2009 хочу добавить гелерею как в Office 2007 (картинка приклеплена)

Кода нет, т.к. Delphi это RAD среда. Но последовательность действий привести могу:
1. Создаём приложение
2. Создаём на главной форме Ribbon
3. Кидаем на форму ActionManager
4. На Ribbon правой кнопкой - Add Tab
5. На созданной RibbonPage правой кнопкой - Add Group
6. В Action Manager - ActionBars создаём новую ActionBar
7. Связываем ActionBar (в ActionBar дноимённое св-во в RibbonGroup1
8. Открывает св-во Items и создаём новую TActionClientItem
9. Назначаем ей любую Action (создаём в ActionManager - пр.кн. - Customize, в Action дожна присутствовать картинка)
10. Устанавливаем CommandStyle в csGallery
11. А в CommandProperties ButtonType в bsSplit
12.Проделываем п.8-9 несколько раз в отношении TActionClientItem, созданной в п.8
13. При запуске программы, при нажатии на созданной кнопке на стрелку должно выпадать меню должно получится как на скриншоте

Вообще, те, кто программировал в Delphi 2009 должны былии проделывать что-то подобное (всё-таки функции новые и интересные).
Но результат, как я уже сказал, - 0. Хотя в примере от CodeGear всё ок! (пример находится в C:\Users\Public\Documents\RAD Studio\6.0\Demos\DelphiWin32\VCLWin 32\RibbonControls\Ribbon Demo, в Windows XP в C:\Documents and Settings\Общие документы\RAD Studio\6.0\Demos\DelphiWin32\VCLWin 32\RibbonControls\Ribbon Demo)
Вопрос: Почему???

Изображение

Последний раз редактировалось Alex217Vish; 27.06.2009 в 10:02.
Alex217Vish вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Наше будущее - ribbon andrey4623 Свободное общение 23 26.01.2009 16:54
свойство Visible Delphi Var17 Win Api 1 08.10.2008 11:31
задать свойство Caption на Русском для кнопки mbYes в сообщении MessageDlg Plastik-X БД в Delphi 4 27.04.2008 13:52
триггерные кнопки и кнопки переключатели в DELPHI MARGO Помощь студентам 3 12.11.2007 17:35