用BCB开发控制面板程序

鹰易郅力d

鹰易郅力d

2016-02-19 18:02

有了下面这个用BCB开发控制面板程序教程,不懂用BCB开发控制面板程序的也能装懂了,赶紧get起来装逼一下吧!

  前不久,Inprise公司(原Borland公司)正式公布了Delphi 5.0版,其开发向导中支持了“控制面板程序(CPL)”框架的生成,利用它可以快速、方便地开发CPL程序。那么是否能在现有的Borland C++ Builder 中开发CPL程序呢?
  
  CPL程序是动态链接库(DLL)的一种变形,只不过扩展名为.cpl、入口函数为CPlApplet()而不是DllEntryPoint()罢了(并不是不要DllEntryPoint(),不然不能编译)。我们只需在BCB4.0中选择“FileNew...”打开开发向导,选择“DLL”生成一个DLL框架,并在其中加入一个函数CPlApplet()就可以了。为了快速地说明问题,笔者先给出一个最简单的例子程序,然后再来解说。
  
  #include vcl.h
  #include cpl.h
  #include cplext.h
  #pragma hdrstop
  USERES("my.res");//这是我加入的资源文件,其中有一个图标
  
  extern"C" __declspec(dlleXPort) long CALLBACK __stdcall CPlApplet(HWND hwndCPL,UINT uMsg,LPARAM lParam1,LPARAM lParam2);
  
  int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void*)
  {
  return 1;
  }
  
  long CALLBACK __declspec(dllexport) __stdcall CPlApplet(HWND hwndCPL,UINT uMsg,LPARAM lParam1,LPARAM lParam2)
  {
  LPNEWCPLINFO mycpl;//LPNEWCPLINFO结构可在CPL.H头文件中查看
  long result=0;
  switch (uMsg)//判定传来的信息
    {
    case CPL_INIT:// 第一个信息,在控制面板调入时产生
      result=1;
      break;
    case CPL_GETCOUNT://第二个信息,在控制面板调入时产生
      result=1;
      break;
    case CPL_INQUIRE://第三个信息,当控制面板查询时产生
      result=0;
      break;
    case CPL_NEWINQUIRE://第三个信息,当控制面板查询时产生
      mycpl=LPNEWCPLINFO (lParam2);// 将lParam2中的指针传给mycpl
      mycpl-dwSize=sizeof(NEWCPLINFO);
      mycpl-dwFlags=0;//标志变量 一般设为0
      mycpl-dwHelpContext=0;//帮助句柄一般设为0
      mycpl-lData=0;
      mycpl-hIcon=(HICON)LoadIcon(HInstance,"MyIcon");
      mycpl-szHelpFile[0]='
展开更多 50%)
分享

猜你喜欢

用BCB开发控制面板程序

编程语言 网络编程
用BCB开发控制面板程序

控制面板在哪,控制面板打不开怎么办

电脑入门
控制面板在哪,控制面板打不开怎么办

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

控制面板禁用方法

电脑入门
控制面板禁用方法

用Shell语句调出控制面板

编程语言 网络编程
用Shell语句调出控制面板

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

利用Dephi5编写控制面板程序

Delphi
利用Dephi5编写控制面板程序

控制面板在哪里打开

电脑网络
控制面板在哪里打开

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

用iPad版WPS制作PPT演示文稿

用iPad版WPS制作PPT演示文稿

最适合情侣的qq签名:若我微笑,是我想起你

最适合情侣的qq签名:若我微笑,是我想起你
下拉加载更多内容 ↓