---

Hallo Leute,
bin vor kurzem mit der Umsetzung von VBA auf C# Late Binding angefangen, und schon treten die ersten Probleme auf.
Ich möchte einen Punkt im 3D Raum über Parameter steuern. Parameter und Punkt Erzeugung klappen problemlos, aber bei der Definition der Formel treten dann die Fragen auf.
Habe mal folgende Code Schnippel zusammen kopiert, die lb_get, lb_sety... stammen aus dem Buch von Jens Hansen:

            //ob = Aktivdokument  //obtp = Part

            object lb_result = lb_get(ob, "Part", null);
            lb_result = lb_get(lb_result, "Parameters", null);
            object[] param = new object[3] { "XP", "Length", 0 };
            lb_result = lb_Method(lb_result, "CreateDimension", param);

            object geo3d = lb_get(obtp, "HybridShapeFactory", null);

            lb_result = lb_get(obtp, "HybridBodies", null);
            object hbody = lb_Method(lb_result, "Add", null);
            object[] param1 = new object[1] { "NP" };
            lb_result = lb_sety(hbody, "Name", param1);

            object[] param2 = new object[3] { 0, 0, 0 };
            object punkt= lb_Method(geo3d, "AddNewPointCoord", param2);
            object[] param3 = new object[1] { "Point.NP" };
            lb_result = lb_sety(punkt, "Name", param3);

            object[] param4 = new object[1] { punkt };
            lb_result = lb_Method(hbody, "AppendHybridShape", param4);

            lb_result = lb_get(ob, "Part", null);
            lb_result = lb_Method(lb_result, "Update", null);

            object relation = lb_get(obtp, "Relations", null);

            object[] param5 = new object[4] { "Point X", "", punkt , "Origin_XM" };
            lb_result = lb_Method(relation, "CreateFormula", param5);

Unter VBA gibt man punkt.x an, aber wie kommt man vom Object punkt zum x

mfg
Jürgen

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Servus

Zitat:

---

Unter VBA gibt man punkt.x an, aber wie kommt man vom Object punkt zum x 

---

IMHO nimmt man in VBA "GetNameToUseInRelation" (siehe Doku) um einen Parameter in einer Formel zu verwenden (somit sollte die Formel auch funktionieren, wenn der Name mehrfach vorkommt)

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Bernd,
vielen Dank für deine schnelle Antwort, aber nicht der Parameter macht das Problem, sondern die Übergabe des Punktes.
Leider war in der Angabe des Parameter ein Schreibfehler, sorry.

    object[] param5 = new object[4] { "Point X", "", punkt   , "XP" };
    lb_result = lb_Method(relation, "CreateFormula", param5);

In VBA habe ich folgendes programmiert:

    Dim oPkt As HybridShapePointCoord
    ....
    Set oPkt = oGeo3D.AddNewPointCoord(0, 0, 0)
    ....
    Set oFormel_X = oRels.CreateFormula("Point X", "", oPkt.X, "XP")

Im Beispiel habe ich nur den Code für die X-Koordinate angegeben, was im fertigem Programm auch für  Y und Z programmiert wird.

mfg
Juergen

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP