Использование справки HTML Help

Советы » Help файлы » Использование справки HTML Help

{ **** UBPFD *********** by delphibase.endimus.com ****
>> Использование справки HTML Help

Зависимости: hhctrl.ocx
Автор:       Oleg Gashev, oleg@gashev.com, ICQ:115695048, Israel, Rehowot
Copyright:   http://gashev.com
Дата:        04 мая 2002 г.
***************************************************** }

unit

uHtmlHelp; interface

uses

Windows; function

HtmlHelpA(hwndCaller: HWND; pszFile: PAnsiChar; uCommand: UInt; dwData: DWORD): HWND; stdcall

; external

'hhctrl.ocx'; implementation

end

. unit

SDIMAIN; // Main Window interface

uses

........., uHtmlHelp, .....; const

HH_CLOSE_ALL = $0012; ...... ...... function

TSDIAppForm.FormHelp(Command: Word; Data: Integer; var

CallHelp: Boolean): Boolean; begin

HtmlHelpA(handle, PChar(m_HelpFile), 15, Data); CallHelp := true; end

; procedure

TSDIAppForm.FormClose(Sender: TObject; var

Action: TCloseAction); begin

........... HtmlHelpA(handle, PChar(m_HelpFile), HH_CLOSE_ALL, 0); end

; end

.

Другое по теме:

Категории

Статьи

Советы

Copyright © 2022 - All Rights Reserved - www.delphirus.com