Delphi 12 控件之SUIPack6.4 for C5D5-XE12 Athens.7z

// Borland C++ Builder // Copyright (c) 1995, 1999 by Borland International // All rights reserved // (DO NOT EDIT: machine generated header) 'DsgnIntf.pas' rev: 5.00 #ifndef DsgnIntfHPP #define DsgnIntfHPP #pragma delphiheader begin #pragma option push -w- #pragma option push -Vx #include <Menus.hpp> // Pascal unit #include <Masks.hpp> // Pascal unit #include <TypInfo.hpp> // Pascal unit #include <IniFiles.hpp> // Pascal unit #include <Contnrs.hpp> // Pascal unit #include <Forms.hpp> // Pascal unit #include <Controls.hpp> // Pascal unit #include <Graphics.hpp> // Pascal unit #include <Classes.hpp> // Pascal unit #include <SysUtils.hpp> // Pascal unit #include <ActiveX.hpp> // Pascal unit #include <Windows.hpp> // Pascal unit #include <SysInit.hpp> // Pascal unit #include <System.hpp> // Pascal unit //-- user supplied ----------------------------------------------------------- namespace Dsgnintf { //-- type declarations ------------------------------------------------------- #pragma option push -b- enum TEditAction { eaUndo, eaRedo, eaCut, eaCopy, eaPaste, eaDelete, eaSelectAll, eaPrint, eaBringToFront, eaSendToBack, eaAlignToGrid, eaFlipChildrenAll, eaFlipChildrenSelected }; #pragma option pop #pragma option push -b- enum DsgnIntf__1 { esCanUndo, esCanRedo, esCanCut, esCanCopy, esCanPaste, esCanDelete, esCanZOrder, esCanAlignGrid, esCanEditOle, esCanTabOrder, esCanCreationOrder, esCanPrint, esCanSelectAll }; #pragma option pop typedef Set<DsgnIntf__1, esCanUndo, esCanSelectAll> TEditState; __interface IEventInfos; typedef System::DelphiInterface<IEventInfos> _di_IEventInfos; __interface INTERFACE_UUID("{11667FF0-7590-11D1-9FBC-0020AF3D82DA}") IEventInfos : public IUnknown { public: virtual int __fastcall GetCount(void) = 0 ; virtual AnsiString __fastcall GetEventValue(int Index) = 0 ; virtual AnsiString __fastcall GetEventName(int Index) = 0 ; virtual void __fastcall ClearEvent(int Index) = 0 ; __property int Count = {read=GetCount}; }; __interface IPersistent; typedef System::DelphiInterface<IPersistent> _di_IPersistent; __interface INTERFACE_UUID("{82330133-65D1-11D1-9FBB-0020AF3D82DA}") IPersistent : public IUnknown { public: virtual void __fastcall DestroyObject(void) = 0 ; virtual bool __fastcall Equals(const _di_IPersistent Other) = 0 ; virtual AnsiString __fastcall GetClassname(void) = 0 ; virtual _di_IEventInfos __fastcall GetEventInfos(void) = 0 ; virtual AnsiString __fastcall GetNamePath(void) = 0 ; virtual _di_IPersistent __fastcall GetOwner(void) = 0 ; virtual bool __fastcall InheritsFrom(const AnsiString Classname) = 0 ; virtual bool __fastcall IsComponent(void) = 0 ; virtual bool __fastcall IsControl(void) = 0 ; virtual bool __fastcall IsWinControl(void) = 0 ; __property AnsiString Classname = {read=GetClassname}; __property _di_IPersistent Owner = {read=GetOwner}; __property AnsiString NamePath = {read=GetNamePath}; __property _di_IEventInfos EventInfos = {read=GetEventInfos}; }; __interface IComponent; typedef System::DelphiInterface<IComponent> _di_IComponent; __interface INTERFACE_UUID("{B2F6D681-5098-11D1-9FB5-0020AF3D82DA}") IComponent : public IPersistent { public: virtual _di_IComponent __fastcall FindComponent(const AnsiString Name) = 0 ; virtual int __fastcall GetComponentCount(void) = 0 ; virtual _di_IComponent __fastcall GetComponents(int Index) = 0 ; virtual Classes::TComponentState __fastcall GetComponentState(void) = 0 ; virtual Classes::TComponentStyle __fastcall GetComponentStyle(void) = 0 ; virtual Windows::TSmallPoint __fastcall GetDesignInfo(void) = 0 ; virtual Windows::TPoint __fastcall GetDesignOffset(void) = 0 ; virtual Windows::TPoint __fastcall GetDesignSize(void) = 0 ; virtual AnsiString __fastcall GetName(void) = 0 ; HIDESBASE virtual _di_IComponent __fastcall GetOwner(void) = 0 ; virtual _di_IComponent __fastcall GetParent(void) = 0 ; virtual void __fastcall SetDesignInfo(const Windows::TSmallPoint Point) = 0 ; virtual void __fastcall SetDesignOffset(const Windows::TPoint &Point) = 0 ; virtual void __fastcall SetDesignSize(const Windows::TPoint &Point) = 0 ; virtual void __fastcall SetName(const AnsiString Value) = 0 ; __property int ComponentCount = {read=GetComponentCount}; __property _di_IComponent Components[int Index] = {read=GetComponents}; __property Classes::TComponentState ComponentState = {read=GetComponentState}; __property Classes::TComponentStyle ComponentStyle = {read=GetComponentStyle}; __property Windows::TSmallPoint DesignInfo = {read=GetDesignInfo, write=SetDesignInfo}; __property Windows::TPoint DesignOffset = {read=GetDesignOffset, write=SetDesignOffset}; __property Windows::TPoint DesignSize = {read=GetDesignSize, write=SetDesignSize}; __property AnsiString Name = {read=GetName, write=SetName}; __property _di_IComponent Owner = {read=GetOwner}; __property _di_IComponent Parent = {read=GetParent}; }; __interface IImplementation; typedef System::DelphiInterface<IImplementation> _di_IImplementation; __interface INTERFACE_UUID("{F9D448F2-50BC-11D1-9FB5-0020AF3D82DA}") IImplementation : public IUnknown { public: virtual System::TObject* __fastcall GetInstance(void) = 0 ; }; __interface IDesignerSelections; typedef System::DelphiInterface<IDesignerSelections> _di_IDesignerSelections; __interface INTERFACE_UUID("{82330134-65D1-11D1-9FBB-0020AF3D82DA}") IDesignerSelections : public IUnknown { public: virtual int __fastcall Add(const _di_IPersistent Item) = 0 ; virtual bool __fastcall Equals(const _di_IDesignerSelections List) = 0 ; virtual _di_IPersistent __fastcall Get(int Index) = 0 ; virtual int __fastcall GetCount(void) = 0 ; __property int Count = {read=GetCount}; __property _di_IPersistent Items[int Index] = {read=Get/*, default*/}; }; __interface IComponentList; typedef System::DelphiInterface<IComponentList> _di_IComponentList; class DELPHICLASS TDesignerSelectionList; __interface INTERFACE_UUID("{8ED8AD16-A241-11D1-AA94-00C04FB17A72}") IComponentList : public IUnknown { public: virtual TDesignerSelectionList* __fastcall GetComponentList(void) = 0 ; }; class PASCALIMPLEMENTATION TDesignerSelectionList : public System::TInterfacedObject { typedef System::TInterfacedObject inherited; private: Classes::TList* FList; int __fastcall Intf_Add(const _di_IPersistent Item); bool __fastcall Intf_Equals(const _di_IDesignerSelections List); _di_IPersistent __fastcall Intf_Get(int Index); Classes::TPersistent* __fastcall Get(int Index); int __fastcall GetCount(void); TDesignerSelectionList* __fastcall GetComponentList(void); public: __fastcall TDesignerSelectionList(void); __fastcall virtual ~TDesignerSelectionList(void); int __fastcall Add(Classes::TPersistent* Item); bool __fastcall Equals(TDesignerSelectionList* List); __property int Count = {read=GetCount, nodefault}; __property Classes::TPersistent* Items[int Index] = {read=Get/*, default*/}; private: void *__IDesignerSelections; /* Dsgnintf::IDesignerSelections [Get=Intf_Get, Equals=Intf_Equals, Add=Intf_Add ] */ void *__IComponentList; /* Dsgnintf::IComponentList */ public: operator IComponentList*(void) { return (IComponentList*)&__IComponentList; } operator IDesignerSelections*(void) { return (IDesignerSelections*)&__IDesignerSelections; } }; #pragma option push -b- enum TLocalMenuFilter { lmModule, lmComponent, lmDesigner }; #pragma option pop typedef Set<TLocalMenuFilter, lmModule, lmDesigner> TLocalMenuFilters; __interface IFormDesigner; typedef System::DelphiInterface<IFormDesigner> _di_IFormDesigner; __interface INTERFACE_UUID("{ADDD444D-1B03-11D3-A8F8-00C04FA32F53}") IFormDesigner : public IDesigner { public: virtual Sysutils::TMethod __fastcall CreateMethod(const AnsiString Name, Typinfo::PTypeDa