Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

XP Style и Standard


wah ©   (2009-08-31 11:00:00) 

У ActionManager'a есть свойство Style с выбором между XP и Standard. Я пытался изменить его в run-time - не получилось. Возможно что-то не так делал. А реально ли это вообще? В сети мало инфы про это.
С ув.


MonoLife   (2009-09-02 04:14:00) [1]

Если не ошибаюсь, нужно подключение XPmanifest для отображения всех компонентов в стиле XP. Или имеется в виду run-time = designe-time?


TIF   (2009-09-02 04:08:00) [2]

> Ставишь ActionManager, меню, тулбар.

Ну так всё-таки это же будет только для меню и тулбара? А не для ВСЕХ компонентов?

Если я обычную кнопку размещу на форме, на неё ведь эти переключения не повлияют? Или всё-таки повлияют...


wah   (2009-09-02 00:20:00) [3]

> [6] TIF ©   (01.09.09 21:20)
> > без понятия как это реализовать :)

Все в \Delphi7\Demos\ActionBands\:
type
 StdStyleActn: TAction;
 XPStyleActn: TAction;
 ShadowActn: TAction;
procedure TForm1.StdStyleActnExecute(Sender: TObject);
begin
 ActionManager1.Style := StandardStyle;
end;
procedure TForm1.XPStyleActnExecute(Sender: TObject);
begin
 ActionManager1.Style := XPStyle;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
 XPStyleActn.Checked := ActionManager1.Style = XPStyle;
 StdStyleActn.Checked := ActionManager1.Style = StandardStyle;
end;

Ставишь ActionManager, меню, тулбар.
Про ActionManager здесь http://www.interface.ru/home.asp?artId=8519


TIF   (2009-09-01 21:20:00) [4]

> Оказалось как два пальца.

Эм... И как? :)
А то я
> без понятия как это реализовать :)


wah   (2009-09-01 19:43:00) [5]

> [4] TIF ©   (01.09.09 17:43)
> Так всё-таки что требовалось-то... Только для каких-то компонентов
> стиль поменять или для всех?

Для всех. Оказалось как два пальца. Но это же знать надо, а я еще не очень.


TIF   (2009-09-01 17:43:00) [6]

> Оказывается есть Demo в D7, лежит здесь:\Delphi7\Demos\ActionBands\WordPad.dpr

Там много чего есть полезного и интересного :)
Так всё-таки что требовалось-то... Только для каких-то компонентов стиль поменять или для всех?


wah   (2009-08-31 14:47:00) [7]

> [1] TIF ©   (31.08.09 12:01)
> http://docs.embarcadero.com/products/rad_studio/delphiAndcpp2009/HelpUpda
> te2/EN/html/delphivclwin32/ActnMan_TActionManager_Style.html


Спасибо за наводку, нашел статейку на англ.: http://www.blong.com/Conferences/BorCon2003/Actions/6102.htm
Оказывается есть Demo в D7, лежит здесь:\Delphi7\Demos\ActionBands\WordPad.dpr


wah   (2009-08-31 14:46:00) [8]

> [1] TIF ©   (31.08.09 12:01)
> http://docs.embarcadero.com/products/rad_studio/delphiAndcpp2009/HelpUpda
> te2/EN/html/delphivclwin32/ActnMan_TActionManager_Style.html


Спасибо за наводку, нашел статейку на англ.: http://www.blong.com/Conferences/BorCon2003/Actions/6102.htm
Оказывается есть Demo в D7, лежит здесь:\Delphi7\Demos\ActionBands\WordPad.dpr


TIF   (2009-08-31 12:01:00) [9]

> есть свойство Style

Но влияет оно не на все компоненты, а только на Action Bar. См. справку:
http://docs.embarcadero.com/products/rad_studio/delphiAndcpp2009/HelpUpdate2/EN/html/delphivclwin32/ActnMan_TActionManager_Style.html

Изменение стиля в run-time - возможно, но я без понятия как это реализовать :)
Можно подсмотреть в компонентах LMD: http://lmd.de

У них есть свойство, что-то вроде XPStyle, которое как раз позволяет выполнить этот трюк


Наверх

Титульная страница Поиск, карта сайта Написать письмо