---

Hauptsymbolleiste.gif

Hallo zusammen

In der beiliegenden Grafik ist folgende Idee:
PAR/PSM/... können direkt erstellt werden. Dies sollte die gleiche Funktion sein wie Datei-Neu-Normal.par
Ich habe das Icon mit einer Bat-Datei verknüpft, die folgendes beinhaltet:

-----------
echo off
"C:\Programme\Solid Edge V14\Program\Template\Normal.par"
-----------

Das Problem dabei ist, dass nun die Normal.par Datei geöffnet wird. Diese sollte aber nur als Vorlage dienen.
Ich denke, dies kann man sicher mit einem Makro lösen, aber da kenne ich mich leider noch nicht aus.

Kann mir jemand hier dieses Makro schreiben, resp. mir eine mögliche Lösung geben, denn ich denke, dies könnte sicher jeder von diesem Forum interessieren.

Gruss
Solidos

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

---

Hallo Solidos

vom Desktop ginge es so. Aus se heraus gibt das aber ne neue instanz.
-----------
echo off
"C:\Programme\Solid Edge V14\Program\edge.exe" /Draft
-----------
Parameter sind: Part,Assembly,Draft,Weldment

Viele Grüße

------------------
APeters@BSS-Online.de

[Diese Nachricht wurde von Arne Peters am 20. Oktober 2003 editiert.]

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

---

Na und aus SE heraus müßte man kleine Makros machen. Dafür benötigt dann VB. Das ganze sähe so aus:
____________________________________________________________
Sub main()
  Dim o_app As Object
  Set o_app = GetObject(, "SolidEdge.Application")
  Set o_doc = o_app.Documents.Add("SolidEdge.DraftDocument", "C:\Programme\Solid Edge V14\Program\Template\Normal.dft")

  Set o_doc = Nothing
  Set o_app = Nothing

End Sub
____________________________________________________________

Die Solid Edge Framework-Libraries habe ich eingebunden.

Viele Grüße

------------------
APeters@BSS-Online.de

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

---

Hallo Arne Peters

Danke für den Script. Es läuft prima. Genau so wie ich es mir gewünscht habe.

Ich frage mich nur, weshalb dies EDS nicht Standard mässig anbietet. Ist doch viel schneller so!

Gruss
Solidos

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

---

Hier nochmal mit Berücksichtigung des Pfades für Usertemplates.
__________________________________________________________________
Attribute VB_Name = "NewDocument"
Sub main()
    Dim o_app As Object
    Dim o_docs As SolidEdgeFramework.Documents
    Dim o_doc As Object
    Dim m_template As String
   
    Set o_app = GetObject(, "SolidEdge.Application")
    Set o_docs = o_app.Documents
    m_template = o_docs.TemplatePath & "\Normal.dft"
   
    Set o_doc = o_docs.Add("SolidEdge.DraftDocument", m_template)
   
    Set o_template = Nothing
    Set o_doc = Nothing
    Set o_docs = Nothing
    Set o_app = Nothing
End Sub
__________________________________________________________________

------------------
APeters@BSS-Online.de

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

---

Ja das ist Natürlich noch besser, besonders da es SE Versions unabhängig ist.

Danke
Solidos

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

---

Hallo Arne Peters

Sollte Zeile 4 nicht so heissen?:

    Dim o_docs As Object

Gruss
Solidos

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

---

Das sollte auch gehen. Dann muß man eventuell nicht mal mehr die SEFramework-Libraries einbinden.

Viele Grüße

APeters@BSS-Online.de

[Diese Nachricht wurde von Arne Peters am 21. Oktober 2003 editiert.]

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

---

Hallo Solidos,

Dein Vorschlag

Zitat:

---

    Dim o_docs As Object

---

sollte funktionieren, auch EDS macht es in den Beispielen immer so.

Ich finde nur das Ganze ist nicht besonders hilfreich, da dann in der Entwicklungsumgebung die Codevervollständigung nicht arbeiten kann.

Wenn man SEApp As SolidEdgeFramework.Application deklariert und später im Code SEApp gefolgt von einem Punkt tippt, bekommt man die Auswahlliste mit allen möglichen Eigenschaften und Methoden.
Für diese Hilfestellung durch die Entwicklungsumgebung ist es mir der Aufwand immer wert, die notwendigen Verweise zu setzen.

Jürgen Niesner

------------------
50* SEV14SR6, 2* SEV15_00_00_59

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