如何在Delphi XE2应用程序上通过a -link (a -keyword)调用上下文帮助?
您所需要的就是这个函数:
procedure ShowHelpALink(const HelpFile, ALink: string);
var
Link: THH_AKLink;
begin
ZeroMemory(@Link, SizeOf(Link));
Link.cbStruct := SizeOf(Link);
Link.pszKeywords := PChar(AnsiString(ALink));
Link.fIndexOnFail := True;
HtmlHelp(GetDesktopWindow, HelpFile, HH_ALINK_LOOKUP, DWORD_PTR(@Link));
end;
由于某种原因,HtmlHelp
将THH_AKLink
记录中的字符串解释为ANSI字符串。我找不到任何相关文件。我怀疑这只是HtmlHelp文件库中的一个bug。我认为你在THH_AKLink
中传递的字符串必须是ANSI字符串。