Олимпиада

В России появились б...

Четверг, 30 Август 2012
Компания HEC/COMPUCASE Europe GmbH объявляет о начале продаж в России блоков питания марки COUGAR серии CMX. Новые БП мощные и тихие, с модульным подключением кабелей. Линейка состоит из 4 моделей мощностью 550,...
Читать полностью

ЧП добровольно выпла...

Вторник, 28 Август 2012
Днепропетровска компания "Безопасность, охрана, гарантия", предоставляющая услуги по охране, использовала 14 компьютеров с установленными, на каждом из них, пиратскими копиями операционных систем и офисных приложений Microsoft. Согласно действующего законодательства, за хранение...
Читать полностью

«SMS XL» от «Киевста...

Суббота, 25 Август 2012
До 15 июня 2011 года абоненты предоплаченной связи Киевстар могут воспользоваться новым акционным предложением SMS XL с включенным объемом SMS для отправки на номера сети Киевстар и DJUICE. Киевстар вводит новое акционное...
Читать полностью

Вредоносные программ...

Четверг, 23 Август 2012
Согласно данным мониторинга, абсолютным лидером по количеству заражений в Интернете в этом месяце стал размещаемый на порно-сайтах скрипт из семейства FakeUpdate - Trojan.JS.FakeUpdate.bp. Он предлагает скачать видео соответствующего содержания, однако для...
Читать полностью

Samsung анонсировала...

Понедельник, 20 Август 2012
Компания Samsung Mobile Display анонсировала выход семидюймовых дисплеев, изготовленных по ее технологии Super-AMOLED, пишет ресурс OLED-Display.net со ссылкой на корейское издание Etnews Новые дисплеи имеют разрешение 1200 на 600 пикселей.
Календарь
< Август 2012 >
П В С Ч П С В
    1 2 3 4 5
6 7 8 9 10 11 12
14 15 16 17 18 19
20 21 22 23 24 25 26
27 28 29 30 31    
Анонсы новостей

Современные возможности программирования и качественный ламинат в интернет магазине

На сегодня в интернете есть немало сайтов, на которых можно приобрести отличные строительные материалы для отделочных работ.

Читать полностью
Яндекс.Метрика


Как использовать справку в программах Delphi

altКак Delphi программы работают с файлами справки

Прежде чем ваша Delphi программа сможет показывать справку - вы должны сказать вашему приложению (т.е. программе), что она (справка) у вас вообще есть. Делается это установкой свойства HelpFile у объекта Application или формы.
В каждом VCL приложении Delphi есть глобальный объект Application ("Приложение") типа TApplication. У этого объекта есть свойства и методы, влияющие на всё приложение целиком. И для активации справки у него есть свойство Application.HelpFile.
Когда этому свойству присвоено значение, вы можете использовать методы и свойства объекта Application и ваших форм (окон), чтобы работать с вашей справкой. Значением свойства является имя файла справки вашей программы. Формат справки может быть любым из поддерживаемых вашим приложением (об этом чуть позже). Сейчас только отметим, что разные форматы файлов справок имеют разные возможности (и внешний вид!). Отличается также и поддержка этих форматов в самой Delphi. Поэтому, будет ли работать та или иная возможность, обсуждаемая ниже - будет зависеть от того, какой формат файла справки вы выберите. Но, опять-таки, об этом позже.
Итак, помимо объекта Application, свойство HelpFile есть и у объектов класса TForm. Когда приложению поступает команда по работе со справочной системой (например, пользователь нажал F1), то Delphi приложение будет использовать файл справки, указанный в Application.HelpFile для выполнения этой команды. Но если при этом активна форма, у которой задано её свойство HelpFile, то для выполнения команды будет использовать свойство формы, а не приложения.
Иными словами, Form.HelpFile просто изменяет Application.HelpFile в контексте одной конкретной формы. Если в вашей программе есть только один файл справки, то вы не должны устанавливать свойства HelpFile у форм, а установить свойство HelpFile у объекта Application.
Практика: указываем файл справки
Вы можете установить свойство HelpFile программно (кодом) или указать в свойствах проекта.
Программно: Project / View Source

program Project1;
uses
Forms,
SysUtils, // <- Добавлено
Unit1 in Unit1.pas {Form1};
{$R *.res}
begin
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.HelpFile := ExtractFilePath(Application.ExeName) + HelpHelpFile.hlp; // <- Добавлено
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
В этом примере файл справки должен называться HelpFile.hlp и лежать в подпапке Help вашей программы. Разумеется, вы должны заменить эту строчку своими данными.
Через GUI: Project / Options / Application:


Здесь есть целых три проблемы:
Нажатие на кнопку "Browse" покажет вам только *.hlp файлы. Чтобы выбрать файл другого формата, вам нужно выбрать в фильтре диалога открытия опцию "All Files (*.*)".
Выбор файла справки кнопкой "Browse" занесёт в поле полный путь к файлу вида "C:UsersАлександрDocumentsRAD StudioProjectsDemoProjectHelpHelpFile.hlp" - это не очень удачная идея, ведь на машине, куда ваша программа будет потом установлена, этот файл будет лежать в совершенно ином месте. Лучшая идея - обрезать путь до относительного: ".HelpHelpFile.hlp".
Проблема с предыдущим пунктом в том, что относительный путь считается относительно текущего каталога . Который обычно равен папке вашей программы, но далеко не всегда. Лучшим решением будет исправить этот момент так:

program Project1;
uses
Forms,
SysUtils, // <- Добавлено
Unit1 in Unit1.pas {Form1};
{$R *.res}
begin
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.HelpFile := ExtractFilePath(Application.ExeName) + Application.HelpFile; // <- Добавлено
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
Что даёт вам 100% гарантию работы, но... не проще ли просто использовать программную установку пути изначально, не трогая GUI?
Что касается индивидуальных файлов справок для форм - то к ним применимы те же слова: вы можете выставлять свойства программно:

procedure TForm1.FormCreate(Sender: TObject);
begin
HelpFile := ExtractFilePath(Application.ExeName) + HelpMainForm.hlp;
end;
или через инспектор объектов:

И снова: проблемы с относительными/полными путями ведут к тому, что первый способ с программной установкой выглядит намного привлекательнее.
Поддержка справки в Delphi программах
Как только Delphi приложение узнает, что у него есть файл справки, оно даст вам семь стандартных способов показать справку:
Нажатие F1
Эта функция реализует контекстую справку. Когда пользователь нажимает F1, приложение ищет в файле справке тему (topic) с номером контекста (context number) или ключевым словом (keyword), заданными в свойствах компонента, имеющего фокус. Если найдена одна или несколько тем - то открывается файл справки, показывая эти темы в отдельном окне.
Кнопка с вопросиком в заголовке окна

Эта кнопка активирует контекстно-зависимый режим справки на форме - так называемая функция "Whats this?" ("Что это такое?"). Когда пользователь нажимает на эту кнопку, форма временно отключается, а курсор меняет форму на стрелочку с вопросиком:
Нажатие на любом элементе управления в этом режиме заставит приложение выполнить поиск темы в файле справки, ассоциированной с этим компонентом. Если тема найдена, то она будет показана во всплывающем окошке.
Обычно этот способ не используется в современных программах. Исторически он появился в 16 разрядных Windows, когда ещё не было всплывающих подсказок. Сегодня же вместо этого функционала намного проще использовать обычное свойство Hint.
Кнопка "Справка" с Kind = bkHelp

Это простой способ вызвать справку, не создавая ни строчки кода. Нажатие на кнопку откроет тему с номером контекста или ключевым словом, заданными в свойствах либо самой кнопки, либо (обычно) формы.
Application.HelpCommand
Это гибкий метод, который позволяет вам выполнить любую команду с вашим файлом справки. Подробнее эта команда рассмотрена ниже.
Application.HelpJump
Это вспомогательная функция, которая является обёрткой к Application.HelpCommand с командой "jump". Она позволяет вам отобразить тему справки по её ID (имени).
Application.HelpContext
Это вспомогательная функция, которая является обёрткой к Application.HelpCommand. Она позволяет вам показать тему по так называемому номеру контекста (context number).
Application.HelpKeyword
Это вспомогательная функция, которая является обёрткой к Application.HelpCommand. Она позволяет вам показать тему по ключевому слову (keyword).
Функции 1, 2 и 3 работают автоматически. Вам не нужно ничего делать, кроме как привязать темы справки к компонентам (через номера контекстов или по ключевым словам).
Практика: простой вызов справки
Разберём самые простые методы работы со справкой - показ фиксированных окон и тем без учёта контекста, используя последние четыре метода из списка в предыдущем пункте.
Каждое серьёзное Windows приложение имеет пункт меню "Справка" вроде такого:


Или хотя бы такого:


Когда вы нажимаете на подобные пункты меню - появляется окно, называемое (в терминах Microsoft) "Finder". Оно выглядит как-то так:


Или так (в этом случае окно Finder включает в себя и окно с темой):


Или так:


Как открыть справку
Итак, как вам открыть окно Finder? На самом деле, это очень просто: поместите этот код в обработчик нажатия пункта меню:

procedure TForm1.miHelpContentsClick(Sender: TObject);
begin
Application.HelpCommand(HELP_FINDER, 0);
end;
Этот код покажет окно Finder на той вкладке, которая была открыта в последний раз.
Как открыть оглавление справки
Оглавление (Table Of Contents) - это первая вкладка окна Finder. Это так же просто, как открыть окно Finder, но команда будет выглядеть так:

procedure TForm1.miHelpContentsClick(Sender: TObject);
begin
Application.HelpCommand(HELP_TAB, 0);
end;
Примечание: в некоторых версиях Delphi константа HELP_TAB не определена. В этом случае добавьте в подходящее место программы это определение:

const
HELP_TAB = 15;

Как открыть тему по-умолчанию
Тема по-умолчанию - это тема, которая была указана как тема по умолчанию в настройках файла справки. Если таковой не указано, то темой по умолчанию считается первая тема в оглавлении. Команда для открытия темы по умолчанию выглядит так:

procedure TForm1.miHelpDefaultClick(Sender: TObject);
begin
Application.HelpCommand(HELP_CONTENTS, 0);
end;
Историческая справка
Что происходит, когда вы открываете старый файл справки из 16 битных Windows? Открывается окно, показывающее тему. Эта тема называется темой по умолчанию (default topic).
32 битный файл справки формата WinHelp состоит из двух файлов (16 битный - из одного): .HLP, который содержит темы и оглавление - .CNT. Если вы удалите .CNT файл и откроете .HLP файл, то увидите тему по умолчанию.
В прошлом веке, когда Windows 3.x ещё была передовыми технологиями, тема по умолчанию была единственным способом показать какой-то обзор (содержание). Эта тема обычно была первой темой в файле справки и содержала ссылки на другие темы. Вот почему Microsoft называла её "CONTENTS" (Оглавление). Если эта тема явно не задана, то темой по умолчанию считается первая тема в файле справки.
Вот почему команда

Application.HelpCommand(HELP_CONTENTS, 0);
НЕ покажет вам содержание, несмотря на название "CONTENTS". Это команда для открытия темы по умолчанию.

Как открыть индекс справки
Вкладка индекс (Index) показывает алфавитный список ключевых слов (keyword). Ключевые слова должны быть заданы в свойствах тем. Если ключевые слова вообще не определены - эта вкладка не показывается.
Следующий пример показывает, как можно открыть справку на вкладке индекса:

procedure TForm1.ShowKeywordIndex;
var
Command: array[0..255] of Char; // примечание: этот код также работает с D2009+
begin
Command := SEARCH();
Application.HelpCommand(HELP_FORCEFILE, 0);
Application.HelpCommand(HELP_COMMAND, Longint(@Command));
end;

Как открыть поиск по справке
Вкладка поиска (Find) показывает диалог полнотекстового поиска по справке. Если в файле справки отключены возможности полнотекстового поиска, то эта вкладка вообще не показывается.
Следующий пример открывает окно справки с активным окном поиска:

procedure TForm1.ShowFullTextSearch;
var
Command: array[0..255] of Char; // примечание: этот код также работает с D2009+
begin
Command := FIND();
Application.HelpCommand(HELP_FORCEFILE, 0);
Application.HelpCommand(HELP_COMMAND, Longint(@command));
end;

Как открыть тему по имени
Для показа темы по имени вы можете использовать метод Application.HelpJump, который принимает один строковый параметр - ID (имя) темы. Например:

procedure TForm1.ShowTopicByName;
begin
Application.HelpJump(mytopic);
end;
Этот метод возвращает True, если тема существует и была найдена, и False - в противном случае. Однако, в последнем случае также автоматически показывается сообщение пользователю о том, что тема не существует.
Если в вашей Delphi команды HelpJump нет, то вот её код:

function TForm1.HelpJump(const JumpID: string): Boolean;
var
Command: array[0..255] of Char;
begin
Result := True;
if InvokeHelp(HELP_CONTENTS, 0) then
begin
StrLFmt(Command, SizeOf(Command) - 1, JumpID("","%s"), [JumpID]);
Result := Application.HelpCommand(HELP_COMMAND, Longint(@Command));
end;
end;
Как открыть тему по номеру контекста
А для показа темы по контекстному номеру вы можете использовать метод Application.HelpContext, который принимает один числовой параметр - номер контекста. Например:

procedure TForm1.ShowTopicByNumber;
begin
Application.HelpContext(2);
end;
Аналогично, этот метод возвращает True, если тема существует и была найдена, и False - в противном случае.
Если в вашей Delphi команды HelpContext нет, то вот её код:

function TForm1.HelpContext(const AContext: Integer): Boolean;
begin
Result := Application.HelpCommand(HELP_CONTEXT, AContext);
end;
Обычно вы не вызываете эту команду вручную - ведь вы может просто ассоциировать компонент с темой, используя свойства (про это - ниже).
Эта команда покажет тему в отдельном окне. Если вы хотите использовать всплывающее окно - используйте другую команду:

procedure TForm1.ShowTopicByNumberInPopup;
begin
Application.HelpCommand(HELP_CONTEXTPOPUP, 2);
end;

Как открыть тему по ключевому слову
Интересовались ли вы когда-нибудь, как работает справка среды Delphi? Когда вы выделяете свойство компонента в инспекторе объектов или устанавливаете на него курсор в коде и нажимаете F1, то вы получаете описание этого свойства.
Это работает при помощи ключевых слов. Когда вы нажимаете F1, в справке ищутся темы с ключевым словом, которое указано под курсором или в инспекторе объектов. Для этого файл справки должен содержать список ключевых слов, ассоциированных с темами. Вы задаёте это при создании файла справки (указывая ключевые слова в свойствах темы).
Для показа темы по ключевому слову используется метод Application.HelpKeyword, который принимает один строковый параметр - ключевое слово. Например:

procedure TForm1.ShowTopicByKeyword;
begin
Application.HelpKeyword(example);
end;
Если в вашей Delphi команды HelpContext нет, то вот её код:

function TForm1.HelpKeyword(const AKeyword: String): Boolean;
var
Command: array[0..255] of Char;
begin
StrLcopy(Command, PChar(AKeyword), SizeOf(Command) - 1);
Result := Application.HelpCommand(HELP_KEY, Integer(@Command));
end;
А как теперь закрыть справку
Нет ничего проще:

procedure TForm1.CloseHelp;
begin
Application.HelpCommand(HELP_QUIT, 0);
end;

Практика: вызов справки с контекстом
Контекстная справка (context sensitive help или contextual help) даёт мгновенную поддержку пользователям, не заставляя их покидать контекст, в котором они работают. Она показывает информацию о конкретном объекте, с которым работает пользователь. Обычно она отвечает на вопросы вроде "Что это такое?", "Зачем это использовать?" и "Что и как с этим делать?". Она очень полезна именно тем, что пользователь не отключается от процесса работы. Основные способы для контекстной справки включают в себя:
Контекстные темы в файле справки
Кнопки вызова справки (например, кнопка Help рядом с OK и Cancel в диалогах)
Всплывающие подсказки (показываются при наведении мыши на объект)
Сообщения в строке статуса (StatusBar)
Когда я говорю про контекстную справку в этом посте, я в имею в виду первые два пункта. Вторые два пункта в этой статье не рассматриваются. Второй пункт реализуется либо ручным вызовом справки одним из методов, которые мы рассмотрели выше, либо назначением кнопки вида (Kind) bkHelp (обработчик при этом реализовывать не требуется).
Итого, сейчас нам осталось поговорить про первый пункт.
Как включается контекстная справка
Контекстная справка обычно вызывается одним из трёх основных способов:
Нажатие F1, когда фокус ввода находится на каком-то элементе управления. Это основной способ показа контекстной справки. Когда пользователь застревает, он нажимает F1, а программа показывает ему тему справки, в зависимости от того, где он находится. Этот способ поддерживается Delphi и вам не нужно писать для него код.
Функция "Whats this?". Это либо кнопка с вопросиком в заголовке окна, либо аналогичная кнопка с вопросиком на панели инструментов (Toolbar-е), либо пункт меню Справка/Что это такое?. Как я уже говорил, это старый режим работы со справкой. Я не буду его особо рассматривать, потому что в современных программах гораздо проще и удобнее использовать всплывающие подсказки.
Кнопка с Kind = bkHelp или аналогичный способ. Этот способ нельзя полностью отнести к контекстой справке - ведь когда вы щёлкаете на кнопку, то фокус уходит с текущего элемента управления. Тем не менее, я перечисляю этот способ, как ещё один вариант автоматического вызова справки без написания кода.
Как реализуется контекстная справка
Показ темы в контекстно-зависимой справке требует идентификации темы по числовому номеру, называемому номером контекста (context number). В более поздних версиях Delphi также возможен показ контекстой справки по ключевым словам. По умолчанию в файле справки не задаются ни номера контекстов, ни ключевые слова. Вы должны либо вводить их вручную, либо (только для номеров контектов) вы можете включить в опциях автоматическую нумерацию (в некоторых продвинутых редакторах файлов справок, типа Help & Manual).
Возможно, вы уже заметили эти свойства в инспекторе объектов - это свойство HelpContext и свойство HelpKeyword:


Свойство HelpType определяет, какое свойство нужно использовать для вызова контекстной справки. Обычно используются номера контекстов, а не ключевые слова - этот вариант является вариантом по умолчанию для свойства HelpType.
Для работы контекстной справки или эти номера (не важно - созданные вами или проставленные автоматически) или ключевые слова должны быть присвоены темам и установлены в свойства компонентов на форме. Номера должны быть уникальны как в файле справки, так и в Delphi проекте. Вы можете присвоить один и тот же номер двум и более компонентам - но это будет означать, что эти компоненты привязаны к одной и той же теме. В отличие от номеров контекста, ключевые слова не обязаны быть уникальными. Если с одним ключевым словом связано более одной темы, то вам будет показано окно, из которого вы сможете выбрать нужную тему.
Когда пользователь вызывает контекстную справку (любым из способов, описанных в предыдущем пункте - либо через F1, либо через функцию "Whats this?", либо кнопкой "Справка") - то показывается тема справки, контекстный номер которой указан в свойстве HelpContext. Либо же, если HelpType установлено в htKeyword, то показывается тема(ы) с ключевым словом из свойства HelpKeyword. Для работы контекстной справки вам не нужно делать ничего, кроме как проставить номера контекстов темам и компонентам. Всю работу Delphi сделает автоматически.
Вам не нужно проставлять номера контекстов или ключевые слова абсолютно всем компонентам на форме - ведь свойства HelpContext и HelpKeyword наследуется. Т.е. если вдруг у компонента нужное свойство не задано (равно нулю или пустой строке соответственно), то используется свойство HelpContext/HelpKeyword его родителя (в смысле Parent). Если же это свойство не задано и у родителя - то проверяется свойство родителя родителя. И так далее, вплоть до формы. Если же свойство не задано и у формы, то контекстная справка вообще не вызывается. Если вы используете кнопку вызова справки с Kind = bkHelp, то вы обязаны присвоить номер контекста или ключевое слово либо ей, либо форме.
Итак, суммируя: чтобы в вашей программе работала контекстная справка, вам нужно:
Вы должны указать приложению, что у вас есть файл справки. Это общее действие для любого типа справки в Delphi приложении.
Вы должны придумать и присвоить номера контекстов (либо ключевые слова, либо и то и другое) темам в вашем файле справки. Необязательно делать это для всех тем. Если ключевые слова желательно проставлять вообще (для работы индекса), то номера контекстов можно указывать только у тех тем, которые должны быть доступны через контекстную справку. Вы можете включить автоматическую нумерацию, если ваша программа для создания файлов справок это позволяет.
Вы должны присвоить контекстные номера (либо ключевые слова) форме и компонентам на ней в вашем Delphi приложении, чтобы ассоциировать элементы управления в приложении с темами справки. Как минимум, вы должны указать эти номера (ключевые слова) для форм.
Готово. После этого в вашей программе будет работать контекстная справка. Вы можете открыть вашу программу и, к примеру, нажать F1 - автоматически откроется тема в справке, которую вы задали в свойствах текущего элемента управления.
Обзор распространённых форматов файлов справок
На сегодняшний день существуют такие форматы справок (из самых распространённых):
16 битный Windows Help aka WinHelp 1.0 (.HLP) - проприетарный формат файлов справки, разработанный компанией Microsoft для организации справочной системы. Исходная информация подготавливается в форматах RTF (текст) и BMP (изображения), а затем с использованием компилятора генерируется бинарный файл с расширением HLP. Поддержки Unicode нет. Может быть декомпилирован в исходные файлы. Разработан в 1990 и поддерживается в Win16, Win32, WinNT до XP включительно. Устарел в 2006. Ограничено доступен в Windows Vista и Windows 7 (и выше) - поддержка для него должна быть установлена дополнительно. Сегодня в здравом уме не используется никем.
32 битный Windows Help aka WinHelp 2.0-4.0 (.HLP + .CNT) - улучшенный вариант формата .HLP, появившийся в Windows 95. Поддерживается в Win32/WinNT до Windows XP включительно. Поддержки Unicode нет. Устарел в 2006. Ограничено доступен в Windows Vista и Windows 7 (и выше) - поддержка для него должна быть установлена дополнительно. Сегодня в основном используется старыми приложениями или теми, кому нужны специальные функции формата WinHelp.
Compiled HTML Help aka HTML Help 1.0-1.4 (.CHM) - основной и самый популярный формат файлов справок, выпущенный в 1997 и поддерживаемый начиная с Windows 98 во всех Windows, включая Windows Vista и Windows 7. Представляет собой скомпилированный файл, полученный из обычных HTML-файлов со специальной разметкой. По этой причине формат стал популярным для создания e-books. Может быть декомпилирован в исходные файлы. Однако в этот формат уже не вносятся изменения и новые возможности, а лишь устраняются найденные уязвимости. Microsoft планирует заменить его на какой-нибудь другой формат в будущем. Поддержка Unicode ограничена.
Assistance Platform 1.0 (.H1S) - достаточно специфичный формат справки, поскольку используется только для расширения встроенной справки самой ОС OEM партнёрами. Понятно, что он не предназначен для общего использования.
Microsoft Help aka HTML Help 2.0 (.HXS) - формат справки, используемый Visual Studio 2002/2003/2005/2008 и последними версиями Delphi. Разработан в 2001. Поддерживает Unicode. Сжатый файл .HxS получается из набора тем, написанных в HTML (похоже на .CHM). В отличие от всех прочих форматов, этот формат справки НЕ предназначен для программ общего назначения. Дело в том, что просмотрщик справки этого формата не входит в комплект ни одной ОС Windows на сегодняшний день. Поддержка справки этого формата устанавливается только вместе с Visual Studio или Delphi - это Document Explorer (dexplore.exe). Плюс ко всему вы не можете таскать вместе со своей программой установщик для этой справки (согласно лицензии).
Microsoft Help System aka HTML Help 3.0 (.MSHC) - формат справки, используемый Visual Studio 2010. Разработан в 2009. Поддерживает Unicode. Аналогично формату HTML Help 2.0/HXS - НЕ предназначен для программ общего назначения (по крайней мере пока), хотя ограничений на просмотрщик уже нет (справку можно просматривать в любом браузере). Файл .MSHC является обычным переименованным .ZIP файлом. Компилятор не требуется - файлы содержимого, содержащие ссылки друг на друга, просто укладываются в архив. Сильные стороны формата: открытость, быстрота, простота и прозрачная интеграция с online-справкой. Этот формат справки имеет потенциал заменить собой .CHM и стать новой стандартной системой справки в будущем.
HTML (.HTML) - представляет собой просто набор обычных HTM/HTML файлов. Понятно, что такой формат достаточно ограничен и обычно не имеет никаких преимуществ перед .CHM - окромя полной поддержки Unicode.
Portable Document Format (.PDF) - формат, созданный Adobe Systems в 1993. Обычно этот формат используется для печати справки (ещё точнее - руководства) на бумаге, а не как файл справки в программе.
Web/Online - вообще не файловая справка. Представляет собой открытие web-сайта со страничкой справки на нём.
Официально рекомендации Microsoft на октябрь 2010-го выглядят так:
Не используйте .HLP.
Для программ общего назначения используйте .CHM.
Если вы OEM партнёр MS, который хочет расширить центр справки и поддержки Windows в Windows Vista или Windows 7 - то используйте .H1S.
Если вам нужна интеграция в справочную систему Visual Studio 2002 - 2008 (примечание от меня, не от MS: или Delphi), то используйте .HxS.
Если вам нужна интеграция в справочную систему Visual Studio 2010, то используйте .MSHC.
.H1S, .HxS и .MSHC не доступны для программ общего назначения, а .HLP устарел.
Итак, если подытожить - для Delphi программ у вас есть выбор из трёх вариантов:
.HLP (WinHelp 4.0)
.CHM (HTML Help 1.x)
Web/Online
Из них .CHM и Web/Online являются основными, а .HLP используется только в особых случаях.
Поддержка форматов справки в Delphi
.HLP
Поддержка этого формата есть во всех версиях Delphi. В Delphi 7 и ниже вам ничего специально делать не надо. В Delphi 2005 и выше вам нужно подключить модуль WinHelpViewer в любую секцию uses.
.CHM
Штатная поддержка этого формата есть в Delphi 2005 и выше. Для этого вам нужно только указать в любом uses модуль HTMLHelpViewer (как обычно: чем раньше - тем лучше).
Примечание: не подключайте одновременно WinHelpViewer и HTMLHelpViewer. Либо первый, либо второй, либо ни один, но не оба сразу.
Для Delphi 7 и ниже вы можете использовать моё решение. Использовать его не менее просто - просто распакуйте архив в папку вашего проекта и добавьте модуль HTMLHelpViewerEx в любой uses вашего проекта.
Это решение также может быть использовано в Delphi 2005 и выше, если вас не устраивает стандартное решение (модуль HTMLHelpViewer). И снова: подключайте в uses только один модуль (либо WinHelpViewer, либо HTMLHelpViewer, либо HTMLHelpViewerEx, либо ни одного).
См. табличку ниже для сравнения возможностей форматов и их реализации.
Web/Online
Поскольку стандарта на эти системы справок не существует, то в Delphi нет никакой стандартной поддержки справки этого формата. Вам придётся делать её самостоятельно. Проще всего это сделать, назначив обработчик события Application.OnHelp. В обработчике вам нужно организовать реакцию на команды, которые реально использует ваше приложение, например:

type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
function ApplicationHelp(Command: Word; Data: Longint; var CallHelp: Boolean): Boolean;
...
end;
...
procedure TForm1.FormCreate(Sender: TObject);
begin
Application.OnHelp := ApplicationHelp;
end;
function TForm1.ApplicationHelp(Command: Word; Data: Longint; var CallHelp: Boolean): Boolean;
procedure OpenURL(const AURL: String);
var
SEI: TShellExecuteInfo;
begin
FillChar(SEI, SizeOf(SEI), 0);
SEI.cbSize := SizeOf(SEI);
{$IFDEF UNICODE}
SEI.fMask := SEE_MASK_UNICODE;
{$ENDIF}
SEI.Wnd := Handle;
SEI.lpVerb := open;
SEI.lpFile := PChar(AURL);
SEI.nShow := SW_SHOWNORMAL;
if not ShellExecuteEx(@SEI) then
RaiseLastOSError;
end;
var
DataStr: String;
begin
// Пока установим признак успешного выполнения
Result := True;
case Command of
// Открытие заголовочной страницы
HELP_FINDER, HELP_TAB, HELP_CONTENTS:
OpenURL(Application.HelpFile);
// Поиск по ключевому слову
HELP_KEY:
OpenURL(Application.HelpFile + ?q= + PChar(Data));
// Открытие темы по номеру
HELP_CONTEXT, HELP_CONTEXTPOPUP:
OpenURL(Application.HelpFile + /article + IntToStr(Data) + .html);
// Расширенные команды:
HELP_COMMAND:
begin
DataStr := PChar(Data);
// Открытие индекса
if StartsStr(SEARCH(, DataStr) then
OpenURL(Application.HelpFile)
else
// Открытие поиска
if StartsStr(FIND(, DataStr) then
OpenURL(Application.HelpFile)
else
// Переход к теме по её имени
if StartsStr(JI(, DataStr) then
begin
// Обрезали JI(
DataStr := Trim(Copy(DataStr, 4, MaxInt));
// Обрезали )
SetLength(DataStr, Length(DataStr) - 1);
OpenURL(Application.HelpFile + / + DataStr + .html);
end
else
// Прочие команды - считаем поиском по ключевому слову
Result := ApplicationHelp(HELP_KEY, Integer(DataStr), CallHelp);
end;
// HELP_QUIT: - здесь можно закрыть окно браузера
// ... <- тут прочие команды, если надо
else
// Все прочие команды обрабатывать не умеем - указываем, что завершились неудачно
Result := False;
end;
// Мы сделали всю работу, делать больше нечего
CallHelp := False;
end;
Обычно ключевыми командами являются HELP_KEY (а также её обёртка через HELP_COMMAND), HELP_CONTEXT/HELP_CONTEXTPOPUP, HELP_COMMAND с командой JI, а также какая-то команда "открытия справки вообще" (например, HELP_FINDER).
Событие Application.OnHelp вызывается при выполнении любой команды со справкой в вашей Delphi программе, позволяя вам отреагировать на неё и открыть web-страничку.
Только не забудьте установить свойство HelpFile! Иначе Delphi программа будет считать, что у вас нет справки. Вы можете установить в это свойство URL справочной системы (как это предполагается в примере выше). К примеру, для примера выше вы можете установить свойство в http://www.google.com/search. Только понятно, что открытие темы по контекстному номеру или имени работать не будет. Зато открытие темы по ключевому слову приведёт к поиску этого слова в Google.
Сравнение возможностей форматов
Как я говорил выше, поддерживается ли та или иная команда - зависит от выбранного формата и версии Delphi. Я просуммирую основные возможности, которые мы рассматривали, на примере Delphi 7 и Delphi XE. Для наглядности, я добавил колонку с web-справкой, где + и - стоят по примеру чуть выше. Вы должны понимать что это только пример и ваша конкретная реализация может иметь как больше возможностей, так и меньше.

procedure TForm1.btByKeywordClick(Sender: TObject);
var
SaveOld: String;
OldDir: String;
begin
SaveOld := Application.HelpFile;
OldDir := GetCurrentDir;
try
ChDir(ExtractFilePath(Application.HelpFile));
Application.HelpFile := ExtractFileName(Application.HelpFile);
Application.HelpKeyword(example);
finally
Application.HelpFile := SaveOld;
SetCurrentDir(OldDir);
end;
end;

Исправление/обходной путь для 2:
Вместо:

Application.HelpJump(mytopic);
Нужно использовать один из следующих вариантов:

Application.HelpJump(JI(mytopic));

Application.HelpJump(::/mytopic.htm);

Application.HelpJump(::mytopic.htm);

Заключение
Надеюсь, что эта статья поможет вам с интеграцией справки в ваши программы.
 
Новости

Современные возможно...

Суббота, 28 Ноябрь 2015
Современные возможности программирования и качественный ламинат в интернет магазине На сегодня в интернете есть немало сайтов, на которых можно приобрести отличные строительные материалы для отделочных работ.

Сетевые экраны: реко...

Пятница, 27 Ноябрь 2015
сетевые экраныНаиболее важным средством защиты сетей являются сетевые экраны, называемые межсетевыми или брандмауэрами. Главная задача сетевого экрана - экранировать сетевой трафик для недопущения несанкционированного доступа между компьютерными сетями.

Язык программировани...

Суббота, 10 Октябрь 2015
Язык программирования В современном мире существует множество профессий, среди которых профессия программиста довольно таки востребована, потому как все в мире компьютеризировано и автоматизировано, и надо создавать дополнительные программы для слаженной работы многофункциональных устройств.

Программирование на...

Среда, 24 Июнь 2015
Программирование на Delphi Благодаря созданию компьютера у многих людей появились новые профессии, связанные с новейшими технологиями. Однако вместе с этим фактом ряд стабильно существующих профессий многие годы просто стали не нужны, и начался процесс...
Читать полностью

Язык програмирования

Суббота, 06 Июнь 2015
Язык программирования В этой статье мы поговорим об изучении языка программирования Delphi , довольно сложно выучить его, прочитав одну статью, а точнее невозможно. Также и одна книга не решит проблемы с языком, вам...
Читать полностью
Опрос
На каком языке Вы программируете?
 
Яндекс.Метрика