Maza Faka
Цитата:
жалко конечно, что валится »
|
Вообще, случай с этим
HH забавный (если не сказать грустный).
Во-первых, есть такой
KB для VB, но добавление команд
HH_INITIALIZE/
HH_UNINITIALIZE (на всякий случай запостил ниже) ситуацию не меняет... разве только ошибка быстрей валится.
Во-вторых, на форуме родственной
AutoHotkey лежит готовый
пример от
PhiLho 2006-го года и судя по отзывам он должен работать, но он не работает!.. у меня валится примерно та же ошибка, можешь кстати проверить.
Код:

Global Const $HH_INITIALIZE=0x1C
Global Const $HH_UNINITIALIZE=0x1D
$tCookie = DllStructCreate("dword")
$DllRet = DllCall("HHCtrl.ocx", "hwnd", "HtmlHelp", "hwnd", 0, "ptr", 0, _
"uint", $HH_INITIALIZE, "dword", DllStructGetPtr($tCookie))
; .....
$DllRet = DllCall("HHCtrl.ocx", "hwnd", "HtmlHelp", "hwnd", 0, "ptr", 0, _
"uint", $HH_UNINITIALIZE, "dword", DllStructGetData($tCookie, 1))
Котяра
Код:

#Include <File.au3>
$sFileName = $cmdline[$cmdline[0]]
If IsNumber($sFileName) Then $sFileName = StringRegExpReplace(@ScriptFullPath, "\.au3|\.exe$", "") &".inf"
$aFileList=_FileListToArray(@ScriptDir, "*.ttf", 1)
If @Error Then Exit
$aFileList[0]="[fonts]"
_FileWriteFromArray($sFileName, $aFileList)