procedure TF408017792.Button1Click(Sender: TObject); var NEPX: IExcelPanelXDisp; begin NEPX := this.NewEPX; NEPX.ScriptRun(CommandLine.ModuleRoot + 'ScriptM1826196890.rpas',0,1,Random(99999)); NEPX.FreeMe; NEPX := nil; end;