cad2008用c#二次开发的填充颜色的问题

[yuxrxll]

cad2008用c#二次开发的填充颜色的问题,下面的代码画一个圆填充颜色没问题,我想画几根线组合的封闭图形(就是几个对象的封闭图),再填充颜色,该怎么写呢?
Database db = HostApplicationServices.WorkingDatabase;
Transaction trans = db.TransactionManager.StartTransaction();
try
{
Circle circle = new Circle(new Point3d(10, 10, 0), Vector3d.ZAxis, 200);
BlockTable bt = (BlockTable)trans.GetObject(db.BlockTableId, OpenMode.ForRead);
BlockTableRecord btr = (BlockTableRecord)trans.GetObject(HostApplicationServices.WorkingDatabase.CurrentSpaceId, OpenMode.ForWrite);
btr.AppendEntity(circle);



trans.AddNewlyCreatedDBObject(circle, true);
ObjectIdCollection collection = new ObjectIdCollection();
collection.Add(circle.ObjectId);
// collection.Add(circle1.ObjectId);


Hatch hatch = new Hatch();

hatch.Elevation = 0;
hatch.HatchStyle = HatchStyle.Normal;
hatch.ColorIndex = 10;
hatch.PatternAngle = 0;
hatch.SetHatchPattern(HatchPatternType.PreDefined, "SOLID"); //设置填充图案
// hatch.Associative = true;
hatch.AppendLoop(HatchLoopTypes.Default, collection); //设置填充边界 //
hatch.EvaluateHatch(true);
btr.AppendEntity(hatch);
trans.AddNewlyCreatedDBObject(hatch, true);
trans.Commit();
}
catch
{
ed.WriteMessage("Error ");
}
finally
{
trans.Dispose();
}

[wrongagain98]

哦？2008可以用C#开发了？
问一下能不能用Java开发呀？

[hasia]

楼主，请问你用的什么方式开发的？

[AlexChow]

用Polyline可以实现：
[CommandMethod("MyDraw")]
static public void DoDraw()
{
Database db = HostApplicationServices.WorkingDatabase;
Transaction trans = db.TransactionManager.StartTransaction();
try
{
BlockTable bt = (BlockTable)trans.GetObject(db.BlockTableId, OpenMode.ForRead);
BlockTableRecord btr = (BlockTableRecord)trans.GetObject(HostApplicationServices.WorkingDatabase.CurrentSpaceId, OpenMode.ForWrite);


Polyline polyline = new Polyline();
polyline.SetDatabaseDefaults();
polyline.Reset(false, 0);

polyline.AddVertexAt(0, new Point2d(-10, -10), 0, 0, 0);
polyline.AddVertexAt(1, new Point2d(-10, 20), 0, 0, 0);
polyline.AddVertexAt(2, new Point2d(30, 20), 0, 0, 0);
polyline.AddVertexAt(3, new Point2d(30, -10), 0, 0, 0);
polyline.Closed = true;
btr.AppendEntity(polyline);
trans.AddNewlyCreatedDBObject(polyline, true);
ObjectIdCollection collection = new ObjectIdCollection();
collection.Add(polyline.ObjectId);

Hatch hatch = new Hatch();

hatch.Elevation = 0;
hatch.HatchStyle = HatchStyle.Normal;
hatch.ColorIndex = 10;
hatch.PatternAngle = 0;
hatch.SetHatchPattern(HatchPatternType.PreDefined, "SOLID"); //设置填充图案
hatch.AppendLoop(HatchLoopTypes.Default, collection); //设置填充边界 //
hatch.EvaluateHatch(true);
btr.AppendEntity(hatch);
trans.AddNewlyCreatedDBObject(hatch, true);
trans.Commit();
}
catch (Autodesk.AutoCAD.Runtime.Exception ed)
{
ed.Message.ToString();
}
finally
{
trans.Dispose();
}

[zhouxingyu896]

学习

学习

[jayjay2008]

不错 但是大家经常用VBA 对autoCAD进行二次开发 希望 大家也关注一下 呵呵

[diy2005]

定期啊 好都关系啊

[diy2005]

正在关注这个

好东西

顶起啊

呵呵

[feitianv4]

恩人啊 我总算找到 hatch的用法了；我已经找了半天了