Консультация № 59885
23.10.2006, 14:49
0.00 руб.
0 1 1
Как можно запустить файл, если он в ресурсах проекта? Его имя Help.Chm

Обсуждение

Неизвестный
23.10.2006, 16:06
общий
это ответ
Здравствуйте, Томша Павел!
Так как chm - это файл, который открывается с помощью другой программы (hh.exe), то его надо сначала извлечь, а потом открыть.
Извлечение файла:
procedure ExtractRes(ResType, ResName, ResNewName : String);
var
Res : TResourceStream;
begin
Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
Res.SavetoFile(ResNewName);
Res.Free;
end;
Запуск:
ShellExecute(0, nil, pchar(‘hh.exe‘),‘Help.Chm‘, nil, SW_SHOWNORMAL)
Добавьте в uses модуль shellapi.
Форма ответа