Exemplo n.º 1
0
        private static Dictionary <string, TShapeGeom> ReadShapes()
        {
            Dictionary <string, TShapeGeom> Result = new Dictionary <string, TShapeGeom>();

            using (Stream PresetStream = GetPresetStream())
            {
                using (TOpenXmlReader DataStream = TOpenXmlReader.CreateFromSimpleStream(PresetStream))
                {
                    DataStream.DefaultNamespace = "";
                    DataStream.NextTag();
                    Debug.Assert(DataStream.RecordName() == "presetShapeDefinitons", DataStream.RecordName());

                    string StartElement = DataStream.RecordName();
                    if (!DataStream.NextTag())
                    {
                        FlxMessages.ThrowException(FlxErr.ErrInternal);
                    }

                    TXlsxShapeReader ShapeReader = new TXlsxShapeReader(DataStream);
                    while (!DataStream.AtEndElement(StartElement))
                    {
                        Result[DataStream.RecordName()] = ShapeReader.ReadShapeDef(DataStream.RecordName());
                    }
                }
            }

            return(Result);
        }