Example #1
0
        //Ende RundVoll


        //Halbrund
        //Erzeugen der Geometrie Halbrund
        internal void ErzeugeProfilHalbRund(HalbrundProfil neuHalbRund)
        {
            hspB1_catia_Profil.set_Name("Halbrund");
            Factory2D factory2D = hspB1_catia_Profil.OpenEdition();

            //Setzen der Punkte
            Point2D catPoint2D1 = factory2D.CreatePoint(-neuHalbRund.Radius, 0);
            Point2D catPoint2D2 = factory2D.CreatePoint(neuHalbRund.Radius, 0);

            //Kreis Erzeugen
            Circle2D circle2D1 = factory2D.CreateClosedCircle(0.000000, 0.000000, neuHalbRund.Radius);

            circle2D1.StartPoint = catPoint2D2;
            circle2D1.EndPoint   = catPoint2D1;

            //Linie Ziehen
            Line2D line2D1 = factory2D.CreateLine(-(neuHalbRund.Radius), 0.000000, neuHalbRund.Radius, 0.000000);

            // Skizzierer verlassen
            hspB1_catia_Profil.CloseEdition();


            // Part aktualisieren
            hspB1_catiaPart.Part.Update();
        }
Example #2
0
        // Extrudieren RundVoll
        internal void ErzeugeExtrusionHalbRund(HalbrundProfil neuHalbRund)
        {
            hspB1_catiaPart.Part.InWorkObject = hspB1_catiaPart.Part.MainBody;


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

            // Block umbenennen
            catPad1.set_Name("Profil HalbRund");

            // Part aktualisieren
            hspB1_catiaPart.Part.Update();
        }
Example #3
0
        //RundeProfile
        public void ExcelHaRu(HalbrundProfil halbrundProfil)
        {
            mySheet = (Excel.Worksheet)excelApp.ActiveSheet;


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

            i++;
            z++;
        }