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

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

Обои в программе (BackGround) [D6, Win95/98, WinME, NT4]


xpyctuk ©   (2002-02-18 08:36:00) 

Здраствуйте Проблема такова я хочу чтобы фон моей формы выглядел красиво :) Я на OnRepaint делаю так
for x:=0 to 20 do
for y:=0 to 20 do
Canvas.Draw(x*75,y*75,ImgBackGround.Picture.Graphic);
И у меня фон закрашивается но на форме есть главное меню и оно не закрашивается и получается что сверху остается серая полоса главного меню. Конечно есть у Item-ов менюшки OnDrawItem но здесь я закрашиваю только часть вышеупомянутой серой полосы а оставшая часть такая же серая. В приципе можно было бы в главной менюшке создать Items на всю длину формы но это же идиотизм.
Может быть кто-нибудь знает как можно изменить BackGround главной меню формы или сделать её прозрачной (Transparent=True. В принципе такое может быть в FAQ но некоторые вопросы Faq у меня не отображаются (например Faq пользовательский интерфейс-->TForm из 29 ответов я вижу только 4 ответа) Заранее спасибо.


Sasha9   (2002-02-21 12:35:00) [1]

Попробуй:
var dc:hdc;
canv:tcanvas;
.........
dс:=GetWindowDC(form1.handle);//device context handle всей формы
//включая неклиентскую область
canv:=tcanvas.create;
canv.handle:=dc;

далее используй canv как canvas формы.


dmitriyk   (2002-02-19 03:38:00) [2]

Зайди на http://www.Pie-Tools.de
Выбери Inglish.
Там есть Menus. Это то что тебе надо


Наверх

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