[分享]：关于真彩色的处理函数

mmmm

在[AutoCaD2004安装目录]/Sample/VisualLISP/Color-util.lsp文件中有关于真彩色的处理函数，不过还没有找到调用颜色选择对话框的函数。原来的acad_colordlg只能调出原来的对话框。
目前还不知道如何用程序修改实体的DXF代码来改变颜色，怀疑要用ActiveX方法才行了，但是也还没有找到相应的函数

e2002

VL :
vla-get-TrueColor
vla-put-TrueColor

DXF :
420

以下内容摘自AutoCAD 2004安装光盘中的Readme.hlp:

The following AutoLISP functions provide access to the True Color user interface:
(acad_truecolordlg color [allowbylayer] [currentlayercolor]). Prompts for colors through a dialog box. The color parameter is a dotted pair describing the default color; the first element of the dotted pair must be one of the color-related DXF group codes (62, 420, or 430). If the allowbylayer parameter is present and is not nil, the ByLayer and ByBlock buttons are shown. When the operation is successful, the function returns a list of one or more dotted pairs describing the color selected. The last dotted pair in the list indicates the color selected. The function returns nil if the user cancels the dialog box.

(acad_truecolorcli color [allowbylayer] [alternatePrompt]). Prompts for colors at the command line. The first two parameters are identical to acad_truecolordlg, and the third parameter is an optional prompt string. If this string is omitted, the default value is "New color ".