Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.106 c
2-1150186618
Nikolaich
2006-06-13 12:16
2006.07.02
Как написать такое условие красиво и короче по возможности?


2-1150421663
Anonymous2
2006-06-16 05:34
2006.07.02
Удаление файлов из папки.


2-1150119269
Yegorchic
2006-06-12 17:34
2006.07.02
DLL и Self


2-1150377106
Scavenger
2006-06-15 17:11
2006.07.02
Задержка времени


9-1131679382
VolanD666
2005-11-11 06:23
2006.07.02
Проблема с QuadTree