Ejemplo n.º 1
0
 internal virtual void CopyTo(TXlsxPivotList <K, T> Target, TWorkbookGlobals Globals)
 {
     for (int i = 0; i < FList.Count; i++)
     {
         // Target.FList.Add(FList[i].Clone());
     }
 }
Ejemplo n.º 2
0
        internal static string AsString(TParsedTokenList Tokens, int CellRow, int CellCol,
                                        ICellList CellList, TWorkbookGlobals Globals, int MaxStringConstantLen, bool WritingXlsx, bool SkipEqual)
        {
            string        StartFormula = fts(TFormulaToken.fmStartFormula); //Formulas do not always begin with "=". Array formulas begin with "{", and they override this var to empty.
            TFormulaStack ParsedStack  = new TFormulaStack();

            bool R1C1 = false;

            if (Globals != null && !WritingXlsx)
            {
                R1C1 = Globals.Workbook.FormulaReferenceStyle == TReferenceStyle.R1C1;
            }

            Tokens.ResetPositionToStart();
            while (!Tokens.Eof())
            {
                TBaseParsedToken Token = Tokens.ForwardPop();
                ptg BaseToken          = Token.GetBaseId;
                Evaluate(Token, R1C1, CellRow, CellCol, BaseToken, Tokens, CellList, Globals, ParsedStack, ref StartFormula, MaxStringConstantLen, WritingXlsx);
            }             //while


            if (WritingXlsx || SkipEqual)
            {
                StartFormula = String.Empty;
            }

            if (ParsedStack.Count == 0)
            {
                return(String.Empty);                         //StartFormula + TFormulaMessages.ErrString(TFlxFormulaErrorValue.ErrRef);  This is needed for deleted named ranges.
            }
            return(StartFormula + ParsedStack.Pop());
        }
Ejemplo n.º 3
0
        internal TRowHeightCalc(TWorkbookGlobals aWg)
        {
            Wg = aWg;
            gr = new TGraphicCanvas();

            InitXF();
        }
Ejemplo n.º 4
0
        internal TColWidthCalc(TWorkbookGlobals aWg)
        {
            Wg = aWg;
            gr = new TGraphicCanvas();

            InitXF();
        }
Ejemplo n.º 5
0
 private static string GetName(int NameIndex, int ExternSheet, TWorkbookGlobals Globals, bool WritingXlsx)
 {
     if (Globals == null)
     {
         return(" <Name> ");
     }
     return(Globals.References.GetName(ExternSheet, NameIndex - 1, Globals, WritingXlsx));
 }
Ejemplo n.º 6
0
 private static string GetSheetName(int ExternSheet, TWorkbookGlobals Globals, bool WritingXlsx)
 {
     if (ExternSheet == 0xFFFF)
     {
         return(TFormulaMessages.ErrString(TFlxFormulaErrorValue.ErrRef));
     }
     return(Globals.References.GetSheetName(ExternSheet, Globals, WritingXlsx));
 }
Ejemplo n.º 7
0
 internal static void CheckInternalNames(int OptionFlags, TWorkbookGlobals Globals)
 {
     //If a name is added and it is internal, we can't trust the ordering and need to delete the country record.
     if ((OptionFlags & 0x20) != 0)
     {
         Globals.DeleteCountry();
     }
 }
Ejemplo n.º 8
0
 internal TColInfoList(TWorkbookGlobals aWorkbookGlobals, bool aAllowStandardWidth)
 {
     FWorkbookGlobals    = aWorkbookGlobals;
     FColumns            = new TColInfo[(int)Math.Ceiling((FlxConsts.Max_Columns + 2) / (double)Buckets)][];
     DefColWidthChars    = 8; //Defcolwidthchars is a required record.
     DefColWidthChars256 = -1;
     AllowStandardWidth  = aAllowStandardWidth;
 }
Ejemplo n.º 9
0
        internal TWorkbook(ExcelFile aXls, TFileProps aFileProps)
        {
            FGlobals = new TWorkbookGlobals(aXls);
            FSheets  = new TSheetList();
#if (FRAMEWORK30)
            FileProps = aFileProps;
#endif
        }
Ejemplo n.º 10
0
        private static string ConvertInternalFunctionName(TWorkbookGlobals Globals, string InternalName)
        {
            TUserDefinedFunctionContainer fn = Globals.Workbook.GetUserDefinedFunction(InternalName);

            if (fn != null)
            {
                return(fn.Function.Name);
            }
            return(InternalName);
        }
Ejemplo n.º 11
0
        internal static string AsString(TParsedTokenList Tokens, int CellRow, int CellCol, ICellList CellList)
        {
            TWorkbookGlobals Globals = null;

            if (CellList != null)
            {
                Globals = CellList.Globals;
            }
            return(AsString(Tokens, CellRow, CellCol, CellList, Globals, -1, false));
        }
Ejemplo n.º 12
0
        private static string GetNameX(TNameXToken Token, TWorkbookGlobals Globals, bool WritingXlsx)
        {
            if (Globals == null)
            {
                return(" <Name> ");
            }
            int ExternSheetIndex = Token.FExternSheet; //This index is *not* used to get the sheet. We use the externname instead.

            string Sheet          = Globals.References.GetSheetFromName(ExternSheetIndex, Token.NameIndex - 1, Globals);
            int    SupBook        = Globals.References.GetSupBook(ExternSheetIndex);
            string ExternalString = Globals.References.GetSheetName(SupBook, Sheet, Globals, WritingXlsx);

            return(ExternalString + GetName(Token.NameIndex, ExternSheetIndex, Globals, WritingXlsx));
        }
Ejemplo n.º 13
0
        internal void MergeFromPxlGlobals(TWorkbookGlobals SourceGlobals)
        {
            sBOF         = SourceGlobals.sBOF;
            FSST         = SourceGlobals.FSST;
            FReferences  = SourceGlobals.FReferences;
            FBoundSheets = SourceGlobals.FBoundSheets;

            //Pxl doesn't have styles.
            CellXF.MergeFromPxlXF(SourceGlobals.CellXF, Fonts.Count - 1, this, SourceGlobals);  //-1 because fonts[0] will be merged
            FFonts.MergeFromPxlFont(SourceGlobals.Fonts);
            //Formats are added in FXF.Merge

            FNames  = SourceGlobals.FNames;
            Window1 = SourceGlobals.Window1;

            CodePage = SourceGlobals.CodePage;
            Country  = SourceGlobals.Country;
        }
Ejemplo n.º 14
0
        internal int AddName(TXlsNamedRange Range, TWorkbookGlobals Globals, TCellList CellList)
        {
            int  aCount = Count;
            bool IsInternal;
            bool ValidName = TXlsNamedRange.IsValidRangeName(Range.Name, out IsInternal);

            if (IsInternal)
            {
                Range.OptionFlags |= 0x020;
            }

            for (int i = 0; i < aCount; i++)
            {
                //Documentation is wrong. We need the sheet index (1 based) not the externsheetindex

                /*int rSheet=-1;
                 * if (this[i].RangeSheet>=0)
                 * {
                 *  rSheet = GetSheet(this[i].RangeSheet);
                 * }
                 */
                int rSheet = this[i].RangeSheet;
                if (
                    (rSheet == Range.NameSheetIndex) &&
                    (String.Equals(this[i].Name, Range.Name, StringComparison.CurrentCultureIgnoreCase))
                    )
                {
                    this[i] = new TNameRecord(Range, Globals, CellList);  //We have to be careful not to change name ordering, or formulas would point to wrong ranges.
                    //If we found it, then it *is* a valid name
                    return(i);
                }
            }
            if (!ValidName)
            {
                XlsMessages.ThrowException(XlsErr.ErrInvalidNameForARange, Convert.ToString(Range.Name));
            }
            Add(new TNameRecord(Range, Globals, CellList));
            CheckInternalNames(Range.OptionFlags, Globals);

            return(Count - 1);
        }
Ejemplo n.º 15
0
        internal void ReplaceName(int Index, TXlsNamedRange Range, TWorkbookGlobals Globals, TCellList CellList)
        {
            bool IsInternal;
            bool ValidName = TXlsNamedRange.IsValidRangeName(Range.Name, out IsInternal);

            if (!ValidName)
            {
                XlsMessages.ThrowException(XlsErr.ErrInvalidNameForARange, Convert.ToString(Range.Name));
            }
            if (Index < 0 || Index >= Count)
            {
                XlsMessages.ThrowException(XlsErr.ErrXlsIndexOutBounds, Index, "Index", 0, Count - 1);
            }
            if (IsInternal)
            {
                Range.OptionFlags |= 0x020;
            }

            this[Index] = new TNameRecord(Range, Globals, CellList);             //We have to be careful not to change name ordering, or formulas would point to wrong ranges.
            CheckInternalNames(Range.OptionFlags, Globals);
        }
Ejemplo n.º 16
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.HeaderImages.LoadFromStream(WorkbookLoader.RecordLoader, this, false);
 }
Ejemplo n.º 17
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.BookExt = this;
 }
Ejemplo n.º 18
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.DConn.Add(this);
 }
Ejemplo n.º 19
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.BoundSheets.AddTabIdFromFile(this);
 }
Ejemplo n.º 20
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.RealTimeData.Add(this);
 }
Ejemplo n.º 21
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.UserBView.Add(this);
 }
Ejemplo n.º 22
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.RecalcId = this;
 }
Ejemplo n.º 23
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.OleObjectSize = this;
 }
Ejemplo n.º 24
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     //Do nothing, should be ignored
 }
Ejemplo n.º 25
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.Excel9File = this;
 }
Ejemplo n.º 26
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.ObNoMacros = this;
 }
Ejemplo n.º 27
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.CodeNameRecord = this;
 }
Ejemplo n.º 28
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.Palette = this;
 }
Ejemplo n.º 29
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     Globals.ClrtClient = this;
 }
Ejemplo n.º 30
0
 internal override void LoadIntoWorkbook(TWorkbookGlobals Globals, TWorkbookLoader WorkbookLoader)
 {
     base.LoadIntoWorkbook(Globals, WorkbookLoader);
     Globals.LoadingInterfaceHdr = false;
 }