Author Topic: Emulate the Color command with DCL  (Read 5541 times)

0 Members and 1 Guest are viewing this topic.

Prickle Farmer

  • Newt
  • Posts: 33
  • 35+ years of AutoCAD / BricsCAD
Emulate the Color command with DCL
« on: October 26, 2015, 11:36:56 PM »
Is anyone aware of a DCL to emulate the Select Color dialog (index Color tab only) that comes up when the Color command is issued?  Why is there not a getcolord lisp command similar to the getfiled command.  This would be a handy interface tool but its a mountain of work to attempt.
I'd rather have a bottle in front of me than a frontal lobotomy.

Kerry

  • Mesozoic relic
  • Seagull
  • Posts: 11654
  • class keyThumper<T>:ILazy<T>
Re: Emulate the Color command with DCL
« Reply #1 on: October 27, 2015, 12:26:12 AM »

Try

Code - Auto/Visual Lisp: [Select]
  1. (setq theColorIWant (acad_colordlg 42) )

or

Code - Auto/Visual Lisp: [Select]
  1. (setq theColorIWant (acad_truecolordlg 42) )
kdub, kdub_nz in other timelines.
Perfection is not optional.
Everything will work just as you expect it to, unless your expectations are incorrect.
Discipline: None at all.

Prickle Farmer

  • Newt
  • Posts: 33
  • 35+ years of AutoCAD / BricsCAD
Re: Emulate the Color command with DCL
« Reply #2 on: October 27, 2015, 12:51:08 AM »
Awesome!!! :-) :-) :-) :-) :-) :-) :-)
I sure that wheel had been invented just couldn't find it.

Thanks Kerry
I'd rather have a bottle in front of me than a frontal lobotomy.