TextIsMultiline: Boolean;
TextIsMultiline: System.Boolean;
Свойство TextIsMultiline определяет возможность отображения подписей в несколько строк.
Свойство устарело, используйте IChartAxis.TextMultiline.
Свойство TextIsMultiline может устанавливаться только для оси Х для неточечных типов диаграмм. При попытке его установки для другой оси генерируется исключительная ситуация. По умолчанию свойству установлено значение True.
Данное свойство сохраняется с диаграммой. Если загружается объект предыдущей версии, то для него устанавливаются свойства TextAlignment, AutoTextSpacing, TextSpacing, TextVisible и TextIsMultiline по умолчанию.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонентов ChartBox, UiChart, являющегося источником данных.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
ay, ax: IChartAxis;
al: ChartAxisTextAlignment;
b: Boolean;
Begin
ay := UiChart1.Chart.AxisY;
ay.TextAlignment := ChartAxisTextAlignment.Near;
// подписи оси Y выровнены по правому краю
ay.TextSpacing := 3.0;
ay.AutoTextSpacing := False;
// минимальное расстояние подписи до линии оси равно 3 мм
ax := UiChart1.Chart.AxisX;
al := ax.TextAlignment;
// возвращает ChartAxisTextAlignment.Near
ax.TextAlignment := ChartAxisTextAlignment.Center;
// возникает исключительная ситуация для неточечных типов диаграмм
ax.TextIsMultiline := False;
// перенос текста отключен
b := ay.TextIsMultiline;
// должно всегда возвращать False для всех осей, кроме оси категорий
ay.TextIsMultiline := True;
// исключительная ситуация
End Sub Button1OnClick;
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонентов ChartBoxNet, UiChartNet, являющегося источником данных.
...
Imports Prognoz.Platform.Forms.Net;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Chart;
Private Sub button1_Click( sender: System.Object; e: System.EventArgs );
Var
ay: IChartAxis;
ax: IChartAxis;
Begin
ay:= UiChartNet1.ChartUi.Chart.AxisY;
ax:= UiChartNet1.ChartUi.Chart.AxisX;
ay.TextSpacing:= 3.0;
ay.AutoTextSpacing:= False;
ax.TextIsMultiline:= False;
End Sub;
Пр нажатии кнопки «Button1» перенос текста будет отключен и подписи оси X будут расположены в одну строку.
См. также: