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

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

Как запустить хелп??? [D6, D7, WinXP]

dimak-2k ©   (2006-05-23 19:19:00) 

Суть такая: необходимо запускать справку  *.hlp нажатием кнопки. Я пробовал WinExec('c:\windows\winhlp32.exe' + ' ' + 'путь\имя.hlp', 0), получается. но проблема вся в том, что ОС может находится в др. месте и путь к имя.hlp может быть другим. Помогите, пожалуйста. Что надо сделать чтобы автоматически определяло, где система и где имя.hlp в WinExec()?

---

dimak-2k   (2006-05-24 08:20:00) [1]

Спасибо мужики за помощь

---

Панченко Владимир ака ПАН   (2006-05-23 23:56:00) [2]

Попробуй так:

procedure RunApp(AppName: String);
var
 StartUpInfo: TStartUpInfo;
 ProcInfo: TProcessInformation;
begin
 FillChar(StartUpInfo, SizeOf(StartUpInfo), 0);
 with StartUpInfo do
 begin
   cb := SizeOf(StartUpInfo);
   dwFlags := STARTF_USESHOWWINDOW or
     STARTF_FORCEONFEEDBACK;
   wShowWindow := sw_ShowNormal;
 end;
 if not CreateProcess(NIL, PChar(AppName), NIL, NIL,
   False, NORMAL_PRIORITY_CLASS, NIL, NIL, StartUpInfo,
   ProcInfo) then
     ShowMessage('Ошибка '+IntToStr(GetLastError))
end;

Дальше пиши RunApp("winhelp32.exe -"имя файла справки");

---

Loginov Dmitry   (2006-05-23 21:00:00) [3]

Еще можно использовать WinHelp()

---

umbra   (2006-05-23 19:27:00) [4]

нижеприведенное открывает файл спрвки имя.hlp.

uses ShellApi;
{........................}
ShellExecute(nil, 'open', 'имя.hlp', nil, nil, SW_SHOWNORMAL);

---

Наверх