|
@@ -132,6 +132,12 @@ function EditNotSymbolic: Boolean;
|
|
|
// Eng:
|
|
// Eng:
|
|
|
procedure SetVisibleElement(numEl: LongWord; flag: Boolean);
|
|
procedure SetVisibleElement(numEl: LongWord; flag: Boolean);
|
|
|
|
|
|
|
|
|
|
+var
|
|
|
|
|
+ // угол поворота
|
|
|
|
|
+ geAngle: Single = 0;
|
|
|
|
|
+ // точка поворота
|
|
|
|
|
+ pointManager: zglTPoint2D = (x: 0; y: 0);
|
|
|
|
|
+
|
|
|
implementation
|
|
implementation
|
|
|
|
|
|
|
|
{$IfDef FULL_LOGGING}
|
|
{$IfDef FULL_LOGGING}
|
|
@@ -142,10 +148,6 @@ uses
|
|
|
var
|
|
var
|
|
|
// RU: поле ввода (пока просто вывода текста)
|
|
// RU: поле ввода (пока просто вывода текста)
|
|
|
UseText: geglPEdit;
|
|
UseText: geglPEdit;
|
|
|
- // точка поворота
|
|
|
|
|
- pointManager: zglTPoint2D = (x: 0; y: 0);
|
|
|
|
|
- // угол поворота
|
|
|
|
|
- geAngle: Single = 0;
|
|
|
|
|
// цвет по умолчанию.
|
|
// цвет по умолчанию.
|
|
|
geDefColor: geglDefColor;
|
|
geDefColor: geglDefColor;
|
|
|
useFont: zglPFont; // защита от многопроцессорного исполнения
|
|
useFont: zglPFont; // защита от многопроцессорного исполнения
|
Seenkao