REMOVE ByLayer and ByBlock items from the COLOR COMBO BOX

[domenicomaria]

Code Select Expand

;         -         -         -         -         -         -         -         -         -         -         -
(defun :DCL-COMBOBOX-COLOR-INIT (prj-name frm-name ctrl-key col-no bylyr-byblk / col-pos 0-clr-nth 256-clr-nth )
   
   (if(not bylyr-byblk)
      (progn
         (if(setq 0-clr-nth   (dcl-ComboBox-FindColor prj-name frm-name ctrl-key 0   ) )
            (dcl-combobox-deleteitem prj-name frm-name ctrl-key 0-clr-nth   )
         )
         (if(setq 256-clr-nth (dcl-ComboBox-FindColor prj-name frm-name ctrl-key 256 ) )
            (dcl-combobox-deleteitem prj-name frm-name ctrl-key 256-clr-nth )
         )
      )
   )
   
   (if(not (setq col-pos (dcl-ComboBox-FindColor prj-name frm-name ctrl-key col-no) ) )
      (progn
         (dcl-ComboBox-AddColor    prj-name frm-name ctrl-key col-no )
         (setq col-pos (dcl-ComboBox-FindColor prj-name frm-name ctrl-key col-no) )
      )
   )
   (dcl-combobox-setcursel prj-name frm-name ctrl-key col-pos )
)


I want REMOVE ByLayer and ByBlock items from the COLOR COMBO BOX

dcl-combobox-deleteitem returns T but doesnt remove anything !

where am I wrong ?

[owenwengerd]

The color combo is implemented by the host app, so its behavior is not necessarily controlled by OpenDCL. However, I just checked a color combo box with the Combo Box Lab sample, and there I am able to delete the ByBlock and ByLayer list items in both BricsCAD V24 and Acad 2024.

[domenicomaria]

Yes

I can remove byBlock and ByLayer

but when I choose "select color"

immediately after
byBlock and ByLayer
are automatically added to the list again