//Erzeugen der Extrusionfür U Profil
internal void ErzeugeExtrusionU(UProfil neuUProfil)
{
hspB1_catiaPart.Part.InWorkObject = hspB1_catiaPart.Part.MainBody;
// Extrusion erzeugen
ShapeFactory catShapeFactory1 = (ShapeFactory)hspB1_catiaPart.Part.ShapeFactory;
Pad catPad1 = catShapeFactory1.AddNewPad(hspB1_catia_Profil, neuUProfil.Länge);
// Block umbenennen
catPad1.set_Name("Profil U");
// Part aktualisieren
hspB1_catiaPart.Part.Update();
}
public void ExcelUProfil(UProfil neuUProfil)
{
mySheet = (Excel.Worksheet)excelApp.ActiveSheet;
mySheet.Cells[z, "A"] = i;
mySheet.Cells[z, "B"] = "U-Profil";
mySheet.Cells[z, "C"] = neuUProfil.H2;
mySheet.Cells[z, "D"] = neuUProfil.B2;
mySheet.Cells[z, "E"] = "";
mySheet.Cells[z, "F"] = neuUProfil.H1;
mySheet.Cells[z, "G"] = neuUProfil.B1;
mySheet.Cells[z, "H"] = neuUProfil.Länge;
mySheet.Cells[z, "I"] = neuUProfil.QFläche();
mySheet.Cells[z, "J"] = neuUProfil.Volumen();
mySheet.Cells[z, "K"] = neuUProfil.WiederstandsMoment_Wy() / 1000;
mySheet.Cells[z, "L"] = neuUProfil.WiederstandsMoment_Wz() / 1000;
mySheet.Cells[z, "M"] = neuUProfil.FTM_Iy() / 10000;
mySheet.Cells[z, "N"] = neuUProfil.FTM_Iz() / 10000;
mySheet.Cells[z, "O"] = neuUProfil.FTM_Polar() / 10000;
i++;
z++;
}
//Ende L Profil
//UProfil!
//Erzeugen der Geometrie U Profil
internal void ErzeugeUProfil(UProfil neuUProfil)
{
hspB1_catia_Profil.set_Name("U_Profil");
Factory2D factory2D = hspB1_catia_Profil.OpenEdition();
//Setzen der Punkte
Point2D catPoint2D1 = factory2D.CreatePoint(-neuUProfil.B2 / 2, neuUProfil.H1 / 2);
Point2D catPoint2D2 = factory2D.CreatePoint(neuUProfil.B1 - neuUProfil.B2 / 2, neuUProfil.H1 / 2);
Point2D catPoint2D3 = factory2D.CreatePoint(neuUProfil.B1 - neuUProfil.B2 / 2, neuUProfil.H1 / 2 - neuUProfil.H2);
Point2D catPoint2D4 = factory2D.CreatePoint(neuUProfil.B2 / 2, neuUProfil.H1 / 2 - neuUProfil.H2);
Point2D catPoint2D5 = factory2D.CreatePoint(neuUProfil.B2 / 2, -(neuUProfil.H1 / 2 - neuUProfil.H2));
Point2D catPoint2D6 = factory2D.CreatePoint(neuUProfil.B1 - neuUProfil.B2 / 2, -(neuUProfil.H1 / 2 - neuUProfil.H2));
Point2D catPoint2D7 = factory2D.CreatePoint(neuUProfil.B1 - neuUProfil.B2 / 2, -neuUProfil.H1 / 2);
Point2D catPoint2D8 = factory2D.CreatePoint(-neuUProfil.B2 / 2, -neuUProfil.H1 / 2);
// ____
// | _|
// | |_ Linie fehlt = skizierte Linie
// |____|
//
// | _|
// | |_
// |____|
Line2D catLine2D1 = factory2D.CreateLine(-neuUProfil.B2 / 2, neuUProfil.H1 / 2, neuUProfil.B1 - neuUProfil.B2 / 2, neuUProfil.H1 / 2);
catLine2D1.StartPoint = catPoint2D1;
catLine2D1.EndPoint = catPoint2D2;
// ____
// | _
// | |_
// |____|
Line2D catLine2D2 = factory2D.CreateLine(neuUProfil.B1 - neuUProfil.B2 / 2, neuUProfil.H1 / 2, neuUProfil.B1 - neuUProfil.B2 / 2, neuUProfil.H1 / 2 - neuUProfil.H2);
catLine2D2.StartPoint = catPoint2D2;
catLine2D2.EndPoint = catPoint2D3;
// ____
// | |
// | |_
// |____|
Line2D catLine2D3 = factory2D.CreateLine(neuUProfil.B1 - neuUProfil.B2 / 2, neuUProfil.H1 / 2 - neuUProfil.H2, neuUProfil.B2 / 2, neuUProfil.H1 / 2 - neuUProfil.H2);
catLine2D3.StartPoint = catPoint2D3;
catLine2D3.EndPoint = catPoint2D4;
// ____
// | _|
// | _
// |____|
Line2D catLine2D4 = factory2D.CreateLine(neuUProfil.B2 / 2, neuUProfil.H1 / 2 - neuUProfil.H2, -neuUProfil.B2 / 2, (neuUProfil.H1 / 2 - neuUProfil.H2));
catLine2D4.StartPoint = catPoint2D4;
catLine2D4.EndPoint = catPoint2D5;
// ____
// | _|
// | |
// |____|
Line2D catLine2D5 = factory2D.CreateLine(neuUProfil.B2 / 2, -(neuUProfil.H1 / 2 - neuUProfil.H2), neuUProfil.B1 - neuUProfil.B2 / 2, -(neuUProfil.H1 / 2 - neuUProfil.H2));
catLine2D5.StartPoint = catPoint2D5;
catLine2D5.EndPoint = catPoint2D6;
// ____
// | _|
// | |_
// |____
Line2D catLine2D6 = factory2D.CreateLine(neuUProfil.B1 - neuUProfil.B2 / 2, -(neuUProfil.H1 / 2 - neuUProfil.H2), neuUProfil.B1 - neuUProfil.B2 / 2, -neuUProfil.H1 / 2);
catLine2D6.StartPoint = catPoint2D6;
catLine2D6.EndPoint = catPoint2D7;
// ____
// | _|
// | |_
// | |
Line2D catLine2D7 = factory2D.CreateLine(neuUProfil.B1 - neuUProfil.B2 / 2, -neuUProfil.H1 / 2, -neuUProfil.B2 / 2, -neuUProfil.H1 / 2);
catLine2D7.StartPoint = catPoint2D7;
catLine2D7.EndPoint = catPoint2D8;
// ____
// _|
// |_
// ____|
Line2D catLine2D8 = factory2D.CreateLine(-neuUProfil.B2 / 2, -neuUProfil.H1 / 2, -neuUProfil.B2 / 2, neuUProfil.H1 / 2);
catLine2D8.StartPoint = catPoint2D8;
catLine2D8.EndPoint = catPoint2D1;
// Skizzierer verlassen
hspB1_catia_Profil.CloseEdition();
// Part aktualisieren
hspB1_catiaPart.Part.Update();
}
