| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как подключить *.chm? [D7, WinXP]

Studentik ©   (2004-08-01 19:17:00) 

Во многих программах сейчас встречается формат HTML Help. А как такую справку запустить в своем приложении, да еще с указанием раздела справки. Т.е. стандартные ShellExecute и Winexec не помогут? Подскажите примерчик.

---

AndB   (2004-08-03 07:35:00) [1]

не извиняйся. все равно - лажа. то я [1] уточнил. Чем тебе ShellExecute понравился? используй [2]
Или http://www.delphimaster.ru/cgi-bin/news.pl?showone=1071737820

---

Studentik   (2004-08-03 05:46:00) [2]

Извиняюсь...

---

AndB   (2004-08-03 03:36:00) [3]

по буквам читай. третий параметр hh.exe

---

Studentik   (2004-08-02 20:30:00) [4]

Пример с ShellExecute мне понравился, но открыть на требуемом топике не удается:

ShellExecute(application.handle, nil, pChar('C:\a\kr.chm'), 'kr.chm::/archive.htm', pChar(ExtractFilePath('C:\a\kr.chm')), SW_RESTORE)

:-(((

---

AndB   (2004-08-02 05:51:00) [5]

если ShellExecute с указанием раздела справки, то так:
ShellExecute(application.handle, nil, pChar('hh.exe'), 'myhelp.chm::/topic3.html#label7', pChar(ExtractFilePath('X:\XX\myhelp.chm')), SW_RESTORE);

---

oleg_SYS   (2004-08-02 03:16:00) [6]

1. Установи компонент ActiveX Hhopen (Component=>Import ActiveX Control.
2. Зайди во вкладку ActiveX (она должна создаться) и положи на форму Hhopen.
Потом пиши такой код:

var
hf, ht : string;
pwhf, pwht: string;
begin
hf := 'Путь к CHM-файлу';
ht := 'Раздел справки';

GetMem(pwhf, Length(hf)*2);
GetMem(pwht, Length(ht)*2);

pwhf := StringToWideChar(hf,pwhf,MAX_PATH*2);
pwhf := StringToWideChar(ht,pwhf,32);

Hhopen.OpenHelp(pwhf, pwht);


Будут вопросы - обращайся, а то печатать лом было :)

---

Forelli   (2004-08-01 22:59:00) [7]

implementation
usesShwllAPI;
procedureButton1Click(Sender:TObject);
begin
ShellExecute(application.handle, pChar('X:\XX\help.chm'),pChar(ExtractFilePath('X:\XX\help.chm')),'',0);
end;

---

Наверх