11.1.2.4 編譯幫助工程文件

　　有兩種編譯器可以編譯幫助工程文件：HCP.EXE ，H31.EXE。兩種編譯器編譯的文件不能在Winddow3.0中使用，但能在Windows 3.1中使用。其中HCP.EXE是保護模式“編譯器”，它能更好的使用內存。必須在Windows的Dos窗口中使用HCP.EXE。

　　編譯前要注意兩個問題：

　　1. 所有源文件必須以RTF格式保存;

　　2. 下面的文件必須在同一個目錄下

　　● 所有的.RTF文件

　　● 幫助編譯器(HCP.EXE,HC31.EXE)

　　● 編譯器錯誤信息源文件(HCD.ERR,HC1.ERR)

　　● 幫助工程文件(.HPF)

　　● 任何引用位圖或SHED的文件(.BMP.SHG)

　　如果以上文件不在同一目錄中，必須在工程文件中定義相應的路徑。

　　編譯要在Dos環境中進行，命令格式：

　　Help_Compiler_rootname project_File_rootname

　　Help_Compiler_rootname是不帶擴展名的編譯器名字。project_file_rootname是不

　　帶擴展名的幫助工程文件名，如：

　　HCP MYHELP

　　11.2 Delphi應用程序的Help編程

　　Delphi應用程序能夠方便地應用幫助系統。程序可以動態地運行幫助系統。 對話框可以與幫助系統相聯。

　　11.2.1 定義應用程序的幫助文件

　　要在應用程序中使用幫助系統，必須有相應的幫助文件。程序可以編寫自己的幫助文件， 也可以使用已有的幫助文件。 另外，要為應用程序定義幫助文件以便在用戶需要幫助時應用程序能打開相應的幫助文件。

　　在 Delphi 集成開發環境中選擇“Options | Project” 菜單項， 系統彈出工程選擇對話框，　再選擇Application Options頁面，在輔助文件中輸入幫助文件名。

　　所有的應用程序都是TApplication的派生類。TApplication有三種方法調用在線幫助系統。

　　HelpContext方法可調用WinHelp(關于Winhelp的內容見上節)。它把HelpFile 中的文件名和一個文本代碼傳遞給WinHelp。HelpFile是TApplication的字符串類型的屬性，專門用來存放Help文件的。如果HelpFile屬性是空字符，HelpContext返回假值，其它情況均返回真值。

　　下面的例子使用窗體上的一個按鈕，當用戶單擊按鈕，屏幕出現DATA.HLP文件中714號主題內容。

　　procedure TForm2.Bin1Click(Snder : TObject)

　　begin

　　Application.HelpFile := DATAHLP;

　　Application.HelpContext(714);

　　end;

　　HelpJump方法可調用WinHelp。它傳遞HelpFile屬性中的文件名和幫助文件的內容字符串(詳見11.1節)。內容字符串是幫助文件中唯一辨識幫助主題的字符串。如果HelpFile 屬性是空字符，HelpFJump返回假值，其它情況均返回真值。

　　下面的例子使用了窗體上的一個按鈕。當用戶單擊按鈕， 幫助系統調出了 DELPH2.HLP文件中的Default屬性。因為Default屬性的內容字符串是VclDefaultProperty。

　　procedure TForm1.Tbn|Click(Sender : TObject)

　　begin

　　Application.HelpFile := 'DELPHI.HLP';

　　Application.HelpJump ('VclDefaultProperty');

　　end

　　HelpCommand方法能快速訪問WinHelp函數中的各種命令。根據這些命令WinHelp執行不同的動作。表11.2是WinHelp函數的有關信息。

　　BOOL WinHelp(hwd,LpszHelpFile,fuCommand,dwData)

　　表11.2 WinHelp的參數及含義

　　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

　　參數　類型　描 述

　　───────────────────────────────

　　hwnd HWND 請求幫助的窗口

　　LpszHelpFile LPSTK 待顯示的幫助文件的文件名

　　fuCommand UNIT 請求的幫助類型

　　dwData DWORD 幫助所需的描述表或關鍵字

　　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

　　HelpCOmmand向WinHelp傳遞fuCommand和dwData，fuCommand 是幫助類型可為表11.3中的列值之一。

　　表11.3 fuCommand的取值及含義

　　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

　　值　含 義

　　───────────────────────────────

　　HELP_LONTEXT 顯示dwData指定描述長的幫助信息

　　HELP_CONTENTS 顯示幫助的內容主題

　　HELP_SET_LONTENTS 如果dwData是Orol04則在一個彈出

　　式窗口中顯示Help主題

　　HELP_HELP PONHELP 顯示Help應用程序的自身幫助，函

　　數忽略lpszHelpFile和dwData參數

　　HELP_INDEX 顯示幫助文件的索引

　　HELP_KEY 顯示dwData指定的關鍵字的幫助

　　HELP_MULTIKEY 顯示一個關鍵字的幫助，該關鍵字

　　在一個可變關鍵字表中

　　HELP_QUIT 向Help應用程序報告文件不再使用

　　HELP_SETNDEX 把dwData指定的描述符作為幫助文

　　件的當前索引

　　━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

　　dwData參數的含義依賴于fuCommand的設置，如果fuCommand為HELP_CONTEXT，dwData為一個32 位的無符號整數，它包含一個描述表標識號：如果 fuCommand 為 HELP_KEY，dwData 則為一個指定長指針，所指的字符串是幫助的關鍵字。 如果 fuCommand 為HELPMULLTIKEY，dwData則指向一個MULTIKEYHELP數據結構的長指針。

　　下面的例子使用了窗體中的按鈕。當用戶單擊按鈕幫助系統將顯示指定文件的幫助內容主題。

　　procedure TForm1.Bin1Click(Sender : TObject)

　　begin

　　Application.HelpFile := 'MyHlep.HLP'

　　Application.HelpCommand(HELP_CONTENTS,0);

　　end;

　　TApplication部件的OnHelp事件響應幫助事件。 當應用程序接收到一個所需的幫助

　　時，發生OnHelp事件。使用OnHelp事件可以在需要幫助時定義一些特殊過程。 以下的例子改變了應用程序的幫助文件，AppHelp函數用來處理OnCreate事件。

　　function TForm1.AppHelp(Command.Word;Data : lontint) : Boolean

　　begin

　　if OpenDialog1.Exeeute then

　　Application HelpFile := OpenDialog1.FileName;

　　end;

　　11.2.2 通用對話框中使用幫助系統

　　Delphi通用對話框中都能顯示一個幫助按鈕。如果程序顯示了對話框中的幫助按鈕，應該確保應用程序的幫助文件中有相應的主題。

　　在通用對話框中使用幫助系統，要做到以下三點：

　　1. 把對話框的Option|SHOWHelp屬性設置成true，這樣在程序運行時將出現幫助按鈕。 ShowHelp 屬性與其部件的名字相關， 例如字體對話框的 ShowHelp 屬性稱為fdShowHelp。

　　2. 為對話框部件定義幫助文件。

　　3. 定義應用程序的文件名。