anchor.diff:      DoAction(pfaCompile);
     end;
     UpdateOutPath;
  +  EnableControls;
   end;
   
   procedure TfrmPackageEditor.cmdInstallClick(Sender: TObject);
  
positive.code:   try
      pages.ActivePage := pageFiles;
      pack := TKPSFile.Create;
      EnableStartMenuControls;
      EnableDetailsTabControls;
      EnableCompileTabControls;
      UpdateStartMenuPrograms;
      UpdateReadme;
      UpdateImageFiles;
  
negative.code:     then k.OSKFont := nil
      else k.OSKFont := cbKeyboardOSKFont.Items.Objects[cbKeyboardOSKFont.ItemIndex] as TPackageContentFile;
    Modified := True;
  end;
  
  procedure TfrmPackageEditor.EnableControls;
  begin
    EnableStartMenuControls;
    EnableDetailsTabControls;
    EnableCompileTabControls;
  end;
  
  procedure TfrmPackageEditor.EnableCompileTabControls;
  