---

Juten Abend zusammen,

ich muß nochmal stören. Was muß ich einstellen, daß wenn ich einen WBlock erstelle dieser automatisch, nicht in Acad2004, sondern in Acad2000 abgespeichert wird. Unter Optionen steht automatisches Speichern auf Acad2000.
Nachdem ich den WBlock erstellt habe, muß ich die Datei öffnen, und dann (obwohl der Dateityp richtig eingestellt ist -Acad2000-) nochmal unter dem gleichen Namen speichern.
Oder gehts nicht anders??

Danke und einen schönen Abend
Ansgar

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

---

Moin Ansgar,

das Tool hätte ich auch gern, aber...

Lothar

------------------
"Stellt Euch vor, es geht, und keiner kriegt's hin." (Neuss)

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

---

IMHO ist es ein "negatives" Feature dass sich über ein kleines lisp, vba Script umgehen lässt, denn AutoCAD speichert die "Wblocks" immer in der Version in der auch die aktuelle Zeichnung ist. Ich hab mir da ein VBA-Script'chen auf Button gelegt, das mir den exportierten Block nochmal öffnet und eine Version tiefer Qsaved. Ehrlich gesagt, bin eigentlich nie diesem Verhalten näher auf den Grund gegangen.

Auszug:

Code:

---

Dim strCMD As String
Dim strFileName As String

Private Sub AcadDocument_BeginCommand(ByVal CommandName As String)
    strCMD = CommandName
End Sub
.
.
.
Private Sub AcadDocument_EndCommand(ByVal CommandName As String)
    If CommandName = "WBLOCK" Or CommandName = "-WBLOCK" Then
        If ThisDrawing.Application.Preferences.OpenSave.SaveAsType <> ac2004_dwg Then
            If MsgBox("Blabla in 2004 DWG-Format" & vbNewLine & _
                        "um Blabla QSAVE die BlaBla.dwg in 2000-DWG Blabla-Format?" & vbNewLine & vbNewLine & _
                        "Blabla-String 2", vbYesNo) = vbYes Then
                ThisDrawing.Application.Documents.Open (strFileName)
                ThisDrawing.Application.Documents.Item(ThisDrawing.Application.Documents.Count - 1).Activate
            End If
        End If
    End If
End Sub
.
.
.

---

ggf. Code anpassen 

------------------
"Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language?"  Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF

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

---

Das Verhalten ist klar, AutoCAD - also ARX öffnet
beim Wblock Befehl eine neue Zeichnung, clont die Objekte
in die neue Datenbank und speichert sie.

Das gibt es keinerlei Einfluss darauf, welche Version
(immer die aktuelle), daher auch das Verhalten.

@proxy, deine Antwort gefällt mir eigentlich ganz gut,
wann aber wird der Variablen strFileName ein Wert
zugewiesen (am besten der Name des Wblocks)?

------------------
Bernd Cuder
Cad&Co makes CAD easy
Autodesk authorized developer

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

---

Morgen zusammen,

das wollte ich nur wissen.
Danke für die Hilfe.

Ansgar

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