Delphi - база знаний


Как закрыть help при закрытии приложения?


Как закрыть help при закрытии приложения?




procedure TForm1.FormDestroy(Sender: TObject); 
begin 
  Application.HelpCommand(HELP_QUIT, 0); 
end

Взято с сайта


procedure TMainForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Winhelp(Handle, 'WINHELP.HLP', HELP_QUIT, 0);
  Action := caFree;
end;



Начало  Назад  Вперед