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

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

Как сделать треугольное окно с углами в точках, например [0,0],[5


acsoft ©   (2003-06-01 15:37:00) 

Как сделать треугольное окно с углами в точках, например [0,0],[50,50] и [0,50]. Не могу разобраться с CreatePolygonRgn.


Yanis   (2003-06-01 18:53:00) [1]


procedure TForm1.FormCreate(Sender: TObject);
var
Pts : array [1..3] of TPoint;
begin
Pts[1] := Point( 0, 0 );
Pts[2] := Point( 50, 50 );
Pts[3] := Point(0, 50 );
SetWindowRgn( Handle, CreatePolygonRgn( Pts, 3, WINDING ), True);
end;

Усё ясно, теперь разобрался?


sniknik   (2003-06-01 18:15:00) [2]

http://www.delphimaster.ru/cgi-bin/download.pl?look=1&id=1052436880&n=1
посмотри (не обращай внимания на комментарии, злые языки)
и сюда (в дополнение "А как Вам понравится эта форма?" )
http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988619922&n=16


acsoft   (2003-06-01 17:12:00) [3]

ggg


Наверх

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