ScriptShowHelpMaximized

From 40tude Dialog Wiki

Custom script to start help maximised; Source: <mid:ih1slhp3onoo$.zky11vk428sv$.dlg@40tude.net>

Works with version: 2.0.2.1;

Program Showhelp;

uses
  Forms;

const
  SW_NORMAL = 1;
  SW_MAXIMIZE = 3;
  SW_MINIMIZE = 6;

function ShellExecute(hwnd: Longword; lpOperation: pchar;
                      lpFile: pchar; lpParams: pchar;
                      lpDir: pchar; nShow: integer): Longword;
                      external 'ShellExecuteA@shell32.dll stdcall';

Begin
  ShellExecute(Application.Mainform.Handle, 'open',
               pchar(Extractfilepath(Application.Exename) +
               'dialog.chm'), '', '', SW_MAXIMIZE);
End.