Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.01.2011, 23:17   #1
DannYZero
Новичок
Джуниор
 
Аватар для DannYZero
 
Регистрация: 12.01.2011
Сообщений: 2
По умолчанию Как открыть файл справки .chm через Delphi?

Помогите пожалуйся, не понимаю как открыть файл справки через Delphi?
Создал файл справки help.chm, поискал в интернете как его можно запустить через Delphi - везде пишутся три функции:
WinExec
ShellExecute
CreateProcess

Попробовал WinExec - он только notepade и paint мне нормально открывает.
Попробовал ShellExecute - не понял как его настроить.
Попробовал CreateProcess (по ФАКу с какого то сайта) -


Код:
uses Windows
. . . .
var
  Rlst: LongBool;
  StartUpInfo: TStartUpInfo;
  ProcessInfo: TProcessInformation;
  Error: integer;
begin
  FillChar(StartUpInfo, SizeOf(TStartUpInfo), 0);
  with StartUpInfo do
  begin
    cb := SizeOf(TStartUpInfo);
    dwFlags := STARTF_USESHOWWINDOW or STARTF_FORCEONFEEDBACK;
    wShowWindow := SW_SHOWNORMAL;
  end;
  Rlst := CreateProcess('путь', nil, nil, false, NORMAL_PRIORITY_CLASS, nil, nil, StartUpInfo, ProcessInfo);
  if Rlst then
  with ProcessInfo do begin
    WaitForInputIdle(hProcess, INFINITE); 
    CloseHandle(hThread); 
    CloseHandle(hProcess); 
  end
else Error := GetLastError;
end;
end;
но ни чего не получилось - и вообще мне кажется последний способ слишком замудрен для обычного открытия файла.

Если кто знает - подскажите как и через что лучше и проще открыть мою справку?
Заранее спасибо
One shot - one kill. No luck - just skill.
DannYZero вне форума Ответить с цитированием
Старый 13.01.2011, 05:03   #2
DannYZero
Новичок
Джуниор
 
Аватар для DannYZero
 
Регистрация: 12.01.2011
Сообщений: 2
По умолчанию

Нашел таки сам =)
Если кто тоже пытался искать - спасибо =)

Решение оказалось куда проще чем я думал )))

Забил на кнопочку:
Код:
ShellExecute(Handle, 'open', 'K:\TechNOLOGY\help.chm',nil, nil, SW_SHOW);
и в uses
Код:
uses ShellAPI
и всего то =)
One shot - one kill. No luck - just skill.

Последний раз редактировалось DannYZero; 13.01.2011 в 05:05. Причина: Не дописал код до конца
DannYZero вне форума Ответить с цитированием
Старый 10.02.2011, 22:51   #3
GunSmoker
Старожил
 
Регистрация: 13.08.2009
Сообщений: 2,581
По умолчанию

Посмотри ещё это: http://www.gunsmoker.ru/2011/02/delphi.html
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
GunSmoker вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Delphi : Как Файл справки (CHM) Закрепить в приложении ? Vizavi Помощь студентам 4 08.05.2011 15:03
Как на Delphi открыть для записи файл в интеренте? Tyson78 Работа с сетью в Delphi 4 15.02.2008 10:16
Как открыть и сохранить mp3 файл в delphi? Rahim1993 Мультимедиа в Delphi 2 03.01.2008 12:55
как открыть файл через прогу? ЧИЖ Общие вопросы Delphi 12 29.05.2007 17:45
КАК ОТКРЫТЬ ЛЮБОЕ ПРИЛОЖЕНИЕ ЧЕРЕЗ DELPHI??? micaell Общие вопросы Delphi 8 17.12.2006 20:05