china.com
主页
新闻
体育
游戏
文化
教育
健康
财经
科技
旅游
军事
娱乐
商贸
  科技动态 硬件广场 下载基地 网络教室 网络冲浪 科学博览 移动时代 手机上网 桌面壁纸 科技商情  


创建“控制面板”的新项目

2000-08-14 15:11:00

  当我们打开“控制面板”以后,能看到许多项目,如:系统、显示器等。不过,这些项目并非指向某些可执行的程序,其实,它们是一些特殊的动态链接库,在Windows里注册的类型是“控制面板扩展”,文件的扩展名是“CPL”。

  这种“控制面板扩展”与普通动态链接库(DLL)类似,但必须符合以下的要求:

  1.该动态链接库必须输出一个CplApplet函数,这个函数包含了一些消息,函数的原型如下:

  function CPlApplet(hwndCPL: HWND; uMsg: UINT;

  lParam1: LPARAM; lParam2: LPARAM): LongInt; stdcall;

  2.该动态链接库的扩展名是“CPL”,位于Windows的系统目录下,通常是“\Windows\System”;

  3.函数CplApplet必须处理的消息包括:CPL—INIT、CPL—GETCOUNT、CPL—NEWINQUIRE、CPL—DBLCLK等:

  CPL—INIT:表示程序被(控制面板)发现,返回True或False表示是否继续进行下去。

  CPL—GETCOUNT:确定程序在控制面板中显示的个数,返回值为显示的个数。

  CPL—NEWINQUIRE:用于填写程序的信息。

  CPL—DBLCLK:当图标被双击时触发,这时可以显示一个Form。

  在Delphi中新建一个工程,选择“DLL”,Delphi就会自动创建一个动态链接库的框架,先把这个工程存为“myCPL.dpr”,然后新建一个Form,保存为main.pas。

  myCPL.dpr的内容如下:

  library mycpl;

  uses

   Windows,

   SysUtils,

   CPL,

   Forms,

   main in ′main.pas′ {MainForm};

  {$E cpl}  //表示扩展名是CPL

  {$R *.res}

  function CPlApplet(hwndCPL: HWND; uMsg: UINT;

   lParam1: LPARAM; lParam2: LPARAM) : LongInt; stdcall;

  var

   pNewInfo: PNewCPlInfo;

  begin

   case uMsg of

    CPL—INIT:

    begin

   Result := 1;

  end;

  CPL—GETCOUNT:

  begin

   Result := 1;

  end;

  CPL—NEWINQUIRE:

  begin

   pNewInfo:=PNewCPlInfo(lParam2);

   with pNewInfo^ do

   begin

    dwSize:=sizeof(TNewCPLInfo);

    dwFlags:=0;

   StrPLCopy(szName,′新建项目′, 31);

   StrPLCopy(szInfo, ′我的选项′, 63);

   end;

  end;

  CPL—DBLCLK:

  begin

   with TMainForm.Create(Application) do

    ShowModal;

   Result:=0;

  end;

   end;

  end;

  exports

   CPlApplet;

  begin

  end.

  把编译好的mycpl.cpl拷贝到Windows的System目录下后,打开“控制面板”,你会发现多了一个“新建项目”,用鼠标选中,窗口的状态栏显示:“我的选项”。用鼠标双击,一个Form就显示出来,剩下的事情就不用多说了。

  以上程序在Windows 95、Delphi 4.0下运行通过。

  摘自《赛迪网》 杨勇/文

404 Not Found

404 Not Found


nginx


科技检索


中华网推荐

  • 1000名医生在线咨询

  • 中国足球队官方网站

  • 鸦片玫瑰(新版)

  • 精选股票天地

  • 闪光的flash教程

  • 中华网汽车世界

  • 为你的爱情出谋划策

  • 网文精选——野百合集

  • 世界文化遗产在中国

  • 历届香港小姐风姿集




  • 网络教室编辑信箱
    版权声明 | 本站检索 | 联系方法 | 刊登广告 | 使用说明 | 关于中华网 | 豁免条款

    版权所有 中华网