Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.10.25;
Скачать: [xml.tar.bz2];

Вниз

XP Style и Standard   Найти похожие ветки 

 
wah ©   (2009-08-31 11:00) [0]

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


 
TIF ©   (2009-08-31 12:01) [1]

> есть свойство 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, которое как раз позволяет выполнить этот трюк


 
wah ©   (2009-08-31 14:46) [2]

> [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:47) [3]

> [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-09-01 17:43) [4]

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

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


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

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

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


 
TIF ©   (2009-09-01 21:20) [6]

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

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


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

> [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-02 04:08) [8]

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

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

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


 
MonoLife ©   (2009-09-02 04:14) [9]

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



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

Форум: "Начинающим";
Текущий архив: 2009.10.25;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.036 c
1-1221741558
kaif
2008-09-18 16:39
2009.10.25
Кодировка в ресурсах EXE-файла для EventLog


2-1251465886
stas
2009-08-28 17:24
2009.10.25
Сообщение о успешной установке сервиса


2-1251702004
wah
2009-08-31 11:00
2009.10.25
XP Style и Standard


15-1251059406
Юрий
2009-08-24 00:30
2009.10.25
С днем рождения ! 24 августа 2009 понедельник


2-1251291344
Alexey
2009-08-26 16:55
2009.10.25
Удаление элемента из динамического массива





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский