Есть ли способ масштабировать графический текст в ArcMap?

StackOverflow https://stackoverflow.com/questions/893065

  •  23-08-2019
  •  | 
  •  

Вопрос

Я использую этот код для создания текста в ArcMap.Но, похоже, я не могу заставить его масштабироваться как текст аннотации при увеличении масштаба.

Кто-нибудь знает, как это сделать?

//'First setup a color.  We'll use RGB red    
                IRgbColor pRGBcolor = new RgbColor();
                pRGBcolor.Blue = 0;
                pRGBcolor.Red = 255;
                pRGBcolor.Green = 0;

                //'Next, cocreate a new TextElement    
                ITextElement pTextElement = new TextElementClass();

                //'Query Interface (QI) to an IElement pointer and set    
                //'the geometry that was passed in    
                IElement pElement = pTextElement as IElement;
                pElement.Geometry = Point;

                //'Next, setup a font
                stdole.IFontDisp pFontDisp = new stdole.StdFont() as stdole.IFontDisp;
                pFontDisp.Name = "Arial";
                pFontDisp.Bold = true;

                //'Next, setup a TextSymbol that the TextElement will draw with    
                ITextSymbol pTextSymbol = new ESRI.ArcGIS.Display.TextSymbolClass();
                pTextSymbol.Font = pFontDisp;
                pTextSymbol.Color = pRGBcolor;
                pTextSymbol.Size = Size;
                pTextSymbol.HorizontalAlignment = esriTextHorizontalAlignment.esriTHACenter;
                pTextSymbol.VerticalAlignment = esriTextVerticalAlignment.esriTVACenter;
                pTextSymbol.Angle = Angle;
                pTextSymbol.Text = Text;

                //'set the size of the text symbol here, rather than on the font        
                //'Next, Give the TextSymbol and text string to the TextElement    
                pTextElement.Symbol = pTextSymbol;
                pTextElement.Text = pTextSymbol.Text;
                pTextElement.ScaleText = true;

                ESRI.ArcGIS.Carto.IElementProperties3 aoElementPro = pTextElement as ESRI.ArcGIS.Carto.IElementProperties3;
                aoElementPro.ReferenceScale = cGISHelpers.MapDomain.Map.MapScale;
Это было полезно?

Решение

Мы вполне можем добавить текст, который изменяет его размер в соответствии с масштабом.для этого нам нужно использовать свойство IElementProperties3.ReferenceScale.

У меня нет кода на C #, но прилагаю несколько примеров кода VBA, который вы можете изменить.

'--------------------------------
Sub ChangeTextElemRefScale()
    Dim pDoc As IMxDocument
    Dim pContainer As IGraphicsContainer
    Dim pElement As IElement
    Dim pTextElement As ITextElement
    Dim pActiveView As IActiveView

    Set pDoc = ThisDocument
    Set pActiveView = pDoc.ActiveView
    Set pContainer = pActiveView

    'Loop through the graphics container
    pContainer.Reset
    Set pElement = pContainer.Next
    While not pElement Is Nothing
        'Get the specific text element
        If TypeOf pElement Is ITextElement Then
           Set pTextElement = pElement
           If pTextElement.Text = "oregon" Then  'change this to your text element's text
                Dim pElemProp As IElementProperties3
                Set pElemProp = pTextElement
                pElemProp.ReferenceScale = 15000000
            End If
        End If
        Set pElement = pContainer.Next
    Wend

    pDoc.ActiveView.PartialRefresh esriViewGraphics, Nothing, Nothing
End Sub
'--------------------------------

Другие советы

Насколько мне известно, вы не можете заставить TextSymbol масштабироваться вместе с картой.Это связано с тем, что TextElement не может быть изменен в зависимости от экстента карты, а вместо этого использует размер шрифта, чтобы определить, насколько большим он будет отображаться на экране.

Лучший способ, который я могу придумать, чтобы сделать это, все еще используя TextSymbol, - это изменить размер точки (и, если экстент достаточно велик, скрыть / показать элемент) по мере изменения экстента.Я не знаю о "текстовом элементе управления, который уделяет внимание степени", а это то, что вам действительно нужно.

В качестве альтернативы, не могли бы вы просто использовать слой аннотаций или пометить слой, в котором вы хотите изменить размер текста?

В ITextElement имеет собственность ITextElement.ScaleText.Установите это значение на true и размер текста будет адаптироваться автоматически.

Лицензировано под: CC-BY-SA с атрибуция
Не связан с StackOverflow
scroll top