|
|
Определяет точку на плоскости.
Создание объекта
pntObj=new TPoint();
pntObj=new TPoint(x,y);
pntObj=Point(x,y);
Собственные свойства
|
Свойство
| Тип
| Описание
|
x
| Number
| абсцисса точки
|
y
| Number
| ордината точки
|
|
Стандартные свойства
Стандартные методы
// Главная форма frm=new TForm(); frm.Caption="JS+ - базовый компонент TPoint"; frm.Width =525; frm.Height=375; frm.OnPaint=frm_Paint;
// Строка состояния stb=new TStatusBar(frm); stb.SimpleText= " Спираль, построенная с использованием компонентов TPoint";
// Массив опорных точек pnt_lst=new Array(); for (i=0,tab=20,x=y=tab,dx=frm.ClientWidth-x,dy=stb.Top-y;dy>=tab;) { pnt_lst[i++]=Point(x,y); dx-=tab; pnt_lst[i++]=Point(x+=dx,y); if ((dy-=tab)>=tab) { pnt_lst[i++]=Point(x,y+=dy); if (i>3) dx-=tab; pnt_lst[i++]=Point(x-=dx,y); dy-=tab; y-=dy; } }
frm.ShowModal();
// Обработчик события OnPaint function frm_Paint(frm) { var cnv=frm.Canvas;
cnv.Pen.Color=clHighlight; cnv.Polyline(pnt_lst); }
Совместимость
C++ Builder/Delphi
|
JS+ | Руководство пользователя
|
|
|
|
|
|