topic Re: selectionfilter paperspace text height in .NET Forum

selectionfilter paperspace text height

Anonymous — Fri, 20 Mar 2015 08:00:00 GMT

I'm trying to change the color of all text depending on papersize textheight.

selection.SetValue(New TypedValue(DxfCode.txtsize, 500), 0) works but it selects on model height and not paperspace height.

I can't find a dxfcode for paperspacesize (42: TxtStylePSize doesnt work) so i'm trying to find a dxfcode for annotative scale to combine it with model hieght.

selection.SetValue(New TypedValue(DxfCode.TxtStyleXScale, 100), 0) somehow selects blocks with 1:100 annotative scale but no text.

Does anyone know how to select text with a specific scale or any other way around to select text on paperspacesize?

Re: selectionfilter paperspace text height

moogalm — Mon, 23 Mar 2015 12:05:12 GMT

Use SCALETEXT, in that you fill find option for Paper Height, this is only valid for annotative objects.

Re: selectionfilter paperspace text height

Anonymous — Tue, 24 Mar 2015 08:48:32 GMT

I don't want to scale any text. I only want to change the color of all text depending on paper textheight so that the thickness matches the text height.

So all text with a paper textheight of 2.5 should change to a color that has a thickness of 1/10 of 2.5 wich means 0.25.

3.5 --> 0.35, 5.0 --> 0.5, etc.

I cant use cannoscale because each piece of text can have a different scale. All text of our drwaings is annovative and often we have scales of 1:100, 1:20 and 1:10 in one drawing so i really need to filter on annotative scale or paper textheight wich i begin to think is impossible.

Re: selectionfilter paperspace text height

moogalm — Tue, 24 Mar 2015 09:19:43 GMT

Sorry, but I have not understood correctly, can you do what you said interactively ?, can you share that sample demo video I will try to understand and let you know if it possible or not.

I only want to change the color of all text depending on paper textheight so that the thickness matches the text height.

I didnt get this, thickness of which entity should match ? do you mean font size of the text ?

Re: selectionfilter paperspace text height

Anonymous — Tue, 24 Mar 2015 09:45:10 GMT

yes the font size (paperspace, not modelspace) has to match the thickness of the text (thickness is determined by the color).

1. select all text

2. get the fontsize entity (paperspace)

3. If fontsize is around 2.5 --> set the color to yellow (has a 0.25 penthickness in our pentable)

If fontsize is around 3.5 --> set the color to green (has a 0.35 penthicknessin our pentable)

If fontsize is around 5 --> set the color to blue (has a 0.5 penthickness in our pentable)

This should work in a single command. When you press the command then all text in the drawing will get the right color.

For example, if i have scaled several blue text pieces with a fontsize (paperspace) of 5 in half then the fontsize is 2.5 but the color is still blue.

If i now use my command, all scaled text will change to the proper color wich matches the fontsize.

Re: selectionfilter paperspace text height

moogalm — Tue, 24 Mar 2015 14:38:32 GMT

Hi,

Those two DXF codes gives Model height and Model Width, sadly I couldn't find an easy way for you, you have resort to brute force method, getting all text entities and find if each text entity has said annotation scale, like suppose I have a Mtext whose annotation scale 1:10, then I can check like all text entities like this

Document doc = Application.DocumentManager.MdiActiveDocument;
          Database db = doc.Database;
          Editor ed = doc.Editor;
          ObjectContextManager ocm = db.ObjectContextManager;
          ObjectContextCollection occ = ocm.GetContextCollection("ACDB_ANNOTATIONSCALES");
          PromptSelectionOptions pso = new PromptSelectionOptions();
          pso.MessageForAdding = "\nSelect annotative objects";
          PromptSelectionResult psr = ed.GetSelection(pso);
          if (psr.Status != PromptStatus.OK) return;
          using (Transaction t = db.TransactionManager.StartTransaction())
          {
              if (!occ.HasContext(db.Cannoscale.Name))
              {
                  ed.WriteMessage("\nCannot find current annotation scale.");
                  return;
              }
              ObjectContext curCtxt = occ.GetContext("1:10");
              foreach (SelectedObject so in psr.Value)
              {
                  ObjectId id = so.ObjectId;
                  DBObject obj = t.GetObject(id, OpenMode.ForRead);
                  if (obj.Annotative == AnnotativeStates.True && obj.HasContext(curCtxt))
                  {
                      ed.WriteMessage("yup got it");
                  }
              }
              t.Commit();

          }

Re: selectionfilter paperspace text height

Anonymous — Tue, 24 Mar 2015 15:44:34 GMT

Thank you very much for your help.

I'm not experienced with C# so i used your exact code in a new project and if i select a 1:10 text it says "yup got it" !! 😄

How can i find out wich entity has 1:10 as value?

Re: selectionfilter paperspace text height

Anonymous — Wed, 25 Mar 2015 08:32:14 GMT

I debugged your code in vb and i see that it gets a value of "1:10" out of Databaseservices.AnnotationScale.

Unfortunately i can't use that as an expression so i tried this:

Dim WFO(0) As TypedValue

'' Create a TypedValue array to define the filter criteria

WFO.SetValue(New TypedValue(DxfCode.Start, "1:10"), 0)

It should find the right entity but it doesnt find anything.

edit: I see now that dxfcode.start looks for an entitytype so thats why it doesnt work with 1:10.

I can't find any dxfcode that looks for values 😞

Re: selectionfilter paperspace text height

moogalm — Wed, 25 Mar 2015 08:48:52 GMT

Hi,

You can't make such selection based on DXF code, we don't have appropriate DXFCode to filter out Text entities based on Paper height or Annotation scale,

so you need to follow this:

Find all Text entities.
Now iterate through each text entity and check if this entity has context of "1:10" [Assuming these the scale you are looking for]
if check succeeded,put this text entity in a collection or else continue
Get the collection, and apply your futher process on these entities.

On point 2, you can have multiple test checks like Scale and Model height, since PaperHeight = Model Height / Scale or other way do the math, I don't remember.

You can convert C# code to VB.NET easily there are many translators availble.

Do let me know if you have any further questions.

Re: selectionfilter paperspace text height

Anonymous — Wed, 25 Mar 2015 14:25:29 GMT

It's working but the problem is that i can't get the modelspaceheight from obj or id.

I tried multiple things like:

If obj.Annotative = AnnotativeStates.True And obj.HasContext(scale10) Then

If id.Database.Textsize < 21.5 Then

acEnt.ColorIndex = 1

End If

If id.Database.Textsize > 21.5 And Val(obj.Database.Textsize) < 30 Then

'' Change the object's color
acEnt.ColorIndex = 7
End If

I debugged it and id.Database.Textsize stays the same value. It should change because id (acSSObj.ObjectId) is the selected object from the selection filter.

I can filter the modelspaceheight in the selectionfilter but for example a modelspaceheight of 100 can be

papertextheight: 2 scale: 1:50

papertextheight: 1 scale: 1:100

papertextheight: 51:20

so i'm not filtering anything that way.

I know it's a tough problem and you have helped me a lot (thanks for that!) but can you help me further?

Re: selectionfilter paperspace text height

Anonymous — Wed, 25 Mar 2015 15:48:17 GMT

I worked a way around!

It's a pretty rediculous way but it works.

For count = 0 To 435
If count <> 0 Then count = count - 1
count2 = count2 + 5

' Start a transaction
Using acTrans As Transaction = db.TransactionManager.StartTransaction()

Dim WFO(9) As TypedValue

'' Create a TypedValue array to define the filter criteria

WFO.SetValue(New TypedValue(DxfCode.Operator, "<AND"), 0)
WFO.SetValue(New TypedValue(DxfCode.Operator, "<OR"), 1)
WFO.SetValue(New TypedValue(DxfCode.Start, "TEXT"), 2)
WFO.SetValue(New TypedValue(DxfCode.Start, "MTEXT"), 3)
WFO.SetValue(New TypedValue(DxfCode.Operator, "OR>"), 4)
WFO.SetValue(New TypedValue(DxfCode.Operator, ">="), 5)
WFO.SetValue(New TypedValue(DxfCode.TxtSize, count), 6)
WFO.SetValue(New TypedValue(DxfCode.Operator, "<"), 7)
WFO.SetValue(New TypedValue(DxfCode.TxtSize, count2), 8)
WFO.SetValue(New TypedValue(DxfCode.Operator, "AND>"), 9)

.....

count = count +5

count is an pretty acurate modelspaceheight so i can use it later in the code to get the paperspaceheight.

Thank you very much for all your help 😄