Esempio n. 1
0
 private void Class_Initialize_Renamed()
 {
     mblnOpened           = true;
     mstrName             = null;
     mstrDescription      = null;
     mnumVarType          = VariantType.Null;
     mstrVarTypeName      = null;
     mvarArraySize        = null;
     mblnReadOnly         = false;
     mvarDefault          = null;
     mstrDefaultString    = "-";
     mblnDefaultByInit    = false;
     mnumSaveType         = hwpDxf_Enums.SAVE_TYPE.stUnknown;
     mstrSaveTypeName     = "Unbekannt";
     mnumPrefTab          = hwpDxf_Enums.PREF_TAB.ptUnknown;
     mstrPrefTabName      = "Unbekannt";
     mnumSymTable         = hwpDxf_Enums.SYMBOL_TABLE.symNone;
     mstrSymTableName     = "Keine";
     mvarEmptyValue       = null;
     mblnUnitsRef         = false;
     mblnIsColor          = false;
     mblnIsDimValue       = false;
     mvarMinValue         = null;
     mstrMinValueString   = "-";
     mvarMaxValue         = null;
     mstrMaxValueString   = "-";
     mvarBitValue         = null;
     mstrBitValueString   = "-";
     mvarLstValues        = null;
     mstrLstValuesString  = "-";
     mblnRunTimeErr       = false;
     mblnIsUnitsBase      = false;
     mvarHeaderCode       = null;
     mstrHeaderCodeString = "-";
     mvarHeaderPos        = null;
     mstrHeaderPosString  = "-";
     mnumRefType          = hwpDxf_Enums.REF_TYPE.rtUnknown;
     mstrRefTypeName      = "Unbekannt";
     mdblObjectID         = -1.0;
     mstrDwgStartAcadVer  = "";
     mstrDwgEndAcadVer    = "";
     mstrDxfStartAcadVer  = "";
     mstrDxfEndAcadVer    = "";
 }
Esempio n. 2
0
        internal void FriendInit(bool vblnUnitsRef, string vstrName, string vstrDescription, VariantType vnumVarType, object vvarArraySize, bool vblnReadOnly, object vvarDefault, object vvarMinValue, object vvarMaxValue, object vvarLstValues, object vvarBitValue, hwpDxf_Enums.SAVE_TYPE vnumSaveType, hwpDxf_Enums.PREF_TAB vnumPrefTab, bool vblnRunTimeErr, bool vblnIsUnitsBase, hwpDxf_Enums.SYMBOL_TABLE vnumSymTable, bool vblnIsColor, object vvarEmptyValue, bool vblnIsDimValue, object vvarHeaderCode, object vvarHeaderPos, hwpDxf_Enums.REF_TYPE vnumRefType, string vstrDwgStartAcadVer, string vstrDwgEndAcadVer, string vstrDxfStartAcadVer, string vstrDxfEndAcadVer)
        {
            mblnUnitsRef    = vblnUnitsRef;
            mstrName        = vstrName;
            mstrDescription = vstrDescription;
            mnumVarType     = vnumVarType;
            checked
            {
                if (vvarArraySize == null)
                {
                    if ((VariantType.Array & Information.VarType(RuntimeHelpers.GetObjectValue(vvarDefault))) == VariantType.Array)
                    {
                        mvarArraySize = Information.UBound((Array)vvarDefault) + 1;
                    }
                    else
                    {
                        mvarArraySize = null;
                    }
                }
                else
                {
                    mvarArraySize = RuntimeHelpers.GetObjectValue(vvarArraySize);
                }
                switch (mnumVarType)
                {
                case VariantType.Double:
                    mstrVarTypeName = "Reele Zahl (Kurz)";
                    break;

                case VariantType.Decimal:
                    mstrVarTypeName = "Reele Zahl (Lang)";
                    break;

                case VariantType.Short:
                    mstrVarTypeName = "Ganzzahl (Kurz)";
                    break;

                case VariantType.Integer:
                    mstrVarTypeName = "Ganzzahl (Lang)";
                    break;

                case VariantType.String:
                    mstrVarTypeName = "Zeichenkette";
                    break;

                case (VariantType)8201:
                    mstrVarTypeName = Conversions.ToString(Operators.ConcatenateObject(mvarArraySize, "D-Punkt"));
                    break;
                }
                mblnReadOnly = vblnReadOnly;
                if (vvarDefault != null)
                {
                    mblnDefaultByInit = true;
                    mvarDefault       = RuntimeHelpers.GetObjectValue(hwpDxf_SysVar.BkDXFSysVar_ConvertValue(mnumVarType, RuntimeHelpers.GetObjectValue(vvarDefault)));
                    mstrDefaultString = hwpDxf_SysVar.BkDXFSysVar_StringValue(mnumVarType, RuntimeHelpers.GetObjectValue(mvarDefault));
                }
                else
                {
                    mblnDefaultByInit = false;
                    mvarDefault       = null;
                    mstrDefaultString = "-";
                }
                mvarBitValue = RuntimeHelpers.GetObjectValue(vvarBitValue);
                if (mvarBitValue != null)
                {
                    object dvarBitValue = RuntimeHelpers.GetObjectValue(mvarBitValue);
                    int    dlngIdx3     = 1;
                    while (Operators.ConditionalCompareObjectNotEqual(dvarBitValue, 0, TextCompare: false))
                    {
                        if (Operators.ConditionalCompareObjectEqual(Operators.AndObject(dlngIdx3, dvarBitValue), dlngIdx3, TextCompare: false))
                        {
                            mstrBitValueString = mstrBitValueString + " " + Conversions.ToString(dlngIdx3);
                            dvarBitValue       = Operators.SubtractObject(dvarBitValue, dlngIdx3);
                        }
                        dlngIdx3 *= 2;
                    }
                    mstrBitValueString = Strings.LTrim(mstrBitValueString);
                    vvarMaxValue       = RuntimeHelpers.GetObjectValue(mvarBitValue);
                }
                else
                {
                    mstrBitValueString = "-";
                }
                if (vvarLstValues != null)
                {
                    object[] dvarLstValues = new object[Information.UBound((Array)vvarLstValues) + 1];
                    int      num           = Information.LBound((Array)vvarLstValues);
                    int      num2          = Information.UBound((Array)vvarLstValues);
                    for (int dlngIdx3 = num; dlngIdx3 <= num2; dlngIdx3++)
                    {
                        dvarLstValues[dlngIdx3] = RuntimeHelpers.GetObjectValue(hwpDxf_SysVar.BkDXFSysVar_ConvertValue(mnumVarType, RuntimeHelpers.GetObjectValue(NewLateBinding.LateIndexGet(vvarLstValues, new object[1]
                        {
                            dlngIdx3
                        }, null))));
                        mstrLstValuesString = Operators.ConcatenateObject(Operators.ConcatenateObject(mstrLstValuesString, " "), hwpDxf_SysVar.BkDXFSysVar_StringValue(mnumVarType, RuntimeHelpers.GetObjectValue(NewLateBinding.LateIndexGet(vvarLstValues, new object[1]
                        {
                            dlngIdx3
                        }, null))));
                    }
                    mvarLstValues       = Support.CopyArray(dvarLstValues);
                    mstrLstValuesString = Strings.LTrim(Conversions.ToString(mstrLstValuesString));
                    if ((mnumVarType == VariantType.Double) | (mnumVarType == VariantType.Decimal) | (mnumVarType == VariantType.Short) | (mnumVarType == VariantType.Integer))
                    {
                        object dvarMax = RuntimeHelpers.GetObjectValue(NewLateBinding.LateIndexGet(mvarLstValues, new object[1]
                        {
                            Information.LBound((Array)mvarLstValues)
                        }, null));
                        object dvarMin = RuntimeHelpers.GetObjectValue(dvarMax);
                        int    num3    = Information.LBound((Array)mvarLstValues);
                        int    num4    = Information.UBound((Array)mvarLstValues);
                        for (int dlngIdx3 = num3; dlngIdx3 <= num4; dlngIdx3++)
                        {
                            if (Operators.ConditionalCompareObjectGreater(NewLateBinding.LateIndexGet(mvarLstValues, new object[1]
                            {
                                dlngIdx3
                            }, null), dvarMax, TextCompare: false))
                            {
                                dvarMax = RuntimeHelpers.GetObjectValue(NewLateBinding.LateIndexGet(mvarLstValues, new object[1]
                                {
                                    dlngIdx3
                                }, null));
                            }
                            if (Operators.ConditionalCompareObjectLess(NewLateBinding.LateIndexGet(mvarLstValues, new object[1]
                            {
                                dlngIdx3
                            }, null), dvarMin, TextCompare: false))
                            {
                                dvarMin = RuntimeHelpers.GetObjectValue(NewLateBinding.LateIndexGet(mvarLstValues, new object[1]
                                {
                                    dlngIdx3
                                }, null));
                            }
                        }
                        vvarMaxValue = RuntimeHelpers.GetObjectValue(dvarMax);
                        vvarMinValue = RuntimeHelpers.GetObjectValue(dvarMin);
                    }
                }
                else
                {
                    mvarLstValues       = RuntimeHelpers.GetObjectValue(vvarLstValues);
                    mstrLstValuesString = "-";
                }
                if (vvarMinValue != null)
                {
                    mvarMinValue       = RuntimeHelpers.GetObjectValue(hwpDxf_SysVar.BkDXFSysVar_ConvertValue(mnumVarType, RuntimeHelpers.GetObjectValue(vvarMinValue)));
                    mstrMinValueString = hwpDxf_SysVar.BkDXFSysVar_StringValue(mnumVarType, RuntimeHelpers.GetObjectValue(mvarMinValue));
                }
                else
                {
                    mvarMinValue       = null;
                    mstrMinValueString = "-";
                }
                if (vvarMaxValue != null)
                {
                    mvarMaxValue       = RuntimeHelpers.GetObjectValue(hwpDxf_SysVar.BkDXFSysVar_ConvertValue(mnumVarType, RuntimeHelpers.GetObjectValue(vvarMaxValue)));
                    mstrMaxValueString = hwpDxf_SysVar.BkDXFSysVar_StringValue(mnumVarType, RuntimeHelpers.GetObjectValue(mvarMaxValue));
                }
                else
                {
                    mvarMaxValue       = null;
                    mstrMaxValueString = "-";
                }
                mnumSaveType = vnumSaveType;
                switch (mnumSaveType)
                {
                case hwpDxf_Enums.SAVE_TYPE.stUnknown:
                    mstrSaveTypeName = "Unbekannt";
                    break;

                case hwpDxf_Enums.SAVE_TYPE.stNone:
                    mstrSaveTypeName = "Nicht gespeichert";
                    break;

                case hwpDxf_Enums.SAVE_TYPE.stRegistry:
                    mstrSaveTypeName = "Registrierdatenbank";
                    break;

                case hwpDxf_Enums.SAVE_TYPE.stDrawing:
                    mstrSaveTypeName = "Zeichnung";
                    break;

                case hwpDxf_Enums.SAVE_TYPE.stViewport:
                    mstrSaveTypeName = "Ansichtsfenster";
                    break;

                case hwpDxf_Enums.SAVE_TYPE.stDXFApp:
                    mstrSaveTypeName = "DXF Applikation";
                    break;

                case hwpDxf_Enums.SAVE_TYPE.stDXFDoc:
                    mstrSaveTypeName = "DXF Zeichnung";
                    break;

                case hwpDxf_Enums.SAVE_TYPE.stDXFVport:
                    mstrSaveTypeName = "DXF Ansichtsfenster";
                    break;
                }
                mnumPrefTab = vnumPrefTab;
                switch (mnumPrefTab)
                {
                case hwpDxf_Enums.PREF_TAB.ptDisplay:
                    mstrPrefTabName = "Anzeige";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptDrafting:
                    mstrPrefTabName = "Entwurf";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptFiles:
                    mstrPrefTabName = "Dateien";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptNone:
                    mstrPrefTabName = "Keine";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptOpenSave:
                    mstrPrefTabName = "Öffnen und Speichern";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptOutput:
                    mstrPrefTabName = "Plot";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptProfile:
                    mstrPrefTabName = "Profil";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptSelection:
                    mstrPrefTabName = "Auswahl";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptSystem:
                    mstrPrefTabName = "System";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptUnknown:
                    mstrPrefTabName = "Unbekannt";
                    break;

                case hwpDxf_Enums.PREF_TAB.ptUser:
                    mstrPrefTabName = "Benutzereinstellungen";
                    break;
                }
                mblnRunTimeErr  = vblnRunTimeErr;
                mblnIsUnitsBase = vblnIsUnitsBase;
                mnumSymTable    = vnumSymTable;
                switch (mnumSymTable)
                {
                case hwpDxf_Enums.SYMBOL_TABLE.symNone:
                    mstrSymTableName = "Keine";
                    break;

                case hwpDxf_Enums.SYMBOL_TABLE.symAppid:
                    mstrSymTableName = "APPID";
                    break;

                case hwpDxf_Enums.SYMBOL_TABLE.symBlock:
                    mstrSymTableName = "BLOCK_RECORD";
                    break;

                case hwpDxf_Enums.SYMBOL_TABLE.symDimStyle:
                    mstrSymTableName = "DIMSTYLE";
                    break;

                case hwpDxf_Enums.SYMBOL_TABLE.symLayer:
                    mstrSymTableName = "LAYER";
                    break;

                case hwpDxf_Enums.SYMBOL_TABLE.symLType:
                    mstrSymTableName = "LTYPE";
                    break;

                case hwpDxf_Enums.SYMBOL_TABLE.symStyle:
                    mstrSymTableName = "STYLE";
                    break;

                case hwpDxf_Enums.SYMBOL_TABLE.symUcs:
                    mstrSymTableName = "UCS";
                    break;

                case hwpDxf_Enums.SYMBOL_TABLE.symView:
                    mstrSymTableName = "VIEW";
                    break;

                case hwpDxf_Enums.SYMBOL_TABLE.symVPort:
                    mstrSymTableName = "VPORT";
                    break;
                }
                mblnIsColor    = vblnIsColor;
                mvarEmptyValue = RuntimeHelpers.GetObjectValue(vvarEmptyValue);
                mblnIsDimValue = vblnIsDimValue;
                mvarHeaderCode = RuntimeHelpers.GetObjectValue(vvarHeaderCode);
                if (mvarHeaderCode != null)
                {
                    if ((VariantType.Array & Information.VarType(RuntimeHelpers.GetObjectValue(mvarHeaderCode))) == VariantType.Array)
                    {
                        int num5 = Information.LBound((Array)mvarHeaderCode);
                        int num6 = Information.UBound((Array)mvarHeaderCode);
                        for (int dlngIdx3 = num5; dlngIdx3 <= num6; dlngIdx3++)
                        {
                            mstrHeaderCodeString = Conversions.ToString(Operators.ConcatenateObject(mstrHeaderCodeString + ", ", NewLateBinding.LateIndexGet(mvarHeaderCode, new object[1]
                            {
                                dlngIdx3
                            }, null)));
                        }
                        mstrHeaderCodeString = Strings.LTrim(Strings.Mid(mstrHeaderCodeString, 2));
                    }
                    else
                    {
                        mstrHeaderCodeString = Conversions.ToString(mvarHeaderCode);
                    }
                }
                else
                {
                    mstrHeaderCodeString = "-";
                }
                mvarHeaderPos = RuntimeHelpers.GetObjectValue(vvarHeaderPos);
                if (mvarHeaderPos != null)
                {
                    mstrHeaderPosString = Conversions.ToString(mvarHeaderPos);
                }
                else
                {
                    mstrHeaderPosString = "-";
                }
                mnumRefType = vnumRefType;
                switch (mnumRefType)
                {
                case hwpDxf_Enums.REF_TYPE.rtUnknown:
                    mstrRefTypeName = "Unbekannt";
                    break;

                case hwpDxf_Enums.REF_TYPE.rtApplication:
                    mstrRefTypeName = "Applikation";
                    break;

                case hwpDxf_Enums.REF_TYPE.rtDrawing:
                    mstrRefTypeName = "Zeichnung";
                    break;

                case hwpDxf_Enums.REF_TYPE.rtViewport:
                    mstrRefTypeName = "Ansichtsfenster";
                    break;
                }
                mstrDwgStartAcadVer = vstrDwgStartAcadVer;
                mstrDwgEndAcadVer   = vstrDwgEndAcadVer;
                mstrDxfStartAcadVer = vstrDxfStartAcadVer;
                mstrDxfEndAcadVer   = vstrDxfEndAcadVer;
            }
        }