加载包含控件类的dll

原创 2016年05月30日 22:50:47
将控件或窗体类包含在DLL中,然后导出函数,此函数创建控件到主窗口上。
/* @breif 加载包含控件的dll,并显示控件
*  同时在当前工程下添加控件类的.h文件
*  复制dll到当前工程下
*  日期:2016.5.30
*/
#ifndef __LOADDLL__
#define __LOADDLL__
#include <vcl.h>
#include <windows.h>

typedef  TMetaClass * (__stdcall * pCreateControl )(TApplication*,TForm*,TScreen*);

template <class T>
class  TLoadControlDll
{
    private:
       HINSTANCE   m_handle;
       pCreateControl  m_create_control_fuction;
       TMetaClass * m_pClass;

       T  * m_control;
       
    public:
       //构造函数,加载dll
       TLoadControlDll(const char * libName);
       //获取创建控件类函数
       void GetFunction(const char * functionName);
       //创建控件并显示
       void Show(TForm * m);
       
       ~TLoadControlDll();
};

template <class T>
TLoadControlDll<T>::TLoadControlDll(const char * libName)
{
    m_handle = LoadLibraryA(libName);
}

template <class T>
void TLoadControlDll<T>::GetFunction(const char * functionName)
{
    m_create_control_fuction = (pCreateControl)GetProcAddress(m_handle, functionName);
}

template <class T>
void TLoadControlDll<T>::Show(TForm * m)
{
    m_pClass = m_create_control_fuction(Application,m,Screen);
    Application->CreateForm(m_pClass, &m_control);
    m_control->Parent = m;
    m_control->Show();
}

template <class T>
TLoadControlDll<T>::~TLoadControlDll()
{
    delete m_control;
    FreeLibrary(m_handle); 
}
#endif
在主窗体中调用类,创建控件,并显示在主窗口上,代码如下:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "mainUnit1.h"
#include "loaddll.h"
#include "scalewin.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;

//dll中的包含的类TMyFrame1
//通过.h文件引入
TMyFrame1 * p1;
//dll引导类
TLoadControlDll<TMyFrame1> * pCreateMainFrame;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   //调用dll中的创建控件类
   pCreateMainFrame = new TLoadControlDll<TMyFrame1>("MainFrame.dll");
   pCreateMainFrame->GetFunction("getScaleFrame");
   pCreateMainFrame->Show(this);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    delete pCreateMainFrame;
}
//---------------------------------------------------------------------------
工程需要带包编译和发行。


版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

SuperMap iObjects .NET加载dll动态库失败,控件不能用常见问题解析

初次部署使用SuperMap iObjects .NET的开发人员,可能遇到以下问题:1.环境部署不成功2.部署成功了,VS工具箱里面没有SuperMap相关控件3.工具箱里面的SuperMap相关控...

解决“ .dll(或.ocx)控件已加载,但对DllregisterServer的调用失败,错误代码为0x80004005”问题的两种终极方法:SubInACL安装 VS 命令提示符

VB开发环境下开发的程序经常会遇到打包好的工程能够无问题安装,但是安装后却显示“ ****.dll(或.ocx控件已加载但对DllRegisterServer的调用失败,错误代码为0x80004005...

Android动态加载包含so文件的jar的自定义view控件

公司要求把某自定义view控件打包成jar,提供给某项目(这里叫它APP吧)通过网络下载的方式实现动态加载控件,该APP通过反射来构造出该view,并且调用里面的方法。 这样通过反射动态加载的方式(暂...

网页底部加载更多内容的控件

  • 2017年10月26日 15:38
  • 312KB
  • 下载

Qt导出C++类和Qt静态方式加载DLL

本文主要介绍如何使用QCreator新建包含Qt库的C++导出类(DLL)和如何在Qt工程中调用DLL中的C++类。整个实验的步骤如下: 一、宿主工程(调用者) 1,打开QCreator,新建一个...

上拉刷新下拉加载控件

  • 2017年11月08日 19:05
  • 201KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:加载包含控件类的dll
举报原因:
原因补充:

(最多只允许输入30个字)