Add Compression method HELP...

[felice2011]

This is what I found to be translated from Czech to English ...

[Languages]
Name: "ENG"; MessagesFile: "compiler:Languages\english.isl";
[Messages]
ButtonNext=Install
ButtonCancel=Cancel
ButtonWizardBrowse=Browse

StatusLabel := TLabel.Create(WizardForm);
  with StatusLabel do begin
    Parent:=WizardForm;
    AutoSize:=True;
    Transparent:=True;
    SetBounds(ScaleX(9), ScaleY(180), ScaleX(0), ScaleY(0));
    Caption:='Completion Of...';
  end;

if CurPageID = wpWelcome then begin
    GetSpaceOnDisk(ExtractFileDrive(WizardForm.DirEdit.Text), True, FreeMB, TotalMB);
    if FreeMB<{#NeedInstallSize} then begin
      MsgBox('         Insufficient Disk Space!'#13'Required Space For Installation: '+MbOrTb({#NeedInstallSize})+#13'    Free Space: '+MbOrTb(FreeMB)+' z '+MbOrTb(TotalMB), mbError, mb_Ok);
      Result := False ;
    end;

      if ISDoneError then begin
        StatusLabel.Caption:='Uninstalling...';
        ISDoneProgressBar.Hide;
        Exec2(ExpandConstant('{uninstallexe}'), '/VERYSILENT', false);
      end;