| 网站首页 | 公司简介 | 维修内容 | 网络工程 | 收费标准 | 网页制作 | 技术文章 | 维修资料 | 网站地图 | 联系我们 | 后台管理 | 
 

 

上海浦东电脑维修

浦东电脑维修

上海徐汇电脑维修

徐汇电脑维修

上海黄浦电脑维修

黄浦电脑维修

上海杨浦电脑维修

杨浦电脑维修

上海卢湾电脑维修

卢湾电脑维修

上海静安电脑维修

静安电脑维修

上海虹口电脑维修

虹口电脑维修

 

 

 

 

 

 

 

山东仪器维修
网站目录
北京创维电视维修电话
荣成电脑维修
郴州电脑维修
上海IT外包
长沙笔记本维修
文件夹加密
上海电脑维修
友情链接 QQ:21401512
更多链接...
 
  您当前位置 -> 维修资料  

DELPHI编程中调用标准的WIN帮助文件

  一个标准的Windows应用程序都应该有一个标准的WIN帮助文件,例如许多大公司出品的软件,都会在程序中附有非常详细的帮助文件。如果你也想让自己的软件或程序变得更专业化一些,也应该在你的应用程序中附有帮助文件。标准的帮助文件中应有:帮助主题、搜索特征、HOW TO USE HELP等内容, 你可以用一些专门写帮助文件的程序去完成它们。但在程序中如何调用这些帮助文件呢?在此笔者就用DELPHI编程为各位演示调用标准WIN帮助文件的程序!
  首先,新建工程,在FORM1上放一个BUTTON1(其CAPTION为:调用标准WIN帮助文件)和一个BUTTON2(关闭帮助文件),其他属性都保持不变,然后输入以下程序代码:
  unit GETHLP;
  interface
  uses  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,StdCtrls;
  type  TForm1 = class(TForm)
      Button1: TButton;
      Button2: TButton;
      Label1: TLabel;
      procedure Button1Click(Sender: TObject);
      procedure Button2Click(Sender: TObject);
      procedure FormCreate(Sender: TObject);
    private { Private declarations }
    public { Public declarations }
    end;
  var  Form1: TForm1;
  implementation {$R *.DFM}
  procedure TForm1.Button1Click(Sender: TObject); //调用帮助文件
  VAR
  DD:LONGBOOL; //声明变量
  Begin //在此调用c:\windows目录下的winhelp.hlp文件,如路径不对请自行调整
  DD:=WINHELP(FORM1.HANDLE,'C:\Windows\WINHELP.HLP',HELP_INDEX,0);
  end;
  procedure TForm1.Button2Click(Sender: TObject);
  VAR
  DS:LONGBOOL; //声明变量
  Begin //关闭从前打开的帮助文件winhelp.hlp
  DS:=WINHELP(FORM1.HANDLE,'C:\Windows\WINHELP.HLP',HELP_QUIT,0);
  end;
  end.
  以上程序中显示的是索引值帮助文件,如要显示帮助文件的其他项(如帮助主题,搜索特征等)请读者自己参考有关的API函数说明文件(可查找以HELP打头的),笔者就不再赘述了。
  注:以上程序在中文Windows 98,DELPHI 4.0 C/S版中调试通过。




     版权所有上海大众计算机科技有限公司    Copyright2002All Rights Reserved   

浦东电脑维修|徐汇电脑维修|黄浦电脑维修|杨浦电脑维修

卢湾电脑维修|静安电脑维修|虹口电脑维修|闸北电脑维修

服务热线:021-51391508

关于本站 | 联系方式 |招聘信息 | 意见反馈 | 网站地图|加盟我们



净化网络环境,遵守国家法律。空间服务商-诺凡科技wangzhan8.com技术支持-投诉建议