[LISP] - dostęp do: Preferences

[gruzin]

Próbuje dostac sie do ustawień koloru tła modelu i papieru

niestety nie dam rady odczytać właściwości "Preferences", może ktos ma jakiś pomysł?

zwcad najnowszy: (vernum "2012.11.29(8448)")

Command: (vlax-dump-object (vlax-get-acad-object) T)
; IZcadApplication: ZWCAD Application Interface
; Property values:
; ActiveDocument = #<VLA-OBJECT IZcadDocument 04697a88>
; Application (RO) = #<VLA-OBJECT IZcadApplication 01350c0c>
; Caption (RO) = "ZWCAD+ 2012 Pro - [Drawing1.dwg]"
; Documents (RO) = #<VLA-OBJECT IZcadDocuments 045e60a0>
; FullName (RO) = "C:\\Program Files\\ZWCAD+ 2012\\ZWCAD.exe"
; Height = 808
; HWND (RO) = 918028
; LocaleId (RO) = 1033
; MenuBar (RO) = #<VLA-OBJECT IZcadMenuBar 0a17b5d4>
; MenuGroups (RO) = #<VLA-OBJECT IZcadMenuGroups 0458a120>
; Name (RO) = "ZWCAD"
; Path (RO) = "C:\\Program Files\\ZWCAD+ 2012"
; Preferences (RO) = Initializing VBA System...Wystąpił wyjątek
; StatusId (RO) = ...Indexed contents not shown...
; VBE (RO) = #<VLA-OBJECT VBE 09975c8c>
; Version (RO) = "18.1"
; Visible = -1
; Width = 1288
; WindowLeft = -4
; WindowState = 3
; WindowTop = -4
; Methods supported:
; Eval (1)
; GetInterfaceObject (1)
; GetLicenseSerial (4)
; GetZcadState ()
; ListZrx ()
; LoadZPVB (1)
; LoadZrx (1)
; Quit ()
; RunMacro (1)
; UnloadZPVB (1)
; UnloadZrx (1)
; Update ()
; ZoomAll ()
; ZoomCenter (2)
; ZoomExtents ()
; ZoomPickWindow ()
; ZoomPrevious ()
; ZoomScaled (2)
; ZoomWindow (2)
T

Command: (vlax-dump-object (vla-get-Preferences (vlax-get-acad-object)) T)
; error: Automation Error. Description was not provided.

[kruszynski]

Witam

Potwierdzam takie działanie programu. Zgłosiłem problem już jakiś czas temu, a zgłoszeniu nadano numer: T6385. Niestety na chwilę obecną nie znam sposobu na obejście tego problemu.

Pozdrawiam