Delphi 1

Показ диалога "Help Search" II

Следующий код демонстрирует способ вывода диалога WinHelp "Search" для электронной справки вашего приложения. Для этого следует послать системе электронной справки Windows (WinHelp) команду Help_PartialKey, что можно сделать с помощью метода объекта TApplication HelpCommand. Параметр для этой команды должен иметь тип PChar (можно привести к longint) и содержать строку, которую вам необходимо найти. Пример ниже использует для вызова диалога "Search" пустую строку, которую освобождает после его закрытия.

procedure TForm1.SearchHelp;
var

P: PChar;

begin

Application.HelpFile := 'c:\delphi\bin\delphi.hlp';

P := StrNew('');

Application.HelpCommand(Help_PartialKey, longint(P));

StrDispose(P);

end;

[000590]