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

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

Вызов help-файла из приложения [D5, Win2k]


bobr12 ©   (2002-05-31 14:57:00) 

Я пишу Application.HelpCommand(Help_Contents, 0); При этом вызывается первый раздел help-файла. Я хочу, чтобы вызывалось содержание help-файла. Как это сделать?


Jony   (2002-05-31 17:47:00) [1]

Если у тебя в проекте установлен ActionList, то в Action пункта меню поставь acHelpContents. А если нет, то на OnClick повесь обработчик

procedure TfrmFullMain.mHelp(Sender: TObject);
const HELP_GETTING_STARTED = 0;
begin
WinHelp(WindowHandle,PChar(Application.HelpFile),HELP_CONTEXT,HELP_GETTING_STARTED);
end;



Катерина   (2002-05-31 16:25:00) [2]

WinExec(PChar("WINHLP32 "+Application.HelpFile),SW_SHOW);


bobr12   (2002-05-31 15:54:00) [3]

Откровенно говоря я не очень понял, что делает функция AppHelp, да и вызвать я ее не смог. И что такое AppEvents?


Игорь Шевченко   (2002-05-31 15:45:00) [4]

bobr12 (31.05.02 15:42)

Тот код, кторый я привел, выполняет аналогичную задачу :-)
Больше, чем одно окно не появляется.

С AppEvents попробуйте


bobr12   (2002-05-31 15:42:00) [5]

Вызов содержания происходит из меню приложения.


Игорь Шевченко   (2002-05-31 15:26:00) [6]

Еще можно указать (в дополнение)

Application.OnHelp := AppHelp;

function TfMain.AppHelp(Command: Word; Data: Integer;
var CallHelp: Boolean): Boolean;
begin
CallHelp := true;
Result := true;
end;

Это часть работающего примера.

А откуда вызов содержания происходит ?


bobr12   (2002-05-31 15:21:00) [7]

Получается не совсем то. Вызывается и содержание help-файла и пытается загрузится какой-то раздел help-файла. А я хочу, чтобы вызывалось только содержание.


Игорь Шевченко   (2002-05-31 15:04:00) [8]

Попробуйте

Application.HelpCommand(HELP_FINDER, 0);


Наверх

Титульная страница Поиск, карта сайта Написать письмо