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

Вниз

Цвет "фона" Button и MainMenu, как поменять?   Найти похожие ветки 

 
den.is ©   (2004-09-09 00:18) [0]

Решил разукрасить прогу, но ни как не могу изменить цвет кнопки (не текста, а фона). Тоже самое и с компонентом MainMenu.
Возможно ли это? Может кто подскажет?

ЗЫ: ни в Faq, ни в форуме этого не нашел =(


 
Gero ©   (2004-09-09 00:20) [1]

Для button - писать наследника и рисовать самому, для TMainMenu - ставить OwnerDraw := True и обрабатывать OmMeasureItem/OnDrawItem(OnAdvancedDrawItem).


 
wl   (2004-09-09 00:25) [2]

темы виндовз экспи рулят


 
Gero ©   (2004-09-09 00:27) [3]

По отношению к меню - не рулят.


 
Garfunkel   (2004-09-09 02:25) [4]

Но зато цвет фона есть у панелей. Ставишь их на форму (Form1), изменяешь размер чтобы были похожи на кнопки и у первой панели по событию MouseDown пишешь:
//-----------------------------------------
procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin
(Sender as TPanel).BevelInner:=bvLowered;
(Sender as TPanel).BevelOuter:=bvLowered;
end;
//------------------------------------------

и на событие MouseUp....

//------------------------------------------
procedure TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton;
 Shift: TShiftState; X, Y: Integer);
begin
(Sender as TPanel).BevelInner:=bvRaised;
(Sender as TPanel).BevelOuter:=bvRaised;
end;
//----------------------------------------------

Ну и остальным панелям-кнопкам ставишь тоже самое. Вот и все. Сойдет я думаю?


 
den.is ©   (2004-09-09 23:03) [5]

Нда, пожалуй это проще чем писать наследника.

ЗЫ: всем спасибо.



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

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

Наверх




Память: 0.45 MB
Время: 0.069 c
3-1093360861
Дима
2004-08-24 19:21
2004.09.26
Table ReadOnly при работе с БД MySQL через OBDC connector


4-1092411169
TeNY
2004-08-13 19:32
2004.09.26
SPTI где можно достать компонент или заголовочный файл


8-1088739507
jb
2004-07-02 07:38
2004.09.26
Площадь полигона


1-1094647438
Garfunkel
2004-09-08 16:43
2004.09.26
Распределение строк по captions


14-1094401976
Stany
2004-09-05 20:32
2004.09.26
исходник для подсчета интернет траффика





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