Esempio n. 1
0
        // Extrudieren RundVoll
        internal void ErzeugeExtrusionRundVoll(RundVollProfil neuRundVoll)
        {
            hspB1_catiaPart.Part.InWorkObject = hspB1_catiaPart.Part.MainBody;


            // Extrusion erzeugen
            ShapeFactory catShapeFactory1 = (ShapeFactory)hspB1_catiaPart.Part.ShapeFactory;
            Pad          catPad1          = catShapeFactory1.AddNewPad(hspB1_catia_Profil, neuRundVoll.Länge);

            // Block umbenennen
            catPad1.set_Name("Profil Rund voll");

            // Part aktualisieren
            hspB1_catiaPart.Part.Update();
        }
Esempio n. 2
0
        //Ende RechteckVoll

        //RundVoll
        //Erzeugen der Geometrie RundVoll
        internal void ErzeugeProfilRundVoll(RundVollProfil neuRundVoll)
        {
            hspB1_catia_Profil.set_Name("Rund_Voll");
            Factory2D factory2D = hspB1_catia_Profil.OpenEdition();

            //Kreis Erzeugen
            Circle2D circle2D1 = factory2D.CreateClosedCircle(0.000000, 0.000000, neuRundVoll.Durchmesser / 2);


            // Skizzierer verlassen
            hspB1_catia_Profil.CloseEdition();


            // Part aktualisieren
            hspB1_catiaPart.Part.Update();
        }
Esempio n. 3
0
        public void ExcelRuVo(RundVollProfil rundVoll)
        {
            mySheet = (Excel.Worksheet)excelApp.ActiveSheet;


            mySheet.Cells[z, "A"] = i;
            mySheet.Cells[z, "B"] = "Rundvoll";
            mySheet.Cells[z, "C"] = "";
            mySheet.Cells[z, "D"] = "";
            mySheet.Cells[z, "E"] = rundVoll.Durchmesser;
            mySheet.Cells[z, "F"] = "";
            mySheet.Cells[z, "G"] = "";
            mySheet.Cells[z, "H"] = rundVoll.Länge;
            mySheet.Cells[z, "I"] = rundVoll.QFläche();
            mySheet.Cells[z, "J"] = rundVoll.Volumen();
            mySheet.Cells[z, "K"] = rundVoll.WiederstandsMoment_Wy() / 1000;
            mySheet.Cells[z, "L"] = rundVoll.WiederstandsMoment_Wz() / 1000;
            mySheet.Cells[z, "M"] = rundVoll.FTM_Iy() / 10000;
            mySheet.Cells[z, "N"] = rundVoll.FTM_Iz() / 10000;
            mySheet.Cells[z, "O"] = rundVoll.FTM_Polar() / 10000;

            i++;
            z++;
        }