Главная страница
    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.039 c
2-1251037909
Начинающий17
2009-08-23 18:31
2009.10.25
работа с файлом


2-1251721550
AndrewG
2009-08-31 16:25
2009.10.25
Splitter


15-1250784466
Пит
2009-08-20 20:07
2009.10.25
Игра меньше тормозит при большем разрешении


2-1251266538
Риг
2009-08-26 10:02
2009.10.25
Зависание в THread


15-1249839719
1324
2009-08-09 21:41
2009.10.25
Будущее DELPHI





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский