david
778b05bf9f
- Mustangpeak Common Library - 1.7.0 - EasyListview - 1.7.0 git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.Mustangpeak@2 60b41242-d4b9-2247-b156-4ccd40706241
696 lines
23 KiB
C++
696 lines
23 KiB
C++
// CodeGear C++Builder
|
|
// Copyright (c) 1995, 2007 by CodeGear
|
|
// All rights reserved
|
|
|
|
// (DO NOT EDIT: machine generated header) 'Mpcommonwizardhelpers.pas' rev: 11.00
|
|
|
|
#ifndef MpcommonwizardhelpersHPP
|
|
#define MpcommonwizardhelpersHPP
|
|
|
|
#pragma delphiheader begin
|
|
#pragma option push
|
|
#pragma option -w- // All warnings off
|
|
#pragma option -Vx // Zero-length empty class member functions
|
|
#pragma pack(push,8)
|
|
#include <System.hpp> // Pascal unit
|
|
#include <Sysinit.hpp> // Pascal unit
|
|
#include <Sysutils.hpp> // Pascal unit
|
|
#include <Windows.hpp> // Pascal unit
|
|
#include <Controls.hpp> // Pascal unit
|
|
#include <Imglist.hpp> // Pascal unit
|
|
#include <Toolsapi.hpp> // Pascal unit
|
|
#include <Dialogs.hpp> // Pascal unit
|
|
#include <Menus.hpp> // Pascal unit
|
|
#include <Designintf.hpp> // Pascal unit
|
|
#include <Designeditors.hpp> // Pascal unit
|
|
#include <Treeintf.hpp> // Pascal unit
|
|
#include <Vcleditors.hpp> // Pascal unit
|
|
#include <Typinfo.hpp> // Pascal unit
|
|
#include <Graphics.hpp> // Pascal unit
|
|
#include <Classes.hpp> // Pascal unit
|
|
#include <Mpcommonwizardtemplates.hpp> // Pascal unit
|
|
|
|
//-- user supplied -----------------------------------------------------------
|
|
|
|
namespace Mpcommonwizardhelpers
|
|
{
|
|
//-- type declarations -------------------------------------------------------
|
|
typedef AnsiString MPCommonWizardHelpers__1[8];
|
|
|
|
typedef AnsiString MPCommonWizardHelpers__2[1];
|
|
|
|
class DELPHICLASS TCommonOTAFile;
|
|
class PASCALIMPLEMENTATION TCommonOTAFile : public Toolsapi::TOTAFile
|
|
{
|
|
typedef Toolsapi::TOTAFile inherited;
|
|
|
|
private:
|
|
AnsiString FAncestorIdent;
|
|
AnsiString FFormIdent;
|
|
AnsiString FModuleIdent;
|
|
Classes::TStringList* FUsesIdent;
|
|
|
|
public:
|
|
__property AnsiString AncestorIdent = {read=FAncestorIdent, write=FAncestorIdent};
|
|
__property AnsiString FormIdent = {read=FFormIdent, write=FFormIdent};
|
|
__property AnsiString ModuleIdent = {read=FModuleIdent, write=FModuleIdent};
|
|
__property Classes::TStringList* IncludeIdent = {read=FUsesIdent, write=FUsesIdent};
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TOTAFile.Create */ inline __fastcall TCommonOTAFile(const AnsiString StringCode, const System::TDateTime Age) : Toolsapi::TOTAFile(StringCode, Age) { }
|
|
#pragma option pop
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TObject.Destroy */ inline __fastcall virtual ~TCommonOTAFile(void) { }
|
|
#pragma option pop
|
|
|
|
private:
|
|
void *__IOTAFile; /* Toolsapi::IOTAFile */
|
|
|
|
public:
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAFile()
|
|
{
|
|
Toolsapi::_di_IOTAFile intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAFile*(void) { return (IOTAFile*)&__IOTAFile; }
|
|
#endif
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TCommonOTAFileForm;
|
|
class PASCALIMPLEMENTATION TCommonOTAFileForm : public TCommonOTAFile
|
|
{
|
|
typedef TCommonOTAFile inherited;
|
|
|
|
public:
|
|
virtual AnsiString __fastcall GetSource();
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TOTAFile.Create */ inline __fastcall TCommonOTAFileForm(const AnsiString StringCode, const System::TDateTime Age) : TCommonOTAFile(StringCode, Age) { }
|
|
#pragma option pop
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TObject.Destroy */ inline __fastcall virtual ~TCommonOTAFileForm(void) { }
|
|
#pragma option pop
|
|
|
|
private:
|
|
void *__IOTAFile; /* Toolsapi::IOTAFile */
|
|
|
|
public:
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAFile()
|
|
{
|
|
Toolsapi::_di_IOTAFile intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAFile*(void) { return (IOTAFile*)&__IOTAFile; }
|
|
#endif
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TCommonWizardModuleCreator;
|
|
class PASCALIMPLEMENTATION TCommonWizardModuleCreator : public System::TInterfacedObject
|
|
{
|
|
typedef System::TInterfacedObject inherited;
|
|
|
|
private:
|
|
AnsiString FAncestorName;
|
|
AnsiString FFormName;
|
|
bool FMainForm;
|
|
bool FShowForm;
|
|
bool FShowSource;
|
|
Classes::TStringList* FUsesIdent;
|
|
bool __fastcall GetIsDelphi(void);
|
|
|
|
public:
|
|
__fastcall virtual TCommonWizardModuleCreator(void);
|
|
__fastcall virtual ~TCommonWizardModuleCreator(void);
|
|
virtual void __fastcall InitializeCreator(void);
|
|
virtual AnsiString __fastcall GetCreatorType();
|
|
virtual bool __fastcall GetExisting(void);
|
|
virtual AnsiString __fastcall GetFileSystem();
|
|
virtual Toolsapi::_di_IOTAModule __fastcall GetOwner();
|
|
virtual bool __fastcall GetUnnamed(void);
|
|
virtual AnsiString __fastcall GetAncestorName();
|
|
virtual AnsiString __fastcall GetImplFileName();
|
|
virtual AnsiString __fastcall GetIntfFileName();
|
|
virtual AnsiString __fastcall GetFormName();
|
|
virtual bool __fastcall GetMainForm(void);
|
|
virtual bool __fastcall GetShowForm(void);
|
|
virtual bool __fastcall GetShowSource(void);
|
|
virtual Toolsapi::_di_IOTAFile __fastcall NewFormFile(const AnsiString FormIdent, const AnsiString AncestorIdent);
|
|
virtual Toolsapi::_di_IOTAFile __fastcall NewImplSource(const AnsiString ModuleIdent, const AnsiString FormIdent, const AnsiString AncestorIdent);
|
|
virtual Toolsapi::_di_IOTAFile __fastcall NewIntfSource(const AnsiString ModuleIdent, const AnsiString FormIdent, const AnsiString AncestorIdent);
|
|
virtual void __fastcall FormCreated(const Toolsapi::_di_IOTAFormEditor FormEditor);
|
|
void __fastcall LoadDefaultBuilderIncludeStrings(bool ClearFirst);
|
|
void __fastcall LoadDefaultDelphiUsesStrings(bool ClearFirst);
|
|
__property AnsiString CreatorType = {read=GetCreatorType};
|
|
__property bool Existing = {read=GetExisting, nodefault};
|
|
__property AnsiString FileSystem = {read=GetFileSystem};
|
|
__property Toolsapi::_di_IOTAModule Owner = {read=GetOwner};
|
|
__property bool Unnamed = {read=GetUnnamed, nodefault};
|
|
__property AnsiString AncestorName = {read=GetAncestorName, write=FAncestorName};
|
|
__property AnsiString FormName = {read=GetFormName, write=FFormName};
|
|
__property AnsiString ImplFileName = {read=GetImplFileName};
|
|
__property AnsiString IntfFileName = {read=GetIntfFileName};
|
|
__property bool IsDelphi = {read=GetIsDelphi, nodefault};
|
|
__property bool MainForm = {read=GetMainForm, write=FMainForm, nodefault};
|
|
__property bool ShowForm = {read=GetShowForm, write=FShowForm, nodefault};
|
|
__property bool ShowSource = {read=GetShowSource, write=FShowSource, nodefault};
|
|
__property Classes::TStringList* IncludeIdent = {read=FUsesIdent, write=FUsesIdent};
|
|
private:
|
|
void *__IOTAModuleCreator; /* Toolsapi::IOTAModuleCreator */
|
|
|
|
public:
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAModuleCreator()
|
|
{
|
|
Toolsapi::_di_IOTAModuleCreator intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAModuleCreator*(void) { return (IOTAModuleCreator*)&__IOTAModuleCreator; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTACreator()
|
|
{
|
|
Toolsapi::_di_IOTACreator intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTACreator*(void) { return (IOTACreator*)&__IOTAModuleCreator; }
|
|
#endif
|
|
|
|
};
|
|
|
|
|
|
typedef TMetaClass* TCommonWizardModuleCreatorClass;
|
|
|
|
class DELPHICLASS TCommonWizardEmptyUnitCreator;
|
|
class PASCALIMPLEMENTATION TCommonWizardEmptyUnitCreator : public TCommonWizardModuleCreator
|
|
{
|
|
typedef TCommonWizardModuleCreator inherited;
|
|
|
|
public:
|
|
virtual AnsiString __fastcall GetCreatorType();
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCommonWizardModuleCreator.Create */ inline __fastcall virtual TCommonWizardEmptyUnitCreator(void) : TCommonWizardModuleCreator() { }
|
|
#pragma option pop
|
|
#pragma option push -w-inl
|
|
/* TCommonWizardModuleCreator.Destroy */ inline __fastcall virtual ~TCommonWizardEmptyUnitCreator(void) { }
|
|
#pragma option pop
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TCommonWizardEmptyFormCreator;
|
|
class PASCALIMPLEMENTATION TCommonWizardEmptyFormCreator : public TCommonWizardModuleCreator
|
|
{
|
|
typedef TCommonWizardModuleCreator inherited;
|
|
|
|
public:
|
|
virtual AnsiString __fastcall GetCreatorType();
|
|
virtual Toolsapi::_di_IOTAFile __fastcall NewImplSource(const AnsiString ModuleIdent, const AnsiString FormIdent, const AnsiString AncestorIdent);
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCommonWizardModuleCreator.Create */ inline __fastcall virtual TCommonWizardEmptyFormCreator(void) : TCommonWizardModuleCreator() { }
|
|
#pragma option pop
|
|
#pragma option push -w-inl
|
|
/* TCommonWizardModuleCreator.Destroy */ inline __fastcall virtual ~TCommonWizardEmptyFormCreator(void) { }
|
|
#pragma option pop
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TCommonWizardEmptyTextCreator;
|
|
class PASCALIMPLEMENTATION TCommonWizardEmptyTextCreator : public TCommonWizardModuleCreator
|
|
{
|
|
typedef TCommonWizardModuleCreator inherited;
|
|
|
|
public:
|
|
virtual AnsiString __fastcall GetCreatorType();
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCommonWizardModuleCreator.Create */ inline __fastcall virtual TCommonWizardEmptyTextCreator(void) : TCommonWizardModuleCreator() { }
|
|
#pragma option pop
|
|
#pragma option push -w-inl
|
|
/* TCommonWizardModuleCreator.Destroy */ inline __fastcall virtual ~TCommonWizardEmptyTextCreator(void) { }
|
|
#pragma option pop
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TCommonWizardNotifierObject;
|
|
class PASCALIMPLEMENTATION TCommonWizardNotifierObject : public Toolsapi::TNotifierObject
|
|
{
|
|
typedef Toolsapi::TNotifierObject inherited;
|
|
|
|
private:
|
|
AnsiString FAuthor;
|
|
AnsiString FCaption;
|
|
AnsiString FComment;
|
|
AnsiString FGlyphResourceID;
|
|
AnsiString FPage;
|
|
Toolsapi::TWizardState FState;
|
|
AnsiString FUniqueID;
|
|
Toolsapi::_di_IOTAGalleryCategory FGalleryCategory;
|
|
|
|
protected:
|
|
virtual AnsiString __fastcall GetGlpyhResourceID();
|
|
|
|
public:
|
|
__fastcall TCommonWizardNotifierObject(void);
|
|
virtual void __fastcall InitializeWizard(void);
|
|
virtual AnsiString __fastcall GetIDString();
|
|
virtual AnsiString __fastcall GetName();
|
|
Toolsapi::TWizardState __fastcall GetState(void);
|
|
virtual void __fastcall Execute(void);
|
|
AnsiString __fastcall GetAuthor();
|
|
virtual AnsiString __fastcall GetComment();
|
|
virtual AnsiString __fastcall GetPage();
|
|
unsigned __fastcall GetGlyph(void);
|
|
AnsiString __fastcall GetDesigner();
|
|
virtual Toolsapi::_di_IOTAGalleryCategory __fastcall GetGalleryCategory();
|
|
virtual AnsiString __fastcall GetPersonality(void) = 0 ;
|
|
__property AnsiString Designer = {read=GetDesigner};
|
|
__property AnsiString Personality = {read=GetPersonality};
|
|
__property AnsiString Author = {read=GetAuthor, write=FAuthor};
|
|
__property AnsiString Caption = {read=GetName, write=FCaption};
|
|
__property AnsiString Comment = {read=GetComment, write=FComment};
|
|
__property Toolsapi::_di_IOTAGalleryCategory GalleryCategory = {read=GetGalleryCategory, write=FGalleryCategory};
|
|
__property AnsiString GlyphResourceID = {read=GetIDString, write=FGlyphResourceID};
|
|
__property AnsiString Page = {read=GetPage, write=FPage};
|
|
__property Toolsapi::TWizardState State = {read=GetState, write=FState, nodefault};
|
|
__property AnsiString UniqueID = {read=GetIDString, write=FUniqueID};
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TObject.Destroy */ inline __fastcall virtual ~TCommonWizardNotifierObject(void) { }
|
|
#pragma option pop
|
|
|
|
private:
|
|
void *__IOTAProjectWizard; /* Toolsapi::IOTAProjectWizard */
|
|
void *__IOTARepositoryWizard80; /* Toolsapi::IOTARepositoryWizard80 */
|
|
|
|
public:
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAProjectWizard()
|
|
{
|
|
Toolsapi::_di_IOTAProjectWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAProjectWizard*(void) { return (IOTAProjectWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard*(void) { return (IOTARepositoryWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAWizard()
|
|
{
|
|
Toolsapi::_di_IOTAWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAWizard*(void) { return (IOTAWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard80()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard80 intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard80*(void) { return (IOTARepositoryWizard80*)&__IOTARepositoryWizard80; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard60()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard60 intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard60*(void) { return (IOTARepositoryWizard60*)&__IOTARepositoryWizard80; }
|
|
#endif
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TCommonWizardModuleCreate;
|
|
class PASCALIMPLEMENTATION TCommonWizardModuleCreate : public TCommonWizardNotifierObject
|
|
{
|
|
typedef TCommonWizardNotifierObject inherited;
|
|
|
|
private:
|
|
TMetaClass* FCreatorClass;
|
|
|
|
public:
|
|
virtual void __fastcall Execute(void);
|
|
__property TMetaClass* CreatorClass = {read=FCreatorClass, write=FCreatorClass};
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCommonWizardNotifierObject.Create */ inline __fastcall TCommonWizardModuleCreate(void) : TCommonWizardNotifierObject() { }
|
|
#pragma option pop
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TObject.Destroy */ inline __fastcall virtual ~TCommonWizardModuleCreate(void) { }
|
|
#pragma option pop
|
|
|
|
private:
|
|
void *__IOTAProjectWizard; /* Toolsapi::IOTAProjectWizard */
|
|
void *__IOTARepositoryWizard80; /* Toolsapi::IOTARepositoryWizard80 */
|
|
|
|
public:
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAProjectWizard()
|
|
{
|
|
Toolsapi::_di_IOTAProjectWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAProjectWizard*(void) { return (IOTAProjectWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard*(void) { return (IOTARepositoryWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAWizard()
|
|
{
|
|
Toolsapi::_di_IOTAWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAWizard*(void) { return (IOTAWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard80()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard80 intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard80*(void) { return (IOTARepositoryWizard80*)&__IOTARepositoryWizard80; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard60()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard60 intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard60*(void) { return (IOTARepositoryWizard60*)&__IOTARepositoryWizard80; }
|
|
#endif
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TCommonWizardDelphiForm;
|
|
class PASCALIMPLEMENTATION TCommonWizardDelphiForm : public TCommonWizardModuleCreate
|
|
{
|
|
typedef TCommonWizardModuleCreate inherited;
|
|
|
|
public:
|
|
virtual AnsiString __fastcall GetPersonality();
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCommonWizardNotifierObject.Create */ inline __fastcall TCommonWizardDelphiForm(void) : TCommonWizardModuleCreate() { }
|
|
#pragma option pop
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TObject.Destroy */ inline __fastcall virtual ~TCommonWizardDelphiForm(void) { }
|
|
#pragma option pop
|
|
|
|
private:
|
|
void *__IOTAProjectWizard; /* Toolsapi::IOTAProjectWizard */
|
|
void *__IOTARepositoryWizard80; /* Toolsapi::IOTARepositoryWizard80 */
|
|
|
|
public:
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAProjectWizard()
|
|
{
|
|
Toolsapi::_di_IOTAProjectWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAProjectWizard*(void) { return (IOTAProjectWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard*(void) { return (IOTARepositoryWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAWizard()
|
|
{
|
|
Toolsapi::_di_IOTAWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAWizard*(void) { return (IOTAWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard80()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard80 intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard80*(void) { return (IOTARepositoryWizard80*)&__IOTARepositoryWizard80; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard60()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard60 intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard60*(void) { return (IOTARepositoryWizard60*)&__IOTARepositoryWizard80; }
|
|
#endif
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TCommonWizardBuilderForm;
|
|
class PASCALIMPLEMENTATION TCommonWizardBuilderForm : public TCommonWizardDelphiForm
|
|
{
|
|
typedef TCommonWizardDelphiForm inherited;
|
|
|
|
public:
|
|
virtual AnsiString __fastcall GetPersonality();
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TCommonWizardNotifierObject.Create */ inline __fastcall TCommonWizardBuilderForm(void) : TCommonWizardDelphiForm() { }
|
|
#pragma option pop
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TObject.Destroy */ inline __fastcall virtual ~TCommonWizardBuilderForm(void) { }
|
|
#pragma option pop
|
|
|
|
private:
|
|
void *__IOTAProjectWizard; /* Toolsapi::IOTAProjectWizard */
|
|
void *__IOTARepositoryWizard80; /* Toolsapi::IOTARepositoryWizard80 */
|
|
|
|
public:
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAProjectWizard()
|
|
{
|
|
Toolsapi::_di_IOTAProjectWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAProjectWizard*(void) { return (IOTAProjectWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard*(void) { return (IOTARepositoryWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTAWizard()
|
|
{
|
|
Toolsapi::_di_IOTAWizard intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTAWizard*(void) { return (IOTAWizard*)&__IOTAProjectWizard; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard80()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard80 intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard80*(void) { return (IOTARepositoryWizard80*)&__IOTARepositoryWizard80; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Toolsapi::_di_IOTARepositoryWizard60()
|
|
{
|
|
Toolsapi::_di_IOTARepositoryWizard60 intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator IOTARepositoryWizard60*(void) { return (IOTARepositoryWizard60*)&__IOTARepositoryWizard80; }
|
|
#endif
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TPersistentHack;
|
|
class PASCALIMPLEMENTATION TPersistentHack : public Classes::TPersistent
|
|
{
|
|
typedef Classes::TPersistent inherited;
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TPersistent.Destroy */ inline __fastcall virtual ~TPersistentHack(void) { }
|
|
#pragma option pop
|
|
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TObject.Create */ inline __fastcall TPersistentHack(void) : Classes::TPersistent() { }
|
|
#pragma option pop
|
|
|
|
};
|
|
|
|
|
|
class DELPHICLASS TCommonImageIndexProperty;
|
|
class PASCALIMPLEMENTATION TCommonImageIndexProperty : public Designeditors::TIntegerProperty
|
|
{
|
|
typedef Designeditors::TIntegerProperty inherited;
|
|
|
|
private:
|
|
Imglist::TCustomImageList* __fastcall GetImageList(void);
|
|
Imglist::TCustomImageList* __fastcall GetImageListAt(int ComponentIndex);
|
|
|
|
protected:
|
|
virtual bool __fastcall ExtractImageList(Classes::TPersistent* Inst, /* out */ Imglist::TCustomImageList* &ImageList);
|
|
__property Imglist::TCustomImageList* ImageList = {read=GetImageList};
|
|
|
|
public:
|
|
virtual Designintf::TPropertyAttributes __fastcall GetAttributes(void);
|
|
virtual void __fastcall GetValues(Classes::TGetStrProc Proc);
|
|
virtual AnsiString __fastcall GetValue();
|
|
virtual void __fastcall SetValue(const AnsiString Value)/* overload */;
|
|
void __fastcall ListMeasureWidth(const AnsiString Value, Graphics::TCanvas* ACanvas, int &AWidth);
|
|
void __fastcall ListMeasureHeight(const AnsiString Value, Graphics::TCanvas* ACanvas, int &AHeight);
|
|
void __fastcall ListDrawValue(const AnsiString Value, Graphics::TCanvas* ACanvas, const Types::TRect &ARect, bool ASelected);
|
|
void __fastcall PropDrawName(Graphics::TCanvas* ACanvas, const Types::TRect &ARect, bool ASelected);
|
|
void __fastcall PropDrawValue(Graphics::TCanvas* ACanvas, const Types::TRect &ARect, bool ASelected);
|
|
public:
|
|
#pragma option push -w-inl
|
|
/* TPropertyEditor.Create */ inline __fastcall virtual TCommonImageIndexProperty(const Designintf::_di_IDesigner ADesigner, int APropCount) : Designeditors::TIntegerProperty(ADesigner, APropCount) { }
|
|
#pragma option pop
|
|
#pragma option push -w-inl
|
|
/* TPropertyEditor.Destroy */ inline __fastcall virtual ~TCommonImageIndexProperty(void) { }
|
|
#pragma option pop
|
|
|
|
|
|
/* Hoisted overloads: */
|
|
|
|
public:
|
|
inline void __fastcall SetValue(const WideString Value){ TPropertyEditor::SetValue(Value); }
|
|
|
|
private:
|
|
void *__ICustomPropertyListDrawing; /* Vcleditors::ICustomPropertyListDrawing */
|
|
void *__ICustomPropertyDrawing; /* Vcleditors::ICustomPropertyDrawing */
|
|
|
|
public:
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Vcleditors::_di_ICustomPropertyListDrawing()
|
|
{
|
|
Vcleditors::_di_ICustomPropertyListDrawing intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator ICustomPropertyListDrawing*(void) { return (ICustomPropertyListDrawing*)&__ICustomPropertyListDrawing; }
|
|
#endif
|
|
#if defined(MANAGED_INTERFACE_OPERATORS)
|
|
operator Vcleditors::_di_ICustomPropertyDrawing()
|
|
{
|
|
Vcleditors::_di_ICustomPropertyDrawing intf;
|
|
GetInterface(intf);
|
|
return intf;
|
|
}
|
|
#else
|
|
operator ICustomPropertyDrawing*(void) { return (ICustomPropertyDrawing*)&__ICustomPropertyDrawing; }
|
|
#endif
|
|
|
|
};
|
|
|
|
|
|
//-- var, const, procedure ---------------------------------------------------
|
|
extern PACKAGE AnsiString DELPHI_USES_UNITS[8];
|
|
extern PACKAGE AnsiString BUIDLER_INCLUDE[1];
|
|
extern PACKAGE Toolsapi::_di_IOTAProjectGroup __fastcall GetCurrentProjectGroup();
|
|
extern PACKAGE Toolsapi::_di_IOTAProject __fastcall GetCurrentProject();
|
|
extern PACKAGE Toolsapi::_di_IOTAGalleryCategory __fastcall AddDelphiCategory(AnsiString CategoryID, AnsiString CategoryCaption);
|
|
extern PACKAGE Toolsapi::_di_IOTAGalleryCategory __fastcall AddBuilderCategory(AnsiString CategoryID, AnsiString CategoryCaption);
|
|
extern PACKAGE void __fastcall RemoveCategory(Toolsapi::_di_IOTAGalleryCategory Category);
|
|
extern PACKAGE bool __fastcall IsDelphiPersonality(void);
|
|
|
|
} /* namespace Mpcommonwizardhelpers */
|
|
using namespace Mpcommonwizardhelpers;
|
|
#pragma pack(pop)
|
|
#pragma option pop
|
|
|
|
#pragma delphiheader end.
|
|
//-- end unit ----------------------------------------------------------------
|
|
#endif // Mpcommonwizardhelpers
|