---

... vielleicht träum ich ja auch schon oder so ;-)

Also, ich hatte grade Dirk hier diesen Code gepostet:

Code:

---

Sub ac_farbdialog()
  Dim c1 as variant, c2 as variant
  With ThisDrawing
    c1 = .GetVariable("CECOLOR")
    .SendCommand "_color" & Chr(13)
    c2 = .GetVariable("CECOLOR")
    .SetVariable "CECOLOR", c1
  End With
  MsgBox "gewählte Farbe: " & c2, , "Return Color"
End Sub

---

Diesen hatte ich bei mir getestet mit F5 aus dem VBE heraus, ging auch wunderbar.

Wenn ich allerdings das Makro aus der Acad-Umgebung via Alt+F8 starte,
wirds seltsam ... es erscheint erst! die Messagebox und danach! der Farbdialog, also das Ganze wird useless und geht einfach total in die Hose.

Ist das bei euch auch so?
Kann's mir momentan nicht so recht erklären ...

Gruss Nancy
                     

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

---

Zitat:

---

Original erstellt von startrek:
... Ist das bei euch auch so?
...
                     

---

Nein, getestet mit AutoCAD 2006 SP0 (von AIP 10 CD) und
Autodesk Map 3D 2006 - Deutsch SP1

es geht so wie es soll, erst Farbdialog, dann Messagebox.

Dazu evt. auch interessant: http://discussion.autodesk.com/thread.jspa?messageID=5020375 http://discussion.autodesk.com/thread.jspa?messageID=4144108 http://discussion.autodesk.com/thread.jspa?messageID=4164145

------------------
Mit freundlichem Gruß

Udo Hübner

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

---

Hallo Udo,

danke fürs probieren, ich hatte es eben auch noch u.a. unter 2005 auf nem andren pc probiert,
da gehts auch wie angedacht.
Konnte das 'hirnrissige' Verhalten insoweit eingrenzen, dass wohl der 'bug' am acad2000 liegt,
ab acad2000i war der Code-Ablauf korrekt, egal wie/wo aufgerufen. Möglicherweise liegts am alten VB5, denn der Wechsel zu VB6 war ja ab der 2000i'er [i] version. (tolles wort)

Okay, klarer Fall von meine Schuld, was code ich auch in prähistorischen versionen rum ;-)))

lg Nancy   

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