|  | 
 

 

上海浦东bet8可信吗

浦东bet8可信吗

上海徐汇bet8可信吗

徐汇bet8可信吗

上海黄浦bet8可信吗

黄浦bet8可信吗

上海杨浦bet8可信吗

杨浦bet8可信吗

上海卢湾bet8可信吗

卢湾bet8可信吗

上海静安bet8可信吗

静安bet8可信吗

上海虹口bet8可信吗

虹口bet8可信吗

 

 

 

 

 

 

 

友情链接
更多链接...
 
  您当前位置 -> 维修资料  

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版中调试通过。




     BET9账号被风控有限公司版权所有    Copyright2002All Rights Reserved   

浦东bet8可信吗|徐汇bet8可信吗|黄浦bet8可信吗|杨浦bet8可信吗

卢湾bet8可信吗|静安bet8可信吗|虹口bet8可信吗|闸北bet8可信吗

BET9App下载

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