UL2 a écrit :
I just want to display the words : "Hello World" after I found the word "Drawing Number". The bounded box (created by lines) is already there.
Bascially, I do not want to create any new object, I just would like to find out what the drawing number is (in this example, it is "HELLO WORLD")
Creating a boundary with Editor.TraceBoundary just help us to find this boundary from a single point (the "DRAWING NUMBER" text position) and use this boundary to found the other text.
We do not need to add the newly created boudary to the database, we'll dispose it after using.
Here's a commented C# example. I let you convert it to VB if you really have to*.
[CommandMethod("FindDrawingNumber")]
public void FindDrawingNumber()
{
var doc = Application.DocumentManager.MdiActiveDocument;
var db = doc.Database;
var ed = doc.Editor;
using (var tr = db.TransactionManager.StartTransaction())
{
var model = (BlockTableRecord)tr.GetObject(
SymbolUtilityServices.GetBlockModelSpaceId(db), OpenMode.ForRead);
// iterate through model space
foreach (ObjectId id in model)
{
// looking for a text
if (id.ObjectClass.DxfName == "TEXT")
{
var text = (DBText)tr.GetObject(id, OpenMode.ForRead);
// which text string is "DRAWING NUMBER"
if (text.TextString == "DRAWING NUMBER")
{
// get the transformation matrix from WCS to UCS
// because Editor methods work with UCS coordinates
var wcs2ucs = ed.CurrentUserCoordinateSystem.Inverse();
// use COM API with late binding to perform a zoom extents
// which insure boundary and selection work
dynamic acadApp = Application.AcadApplication;
acadApp.ZoomExtents();
// get the boundary aroun "DRAWING NUMBER" text
var boundary = ed.TraceBoundary(text.Position.TransformBy(wcs2ucs), false);
// check for boundary validity
if (boundary.Count == 1 && boundary[0] is Polyline)
{
// get the boundary vertices
var polygon = new Point3dCollection();
using (var pline = (Polyline)boundary[0])
{
for (int i = 0; i < pline.NumberOfVertices; i++)
{
polygon.Add(pline.GetPoint3dAt(i).TransformBy(wcs2ucs));
}
}
// perform a window polygon selection using the boundary vertices
var filter = new SelectionFilter(new[] { new TypedValue(0, "TEXT") });
var selection = ed.SelectWindowPolygon(polygon, filter);
acadApp.ZoomPrevious();
// check for the selection validity
if (selection.Status != PromptStatus.OK || selection.Value.Count != 2)
return;
// look for the selected text which is not "DRAWING NUMBER"
foreach (SelectedObject so in selection.Value)
{
if (so.ObjectId != id)
{
var txt = (DBText)tr.GetObject(so.ObjectId, OpenMode.ForRead);
Application.ShowAlertDialog(txt.TextString);
}
}
}
break;
}
}
}
tr.Commit();
}
}
* If you start learnig .NET, you should learn C# instead of VB because you'll find more help, examples, samples, templates written in C# than in VB.
