Exemplo n.º 1
0
        override public void Init()
        {
            Point P1 = new Point();

            FreeWorkLines();
            FreeWorkShapes();
            TTfeRectShape Shape;

            F_LastShapeId = F_NumberShapeId;
            P1.X          = StartPoint.X + 6 * F_Step;
            P1.Y          = StartPoint.Y - 4 * F_Step;

            F_LastShapeId++;
            F_NumberShapeId = F_LastShapeId;
            Shape           = new TTfeRectShape(P1.X, P1.Y, F_Step, F_LastShapeId);
            AddShape(Shape);

            P1.Y = StartPoint.Y + 4 * F_Step;
            F_LastShapeId++;
            Shape = new TTfeRectShape(P1.X, P1.Y, F_Step, F_LastShapeId);
            AddShape(Shape);
            CreateLines();
            CalcWidthWork();
            F_Indent = FirstLine.xEnd - FirstLine.xStart;
            VPoint   = new Point(0, 0);
        }
Exemplo n.º 2
0
        override public void Init()
        {
            Point P1 = new Point(), P2 = new Point();

            FreeWorkLines();
            FreeWorkShapes();
            TTfeRectShape  Rct;
            TTfeRhombShape Rhomb;

            F_LastShapeId = F_NumberShapeId;
            P1.X          = StartPoint.X + 2 * F_Step;
            P1.Y          = StartPoint.Y;

            F_LastShapeId++;
            F_NumberShapeId = F_LastShapeId;
            Rhomb           = new TTfeRhombShape(P1.X, P1.Y, F_Step, F_LastShapeId + 1);
            Rhomb.TailLeft  = true;
            Rhomb.TailTop   = true;
            Rhomb.TailRight = true;
            AddShape(Rhomb);

            Rhomb.GetTailPoint(1, ref P1);
            P1.X = P1.X + 4 * F_Step;
            P1.Y = P1.Y - 2 * F_Step;
            F_LastShapeId++;
            Rct = new TTfeRectShape(P1.X, P1.Y, F_Step, F_LastShapeId - 1);
            AddShape(Rct);

            CreateLines();
            F_Indent = FirstLine.xEnd - FirstLine.xStart;
        }
Exemplo n.º 3
0
        override public void Init()
        {
            Point P1 = new Point(), P2 = new Point();

            FreeWorkLines();
            FreeWorkShapes();
            TTfeRectShape Rct;
            TTfeEllShape  Ell;

            F_LastShapeId = F_NumberShapeId;
            P1.X          = StartPoint.X + 4 * F_Step;
            P1.Y          = StartPoint.Y;

            F_LastShapeId++;
            F_NumberShapeId = F_LastShapeId;
            Rct             = new TTfeRectShape(P1.X, P1.Y, F_Step, F_LastShapeId);
            AddShape(Rct);

            Rct.GetTailPoint(1, ref P2);
            P2.X = P2.X + 2 * F_Step;
            F_LastShapeId++;
            Ell           = new TTfeEllShape(P2.X, P2.Y, F_Step, F_LastShapeId);
            Ell.TailLeft  = true;
            Ell.TailTop   = true;
            Ell.TailRight = true;
            AddShape(Ell);
            CreateLines();
            CalcWidthWork();
            F_Indent = FirstLine.xEnd - FirstLine.xStart;
        }
Exemplo n.º 4
0
        public TBaseShape CloneShape(TBaseShape ADest)
        {
            TBaseShape mShape = null;

            if (ADest == null)
            {
                return(null);
            }
            switch (ADest.TypeShape)
            {
            case 5:
                mShape = new TTfeRectShape(0, 0, 0, 0);
                break;

            case 6:
                mShape = new TTfeRhombShape(0, 0, 0, 0);
                break;

            case 7:
                mShape = new TTfeEllShape(0, 0, 0, 0);
                break;

            case 8:
                mShape = new TTfeHexahedronShape(0, 0, 0, 0);
                break;
            }
            if (mShape == null)
            {
                return(null);
            }
            mShape.Clon = ADest;
            ADest.CopyObject(mShape);
            return(mShape);
        }
Exemplo n.º 5
0
        override public void Init()
        {
            FreeWorkLines();
            FreeWorkShapes();
            TTfeRectShape Shape;

            F_LastShapeId = F_NumberShapeId;
            F_LastShapeId++;
            F_NumberShapeId = F_LastShapeId;
            Shape           = new TTfeRectShape(StartPoint.X + 2 * F_Step, StartPoint.Y, F_Step, F_LastShapeId);
            AddShape(Shape);
            CreateLines();
            CalcWidthWork();
            F_Indent = FirstLine.xEnd - FirstLine.xStart;
        }
Exemplo n.º 6
0
        override public void Init()
        {
            Point P1 = new Point(), P2 = new Point();
            int   n1, n2, n3;

            FreeWorkLines();
            FreeWorkShapes();
            TTfeRectShape  Rct;
            TTfeRhombShape Rhomb;

            F_LastShapeId = F_NumberShapeId;
            P1.X          = StartPoint.X + 2 * F_Step;
            P1.Y          = StartPoint.Y;

            F_LastShapeId++;
            F_NumberShapeId = F_LastShapeId;
            F_LastShapeId++;
            F_LastShapeId++;
            n3 = F_LastShapeId;
            n2 = n3 - 1;
            n1 = n2 - 1;

            Rhomb            = new TTfeRhombShape(P1.X, P1.Y, F_Step, n3);
            Rhomb.TailLeft   = true;
            Rhomb.TailTop    = true;
            Rhomb.TailBottom = true;
            AddShape(Rhomb);

            Rhomb.GetTailPoint(1, ref P1);
            P1.X = P1.X + 4 * F_Step;
            P1.Y = P1.Y - 2 * F_Step;

            Rct = new TTfeRectShape(P1.X, P1.Y, F_Step, n1);
            AddShape(Rct);

            Rhomb.GetTailPoint(3, ref P1);
            P1.X = P1.X + 4 * F_Step;
            P1.Y = P1.Y + 2 * F_Step;
            Rct  = new TTfeRectShape(P1.X, P1.Y, F_Step, n2);
            AddShape(Rct);
            CreateLines();
            CalcWidthWork();
            F_Indent = FirstLine.xEnd - FirstLine.xStart;
        }
Exemplo n.º 7
0
        override public void Init()
        {
            Point P1 = new Point(), P2 = new Point();

            FreeWorkLines();
            FreeWorkShapes();
            TTfeRectShape       Rct;
            TTfeHexahedronShape Hexa;

            F_LastShapeId = F_NumberShapeId;
            P1.X          = StartPoint.X + 2 * F_Step;
            P1.Y          = StartPoint.Y;

            F_LastShapeId++;
            F_NumberShapeId = F_LastShapeId;
            Hexa            = new TTfeHexahedronShape(P1.X, P1.Y, F_Step, F_LastShapeId + 2);
            Hexa.TailLeft   = true;
            Hexa.TailTop    = true;
            Hexa.TailBottom = true;
            AddShape(Hexa);

            Hexa.GetTailPoint(1, ref P1);
            P1.X = P1.X + 4 * F_Step;
            P1.Y = P1.Y - 2 * F_Step;
            F_LastShapeId++;
            Rct = new TTfeRectShape(P1.X, P1.Y, F_Step, F_LastShapeId - 1);
            AddShape(Rct);

            Hexa.GetTailPoint(3, ref P1);
            P1.X = P1.X + 4 * F_Step;
            P1.Y = P1.Y + 2 * F_Step;
            F_LastShapeId++;
            Rct = new TTfeRectShape(P1.X, P1.Y, F_Step, F_LastShapeId - 1);
            AddShape(Rct);
            CreateLines();
            CalcWidthWork();
            F_Indent = FirstLine.xEnd - FirstLine.xStart;
        }