Как закрыть 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;