procedure TForm1.Button1Click(Sender: TObject); begin Application.HelpFile := 'MonFichier.HLP'; Application.HelpCommand(HELP_CONTENTS, 0); end;