创建和编辑AutoCAD图元 > 使用图层、颜色和线型 > 使用颜色 > 
通过数据库将颜色设置为当前的
 
 

This example sets a color current through the Database object with the Cecolor property.

本例通过 Database 对象的 Cecolor 属性设置一个颜色值为当前颜色值。

VB.NET 

Imports Autodesk.AutoCAD.Runtime
Imports Autodesk.AutoCAD.ApplicationServices
Imports Autodesk.AutoCAD.DatabaseServices
Imports Autodesk.AutoCAD.Colors
 
<CommandMethod("SetColorCurrent")> _
Public Sub SetColorCurrent()
  '' 获得当前文档   Get the current document
  Dim acDoc As Document = Application.DocumentManager.MdiActiveDocument
 
  '' 设置当前颜色值  Set the current color
  acDoc.Database.Cecolor = Color.FromColorIndex(ColorMethod.ByLayer, 256)
End Sub

C# 

using Autodesk.AutoCAD.Runtime;
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Colors;
 
[CommandMethod("SetColorCurrent")]
public static void SetColorCurrent()
{
  // 获得当前文档   Get the current document
  Document acDoc = Application.DocumentManager.MdiActiveDocument;
 
  // Set the current color
  acDoc.Database.Cecolor = Color.FromColorIndex(ColorMethod.ByLayer, 256);
}