Текущий архив: 2006.07.02;
Скачать: CL | DM;

Вниз

Как запустить хелп???   Найти похожие ветки 

← →
dimak-2k   (2006-05-23 19:19) [0]

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

---

← →
umbra ©   (2006-05-23 19:27) [1]

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

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

---

← →
Loginov Dmitry ©   (2006-05-23 21:00) [2]

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

---

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

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

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 -"имя файла справки");

---

← →
dimak-2k   (2006-05-24 08:20) [4]

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

---

Страницы: 1 вся ветка

Текущий архив: 2006.07.02;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.031 c