![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как сделать треугольное окно с углами в точках, например [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