コード例 #1
0
        override public void Prepare()
        {
            TArrowLine    Line, Lnb;
            Point         P1 = new Point(), P2 = new Point();
            int           tmp_x;
            TTfeRectShape Rct;
            TTfeEllShape  Ell;

            Rct = (TTfeRectShape)(GetWorkShape(0));
            Ell = (TTfeEllShape)(GetWorkShape(1));
            Rct.GetTailPoint(0, ref P1);
            Line        = (TArrowLine)(GetWorkLine(0));
            Line.xStart = StartPoint.X;
            Line.yStart = StartPoint.Y;
            Line.xEnd   = P1.X - 2 * F_Step;
            Line.yEnd   = P1.Y;
            Line.Bend   = CalcBend(Line.xStart, Line.xEnd);
            Lnb         = Line;

            Line        = (TArrowLine)(GetWorkLine(1));
            Line.xStart = Lnb.xEnd;
            Line.yStart = Lnb.yEnd;
            Line.xEnd   = P1.X;
            Line.yEnd   = P1.Y;

            Rct.GetTailPoint(1, ref P1);
            Ell.GetTailPoint(0, ref P2);

            Line        = (TArrowLine)(GetWorkLine(2));
            Line.xStart = P1.X;
            Line.yStart = P1.Y;
            Line.xEnd   = P2.X;
            Line.yEnd   = P2.Y;

            Rct.GetTailPoint(0, ref P1);
            Ell.GetTailPoint(1, ref P2);

            Line        = (TArrowLine)(GetWorkLine(3));
            Line.xStart = P1.X;
            Line.yStart = P1.Y;
            Line.xEnd   = P2.X;
            Line.yEnd   = P2.Y;

            Ell.GetTailPoint(2, ref P2);
            Line        = (TArrowLine)(GetWorkLine(4));
            Line.xStart = P2.X;
            Line.yStart = P2.Y;
            Line.xEnd   = P2.X + 2 * F_Step;
            Line.yEnd   = P2.Y;

            base.Prepare();
        }
コード例 #2
0
        void CreateLines()
        {
            TArrowLine    Line, Lnb;
            Point         P1 = new Point(), P2 = new Point();
            int           tmp_x;
            TTfeRectShape Rct;
            TTfeEllShape  Ell;

            FreeWorkLines();
            F_LastLineId = F_NumberLineId;

            Rct = (TTfeRectShape)(GetWorkShape(0));
            Ell = (TTfeEllShape)(GetWorkShape(1));
            Rct.GetTailPoint(0, ref P1);
            F_LastLineId++;
            //1
            Line        = new TArrowLine(F_Step, F_LastLineId);
            Line.xStart = StartPoint.X;
            Line.yStart = StartPoint.Y;
            Line.xEnd   = P1.X - 2 * F_Step;
            Line.yEnd   = P1.Y;
            Line.Bend   = CalcBend(Line.xStart, Line.xEnd);
            AddLine(Line);
            Lnb = Line;

            F_LastLineId++;
            //2
            Line        = new TArrowLine(F_Step, F_LastLineId);
            Line.xStart = Lnb.xEnd;
            Line.yStart = Lnb.yEnd;
            Line.xEnd   = P1.X;
            Line.yEnd   = P1.Y;
            AddLine(Line);

            Rct.GetTailPoint(1, ref P1);
            Ell.GetTailPoint(0, ref P2);

            F_LastLineId++;
            //3
            Line        = new TArrowLine(F_Step, F_LastLineId);
            Line.xStart = P1.X;
            Line.yStart = P1.Y;
            Line.xEnd   = P2.X;
            Line.yEnd   = P2.Y;
            AddLine(Line);

            Rct.GetTailPoint(0, ref P1);
            Ell.GetTailPoint(1, ref P2);

            F_LastLineId++;
            //4
            Line        = new TArrowLine(F_Step, F_LastLineId);
            Line.xStart = P1.X;
            Line.yStart = P1.Y;
            Line.xEnd   = P2.X;
            Line.yEnd   = P2.Y;
            AddLine(Line);

            Ell.GetTailPoint(2, ref P2);
            F_LastLineId++;
            //5
            Line        = new TArrowLine(F_Step, F_LastLineId);
            Line.xStart = P2.X;
            Line.yStart = P2.Y;
            Line.xEnd   = P2.X + 2 * F_Step;
            Line.yEnd   = P2.Y;
            AddLine(Line);
        }
コード例 #3
0
        public void Prepare()
        {
            TArrowLine    Line, Lnb, Lnb3;
            Point         P1 = new Point(), P2 = new Point(), VP = new Point();
            int           tmp_x;
            TTfeRectShape Rct, Rct2;
            TTfeEllShape  Ell;


            Rct  = (TTfeRectShape)(GetWorkShape(0));
            Rct2 = (TTfeRectShape)(GetWorkShape(1));
            Ell  = (TTfeEllShape)(GetWorkShape(2));
            Rct2.GetTailPoint(0, ref P1);
            VP.X = P1.X - 4 * F_Step;
            VP.Y = P1.Y;
            //1
            Line        = (TArrowLine)(GetWorkLine(0));
            Line.xStart = StartPoint.X;
            Line.yStart = StartPoint.Y;
            Line.xEnd   = VP.X;
            Line.yEnd   = VP.Y;
            Line.Bend   = CalcBend(Line.xStart, Line.xEnd);
            Lnb         = Line;


            //2
            Rct.GetTailPoint(0, ref P1);
            Line        = (TArrowLine)(GetWorkLine(1));
            Line.xStart = Lnb.xEnd;
            Line.yStart = Lnb.yEnd;
            Line.xEnd   = P1.X;
            Line.yEnd   = P1.Y;
            Line.Bend   = 2;


            Rct.GetTailPoint(1, ref P1);
            Ell.GetTailPoint(1, ref P2);
            //3
            Line        = (TArrowLine)(GetWorkLine(2));
            Line.xStart = P1.X;
            Line.yStart = P1.Y;
            Line.xEnd   = P2.X;
            Line.yEnd   = P2.Y;
            Line.Bend   = 1;

            Rct2.GetTailPoint(0, ref P1);
            //4
            Line        = (TArrowLine)(GetWorkLine(3));
            Line.xStart = Lnb.xEnd;
            Line.yStart = Lnb.yEnd;
            Line.xEnd   = P1.X;
            Line.yEnd   = P1.Y;

            Rct2.GetTailPoint(1, ref P1);
            Ell.GetTailPoint(0, ref P2);
            //5
            Line        = (TArrowLine)(GetWorkLine(4));
            Line.xStart = P1.X;
            Line.yStart = P1.Y;
            Line.xEnd   = P2.X;
            Line.yEnd   = P2.Y;


            //6
            Ell.GetTailPoint(2, ref P1);
            Line        = (TArrowLine)(GetWorkLine(5));
            Line.xStart = P1.X;
            Line.yStart = P1.Y;
            Line.xEnd   = P1.X + 2 * F_Step;
            Line.yEnd   = P1.Y;

            base.Prepare();
        }