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

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

Как нарисовать на форме поверх всех контролов [D6, D7]


karton ©   (2006-12-27 07:45:00) 

Здравствуйте, уважаемые!!!
Можно ли нарисовать на форме поверх всех контролов?


Elen   (2006-12-27 12:24:00) [1]


> Можно ли нарисовать на форме поверх всех контролов?

На контроле который поверх всех. (А если у него еще можно прозрачность выставить - вообще красота). А ты что скины делаешь?


DimaBr   (2006-12-27 09:33:00) [2]

Можно, но не нужно - пропадаем смысл всех контролов

VAR ScreenDC: hDC;  
begin
 ScreenDC := GetDC(0); {получить контекст экрана}  
 Ellipse(ScreenDC, 0, 0, 200, 200); {нарисовать}  
 ReleaseDC(0,ScreenDC); {освободить контекст}  
end;


Какое отношение это имеет к созданию компонентов ???


Наверх

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