/* void SaveParamAlternateToXML(TBaseShape ATFE, TGlsXmlElement AElement); * void SaveParamAlternateToBin(TBaseShape ATFE, SF_TFE A_tfe, THandle AFile); * void SaveOgrSovmToXML(TDischargedMassiv AOgrSovm, TGlsXmlElement AElement); * void SaveTypeDecision(TGlsXmlElement AElement); * void SaveOgrSovmToBin(TDischargedMassiv AOgrSovm, THandle AFile); * void SaveTypeDecisionToBin(THandle AFile);*/ public TListNode() { TNodeAlt Alt; MainList = new List <object>(); AncestorList = new List <object>(); AlternateList = new List <object>(); Searcher = new TNodeSearchController(); Searcher.SetMainList(this); FOnListChange = null; f_Update = false; f_Changes = false; f_StackDustController = new TStackDustController(); }
/* * 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; }