Пример #1
0
        public TPaintGrid(FrmMain AOwnerForm /*TCanvas* ACanvas, HWND AOwnerForm*/)
        {
            f_Width             = f_Height = 0;
            f_StepPixels        = 6;
            f_StepPixelsGrid    = 8;
            f_FonColor          = Color.White;
            f_PixelColor        = Color.Black;
            f_PaintPixels       = true;
            f_OwnerForm         = AOwnerForm;
            f_LEControl         = false;
            f_WndHandler        = new IntPtr();
            f_UnderControl      = null;
            f_RefreshFon        = true;
            f_CurrEndPoint      = new Point(80, 100);
            f_X_offs            = 0; //смещение по Х
            f_Y_offs            = 0; //смещение по Y
            f_WSPenWidth        = 1;
            f_X_offsSum         = f_Y_offsSum = 0;
            f_LineColor         = Color.Black;
            f_BrushTFE          = false;
            f_BrushColor        = Color.White;
            f_LeaveFlagColor    = Color.Red;
            f_EnterFlagColor    = Color.Lime;
            f_CurrentCommand    = 0;
            f_FlagType          = 0;
            f_TypMouseOperation = 0;
            f_SelectedTFE       = null;
            f_SelectedTFS       = null;
            //         f_FrameColorTFE = null;
            //        f_FrameColorTFS = null;
            f_WSMoving = false;
            //    f_SelectedFlag = null;
            f_Regim = 0;
            f_SelectedAlternateFirst = null; //первая выбранная ТФС для альтернативы
            f_SelectedAlternateLast  = null; //первая выбранная ТФС для альтернативы
            f_SelectedDeleteTFSFirst = null; //первая выбранная ТФС для альтернативы
            f_SelectedDeleteTFSLast  = null; //первая выбранная ТФС для альтернативы


            /*        f_FontTFE = new Font();
             *      ScrBitmap = new Graphics::TBitmap;
             *      ScrBitmapCopy = new Graphics::TBitmap;*/
            f_ClipPath     = new TClipPath();
            g_PainterList  = new TPainterList();
            f_ListForPaint = new TListForPaint();
            /*   f_FlagController = new TFlagController();*/
            f_InvalidateList       = new TInvalidateList();
            f_LineCutting          = new TLineCutting(f_Canvas);
            g_AlternateList        = new TAlternateList();
            f_AltWSList            = new TAltWSList();
            f_localVisiblearrowall = false;
        }
Пример #2
0
 /*
  *      void FreeList();
  *      int FindAlternateItem(TBaseWorkShape* AWorkShape, bool AFirst);
  *      TBaseWorkShape* FindNextWorkShape(TBaseWorkShape* W);
  *      TBaseWorkShape* FindPriorWorkShape(TBaseWorkShape* W);
  *      void DoAddAlternateItem(TBaseWorkShape* AWorkShape, int AId, int ANumAlt, int AParentId, int AParentNumAlt, bool AFirst);
  *      void DoDeleteAlternateItem(TBaseWorkShape* AWorkShape, int AId, int ANumAlt, bool AFirst);
  *      void __fastcall SetArrowColor(TColor AValue);
  *      void __fastcall SetEnterArrowColor(TColor AValue);
  *      void __fastcall SetPenColor(TColor AValue);
  *      void __fastcall SetPenWidth(int AValue);
  *      void RecalcCoordArrow();
  *      public:*/
 public TAlternateController(IntPtr AOwnerForm)
 {
     f_List        = new List <object>();
     FOnListChange = null;
     f_OwnerForm   = AOwnerForm;
     //      f_ArrowColor = new Color(0);
     //      f_EnterArrowColor = new Color(0);
     //       f_PenColor = new Color(0);
     f_PenWidth  = 1;
     f_LEControl = false;
     //     f_WndHandler = null;
     f_UnderControl        = null;
     f_ClipPath            = new TClipPath();
     f_UpdateAlternateList = false;
 }