Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.03.07;
Скачать: CL | DM;

Вниз

Обои в программе (BackGround)   Найти похожие ветки 

 
xpyctuk ©   (2002-02-18 08:36) [0]

Здраствуйте Проблема такова я хочу чтобы фон моей формы выглядел красиво :) Я на 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 ответа) Заранее спасибо.


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

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


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

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

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



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

Текущий архив: 2002.03.07;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
3-19092
Mishka
2002-02-08 21:33
2002.03.07
Delphi+MS SQL


6-19274
Serg!
2001-12-19 12:18
2002.03.07
Подскажите плз как заставить net send egor message принимать мессаги на компе с 9Х/МЕ


1-19177
1g0r
2002-02-21 19:06
2002.03.07
Ошибка ~Control has no parent window~ помогите разобраться почему


3-19108
HDD
2002-02-11 13:10
2002.03.07
Помогите люди добрые!


14-19327
Zevsus
2002-01-20 22:41
2002.03.07
Найти активное приложение