DwgPreview update problem in 7.0.0.1

Started by roy_043, October 23, 2011, 12:45:33 PM

Previous topic - Next topic

roy_043

Bricscad 12.1.2
OpenDCL  7.0.0.1
Win XP

A small problem with DwgPreview:
To load a new dwg in a preview you have to first make it invisible.
See attached files.

Put all files in a single folder.
Open one of the drawings.
Load the lisp.
Enter BKG_BLOCKBROWSER to run.
Hit Reload button.
Result: only BkgBlockBrowser_Main_DwgPreview1 has been updated.

Code (autolisp) Select

(defun c:BkgBlockBrowser_Main_btnReload_OnClicked ()
 ; (dcl_Control_SetVisible BkgBlockBrowser_Main_DwgPreview0 nil) ; required for ODCL 7.0.0.1
 (dcl_DWGPreview_LoadDwg BkgBlockBrowser_Main_DwgPreview0 "A002.dwg")
 (dcl_Control_SetVisible BkgBlockBrowser_Main_DwgPreview0 'T)
 (dcl_Control_SetVisible BkgBlockBrowser_Main_DwgPreview1 nil) ; required for ODCL 7.0.0.1
 (dcl_DWGPreview_LoadDwg BkgBlockBrowser_Main_DwgPreview1 "A003.dwg")
 (dcl_Control_SetVisible BkgBlockBrowser_Main_DwgPreview1 'T)
)


owenwengerd

Good catch. This is now fixed for the next build.
Owen Wengerd (Outside The Box) / ManuSoft


Kerry



Owen,
Any time frame for an update on this.

In the meantime I'm using

Code (autolisp) Select
(defun c:KDUB_BlockInserter_Main_ListBox_OnSelChanged (ItemIndex Value /)
   (dcl_Control_SetVisible KDUB_BlockInserter_Main_DwgPreview1 'T)
   (dcl_Control_SetVisible KDUB_BlockInserter_Main_DwgPreview1 nil)
    (dcl_dwgpreview_loaddwg KDUB_BlockInserter_Main_DwgPreview1
                           (strcat G1003-SelectedFolder "\\" Value)
   )
   (dcl_Control_SetVisible KDUB_BlockInserter_Main_DwgPreview1 'T)     
)


Good workaround roy_043.

Perfection is not optional.
My other home is TheSwamp

owenwengerd

I am planning to upload Alpha 2 this weekend.
Owen Wengerd (Outside The Box) / ManuSoft

Kerry

Thanks Owen.

I'll be in Santa mode   :D

All the best for the Silly Season.
Be well
Perfection is not optional.
My other home is TheSwamp