📄 dsgnintf.hpp
字号:
, int APropCount) : TPropertyEditor(ADesigner, APropCount) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TPropertyEditor.Destroy */ inline __fastcall virtual ~TTimeProperty(void) { }
#pragma option pop
};
class DELPHICLASS TDateTimeProperty;
class PASCALIMPLEMENTATION TDateTimeProperty : public TPropertyEditor
{
typedef TPropertyEditor inherited;
public:
virtual TPropertyAttributes __fastcall GetAttributes(void);
virtual AnsiString __fastcall GetValue();
virtual void __fastcall SetValue(const AnsiString Value);
protected:
#pragma option push -w-inl
/* TPropertyEditor.Create */ inline __fastcall virtual TDateTimeProperty(const _di_IFormDesigner ADesigner
, int APropCount) : TPropertyEditor(ADesigner, APropCount) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TPropertyEditor.Destroy */ inline __fastcall virtual ~TDateTimeProperty(void) { }
#pragma option pop
};
__interface IComponentEditor;
typedef System::DelphiInterface<IComponentEditor> _di_IComponentEditor;
__interface INTERFACE_UUID("{ABBE7252-5495-11D1-9FB5-0020AF3D82DA}") IComponentEditor : public IUnknown
{
public:
virtual void __fastcall Edit(void) = 0 ;
virtual void __fastcall ExecuteVerb(int Index) = 0 ;
virtual _di_IComponent __fastcall GetIComponent(void) = 0 ;
virtual _di_IFormDesigner __fastcall GetDesigner(void) = 0 ;
virtual AnsiString __fastcall GetVerb(int Index) = 0 ;
virtual int __fastcall GetVerbCount(void) = 0 ;
virtual void __fastcall PrepareItem(int Index, const Menus::TMenuItem* AItem) = 0 ;
virtual void __fastcall Copy(void) = 0 ;
};
class DELPHICLASS TComponentEditor;
class PASCALIMPLEMENTATION TComponentEditor : public System::TInterfacedObject
{
typedef System::TInterfacedObject inherited;
private:
Classes::TComponent* FComponent;
_di_IFormDesigner FDesigner;
public:
__fastcall virtual TComponentEditor(Classes::TComponent* AComponent, _di_IFormDesigner ADesigner);
virtual void __fastcall Edit(void);
virtual void __fastcall ExecuteVerb(int Index);
_di_IComponent __fastcall GetIComponent();
_di_IFormDesigner __fastcall GetDesigner();
virtual AnsiString __fastcall GetVerb(int Index);
virtual int __fastcall GetVerbCount(void);
bool __fastcall IsInInlined(void);
virtual void __fastcall PrepareItem(int Index, const Menus::TMenuItem* AItem);
virtual void __fastcall Copy(void);
__property Classes::TComponent* Component = {read=FComponent};
__property _di_IFormDesigner Designer = {read=GetDesigner};
public:
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TComponentEditor(void) { }
#pragma option pop
private:
void *__IComponentEditor; /* Dsgnintf::IComponentEditor */
public:
operator IComponentEditor*(void) { return (IComponentEditor*)&__IComponentEditor; }
};
typedef TMetaClass*TComponentEditorClass;
__interface IDefaultEditor;
typedef System::DelphiInterface<IDefaultEditor> _di_IDefaultEditor;
__interface INTERFACE_UUID("{5484FAE1-5C60-11D1-9FB6-0020AF3D82DA}") IDefaultEditor : public IComponentEditor
{
};
class DELPHICLASS TDefaultEditor;
class PASCALIMPLEMENTATION TDefaultEditor : public TComponentEditor
{
typedef TComponentEditor inherited;
private:
TPropertyEditor* FFirst;
TPropertyEditor* FBest;
bool FContinue;
void __fastcall CheckEdit(TPropertyEditor* PropertyEditor);
protected:
virtual void __fastcall EditProperty(TPropertyEditor* PropertyEditor, bool &Continue, bool &FreeEditor
);
public:
virtual void __fastcall Edit(void);
public:
#pragma option push -w-inl
/* TComponentEditor.Create */ inline __fastcall virtual TDefaultEditor(Classes::TComponent* AComponent
, _di_IFormDesigner ADesigner) : TComponentEditor(AComponent, ADesigner) { }
#pragma option pop
public:
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TDefaultEditor(void) { }
#pragma option pop
private:
void *__IDefaultEditor; /* Dsgnintf::IDefaultEditor */
public:
operator IDefaultEditor*(void) { return (IDefaultEditor*)&__IDefaultEditor; }
};
typedef void __fastcall (*TFreeCustomModulesProc)(int Group);
typedef TMetaClass* __fastcall (*TPropertyMapperFunc)(Classes::TPersistent* Obj, Typinfo::PPropInfo
PropInfo);
#pragma option push -b-
enum TCustomModuleAttribute { cmaVirtualSize };
#pragma option pop
typedef Set<TCustomModuleAttribute, cmaVirtualSize, cmaVirtualSize> TCustomModuleAttributes;
class DELPHICLASS TCustomModule;
class PASCALIMPLEMENTATION TCustomModule : public System::TObject
{
typedef System::TObject inherited;
private:
_di_IComponent FRoot;
public:
__fastcall virtual TCustomModule(_di_IComponent ARoot);
virtual void __fastcall ExecuteVerb(int Index);
virtual Forms::TCustomForm* __fastcall CreateDesignerForm(Forms::_di_IDesigner Designer);
virtual TCustomModuleAttributes __fastcall GetAttributes(void);
virtual AnsiString __fastcall GetVerb(int Index);
virtual int __fastcall GetVerbCount(void);
virtual void __fastcall PrepareItem(int Index, const Menus::TMenuItem* AItem);
virtual void __fastcall Saving(void);
virtual void __fastcall ValidateComponent(_di_IComponent Component);
#pragma option push -w-inl
/* virtual class method */ virtual bool __fastcall Nestable() { return Nestable(__classid(TCustomModule)
); }
#pragma option pop
/* class method */ static bool __fastcall Nestable(TMetaClass* vmt);
__property _di_IComponent Root = {read=FRoot};
public:
#pragma option push -w-inl
/* TObject.Destroy */ inline __fastcall virtual ~TCustomModule(void) { }
#pragma option pop
};
typedef TMetaClass*TCustomModuleClass;
typedef void __fastcall (*TRegisterCustomModuleProc)(int Group, TMetaClass* ComponentBaseClass, TMetaClass*
CustomModuleClass);
__interface ICustomModuleSettings;
typedef System::DelphiInterface<ICustomModuleSettings> _di_ICustomModuleSettings;
__interface INTERFACE_UUID("{50947DAD-E627-11D2-B728-00C04FA35D12}") ICustomModuleSettings : public IUnknown
{
public:
virtual AnsiString __fastcall IniSection(void) = 0 ;
};
__interface ICustomModuleProjectSettings;
typedef System::DelphiInterface<ICustomModuleProjectSettings> _di_ICustomModuleProjectSettings;
__interface INTERFACE_UUID("{78E12CC2-DBCC-11D2-B727-00C04FA35D12}") ICustomModuleProjectSettings : public ICustomModuleSettings
{
public:
virtual void __fastcall SaveProjectState(Inifiles::TMemIniFile* AFile) = 0 ;
virtual void __fastcall LoadProjectState(Inifiles::TMemIniFile* AFile) = 0 ;
};
__interface ICustomModuleUnitSettings;
typedef System::DelphiInterface<ICustomModuleUnitSettings> _di_ICustomModuleUnitSettings;
__interface INTERFACE_UUID("{78E12CC1-DBCC-11D2-B727-00C04FA35D12}") ICustomModuleUnitSettings : public ICustomModuleSettings
{
public:
virtual void __fastcall SaveUnitState(Inifiles::TMemIniFile* AFile) = 0 ;
virtual void __fastcall LoadUnitState(Inifiles::TMemIniFile* AFile) = 0 ;
};
__interface IDesignerPersistence;
typedef System::DelphiInterface<IDesignerPersistence> _di_IDesignerPersistence;
__interface INTERFACE_UUID("{D32194C2-EECF-11D2-AAD2-00C04FB16FBC}") IDesignerPersistence : public IUnknown
{
public:
virtual void __fastcall Save(const _di_IStream Stream) = 0 ;
virtual void __fastcall Load(const _di_IStream Stream) = 0 ;
};
typedef void __fastcall (*TGroupChangeProc)(int AGroup);
class DELPHICLASS TPropertyFilter;
class PASCALIMPLEMENTATION TPropertyFilter : public System::TObject
{
typedef System::TObject inherited;
private:
Masks::TMask* FMask;
TMetaClass*FComponentClass;
Typinfo::TTypeInfo *FPropertyType;
int FGroup;
public:
__fastcall TPropertyFilter(const AnsiString APropertyName, TMetaClass* AComponentClass, Typinfo::PTypeInfo
APropertyType);
__fastcall virtual ~TPropertyFilter(void);
bool __fastcall Match(const AnsiString APropertyName, TMetaClass* AComponentClass, Typinfo::PTypeInfo
APropertyType);
__property TMetaClass* ComponentClass = {read=FComponentClass};
__property Typinfo::PTypeInfo PropertyType = {read=FPropertyType};
};
typedef TMetaClass*TPropertyCategoryClass;
class DELPHICLASS TPropertyCategory;
class PASCALIMPLEMENTATION TPropertyCategory : public System::TObject
{
typedef System::TObject inherited;
private:
Contnrs::TObjectList* FList;
int FMatchCount;
TPropertyEditor* FEditor;
bool FEnabled;
bool FVisible;
int FGroup;
protected:
TPropertyFilter* __fastcall GetFilter(int Index);
public:
__fastcall TPropertyCategory(void);
__fastcall virtual ~TPropertyCategory(void);
TPropertyFilter* __fastcall Add(TPropertyFilter* AFilter);
int __fastcall Count(void);
bool __fastcall Match(const AnsiString APropertyName, TMetaClass* AComponentClass, Typinfo::PTypeInfo
APropertyType);
void __fastcall ClearMatches(void);
void __fastcall FreeEditorGroup(int AGroup);
#pragma option push -w-inl
/* virtual class method */ virtual AnsiString __fastcall Name() { return Name(__classid(TPropertyCategory)
); }
#pragma option pop
/* class method */ static AnsiString __fastcall Name(TMetaClass* vmt);
#pragma option push -w-inl
/* virtual class method */ virtual AnsiString __fastcall Description() { return Description(__classid(TPropertyCategory)
); }
#pragma option pop
/* class method */ static AnsiString __fastcall Description(TMetaClass* vmt);
DYNAMIC void __fastcall PropDraw(Graphics::TCanvas* ACanvas, const Windows::TRect &ARect, bool ASelected
);
__property TPropertyFilter* Filters[int Index] = {read=GetFilter};
__property int MatchCount = {read=FMatchCount, nodefault};
__property bool Visible = {read=FVisible, write=FVisible, nodefault};
__property TPropertyEditor* Editor = {read=FEditor, write=FEditor};
};
#pragma option push -b-
enum TPropertyCategoryVisibleMode { pcvAll, pcvToggle, pcvNone, pcvNotListed, pcvOnlyListed };
#pragma option pop
class DELPHICLASS TPropertyCategoryList;
class PASCALIMPLEMENTATION TPropertyCategoryList : public System::TObject
{
typedef System::TObject inherited;
private:
Contnrs::TObjectList* FList;
TPropertyCategory* FMiscCategory;
protected:
TPropertyCategory* __fastcall GetCategory(int Index);
AnsiString __fastcall GetHiddenCategories();
void __fastcall SetHiddenCategories(const AnsiString Value);
public:
__fastcall TPropertyCategoryList(void);
__fastcall virtual ~TPropertyCategoryList(void);
TPropertyCategory* __fastcall FindCategory(TMetaClass* ACategoryClass);
int __fastcall IndexOf(TMetaClass* ACategoryClass)/* overload */;
int __fastcall IndexOf(const AnsiString ACategoryName)/* overload */;
void __fastcall ClearMatches(void);
void __fastcall FreeEditorGroup(int AGroup);
TPropertyCategory* __fastcall MiscCategory(void);
int __fastcall Count(void);
bool __fastcall Match(const AnsiString APropertyName, TMetaClass* AComponentClass, Typinfo::PTypeInfo
APropertyType);
bool __fastcall ChangeVisibility(TPropertyCategoryVisibleMode AMode)/* overload */;
bool __fastcall ChangeVisibility(TPropertyCategoryVisibleMode AMode, TMetaClass* const * AClasses,
const int AClasses_Size)/* overload */;
__property AnsiString HiddenCategories = {read=GetHiddenCategories, write=SetHiddenCategories};
__property TPropertyCategory* Categories[int Index] = {read=GetCategory/*, default*/};
};
class DELPHICLASS TActionCategory;
class PASCALIMPLEMENTATION TActionCategory : public TPropertyCategory
{
typedef TPropertyCategory inherited;
public:
#pragma option push -w-inl
/* virtual class method */ virtual AnsiString __fastcall Name() { return Name(__classid(TActionCategory)
); }
#pragma option pop
/* class method */ static AnsiString __fastcall Name(TMetaClass* vmt);
#pragma option push -w-inl
/* virtual class method */ virtual AnsiString __fastcall Description() { return Description(__classid(TActionCategory)
); }
#pragma option pop
/* class method */ static AnsiString __fastcall Description(TMetaClass* vmt);
public:
#pragma option push -w-inl
/* TPropertyCategory.Create */ inline __fastcall TActionCategory(void) : TPropertyCategory() { }
#pragma option pop
#pragma option push -w-inl
/* TPropertyCategory.Destroy */ inline __fastcall virtual ~TActionCategory(void) { }
#pragma option pop
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -