ラインマーカー

ラインマーカーは、プロット上で水平線または垂直線をドラッグすることで、チャート内の特定の位置の正確なデータ値を添付ラベルを使用して表示します。折れ線グラフや面グラフに多数のデータがある場合や、複数の系列のデータを 1 つのラベルに表示したい場合などに便利です。Drag、Move などの組み込み操作を使用すると、ラインマーカーをドラッグしてチャート内のデータポイントをより正確に選択できます。

FlexChart でラインマーカーを作成して使用するには、C1.WPF.Chart.Interaction.C1LineMarker クラスのインスタンスを作成する必要があります. C1LineMarker クラスの Layers プロパティを使用して、LineMarker を所有する FlexChart オブジェクトを設定できます。

C1LineMarker で提供されている Lines プロパティを使用して、LineMarker の線の表示/非表示を設定します。Lines プロパティは、LineMarkerLines 列挙に含まれる次の値を受け取ります。

Both：垂直線と水平線の両方を表示します。
Horizontal：水平線を表示します。
Vertical：垂直線を表示します。
None：線を表示しません。

C1LineMarker クラスでは、ラインマーカーの配置を設定するための Alignment プロパティも提供されています。さらに、Interaction プロパティを LineMarkerInteraction 列挙に含まれる次の値のいずれかに設定して、ラインマーカーの操作モードを設定することができます。

Drag：ユーザーが線をドラッグすると、ラインマーカーが移動します。
Move（デフォルト）：ラインマーカーはポインタと共に移動します。
None：ユーザーがクリックして位置を指定します。

Interaction プロパティを Drag に設定する場合は、DragContent プロパティと DragLines プロパティを設定して、ラインマーカーの線にリンクされた内容や値がドラッグ可能かどうかを指定する必要があります。Furthermore, you can set the initial position of the line marker relative to the plot area with the help of VerticalPosition and HorizontalPostion properties. The acceptable range for these properties is [0,1].

次のコードスニペットに、実装方法を示します。

XAML
コード

C#	コードのコピー
private void OnLineMarkerPositionChanged(object sender, PositionChangedArgs e) { if (flexChart != null) { var info = flexChart.HitTest(e.Position); int pointIndex = info.PointIndex; var tb = new TextBlock(); tb.Inlines.Add(new Run() { Text = info.X.ToString() }); for (int index = 0; index < flexChart.Series.Count; index++) { var series = flexChart.Series[index]; var value = series.GetValues(0)[pointIndex]; var fill = (int)((IChart)flexChart).GetColor(index); string content = string.Format("{0}{1} = {2}", "\n", series.SeriesName, value.ToString()); tb.Inlines.Add(new Run() { Text = content, Foreground = new SolidColorBrush() { Color = FromArgb(fill) } }); } lineMarker.Content = tb; } }

コードのコピー

private void OnLineMarkerPositionChanged(object sender, PositionChangedArgs e)
{
    if (flexChart != null)
    {
        var info = flexChart.HitTest(e.Position);
        int pointIndex = info.PointIndex;
        var tb = new TextBlock();
        tb.Inlines.Add(new Run()
        {
            Text = info.X.ToString()
        });
        for (int index = 0; index < flexChart.Series.Count; index++)
        {
            var series = flexChart.Series[index];
            var value = series.GetValues(0)[pointIndex];
            var fill = (int)((IChart)flexChart).GetColor(index);
            string content = string.Format("{0}{1} = {2}", "\n", 
            series.SeriesName, value.ToString());
            tb.Inlines.Add(new Run()
            {
                Text = content,
                Foreground = new SolidColorBrush() { Color = FromArgb(fill) }
            });
        }
        lineMarker.Content = tb;
    }
}

VB	コードのコピー
Private Sub OnLineMarkerPositionChanged(sender As Object, e As PositionChangedArgs) If flexChart IsNot Nothing Then Dim info = flexChart.HitTest(e.Position) Dim pointIndex As Integer = info.PointIndex Dim tb = New TextBlock() tb.Inlines.Add(New Run() With { .Text = info.X.ToString() }) For index As Integer = 0 To flexChart.Series.Count - 1 Dim series = flexChart.Series(index) Dim value = series.GetValues(0)(pointIndex) Dim fill = CInt(DirectCast(flexChart, IChart).GetColor(index)) Dim content As String = String.Format("{0}{1} = {2}", vbLf, series.SeriesName, value.ToString()) tb.Inlines.Add(New Run() With { .Text = content, .Foreground = New SolidColorBrush() With { .Color = FromArgb(fill) } }) Next lineMarker.Content = tb End If End Sub

コードのコピー

    Private Sub OnLineMarkerPositionChanged(sender As Object, e As PositionChangedArgs)
        If flexChart IsNot Nothing Then
            Dim info = flexChart.HitTest(e.Position)
            Dim pointIndex As Integer = info.PointIndex
            Dim tb = New TextBlock()
            tb.Inlines.Add(New Run() With {
                .Text = info.X.ToString()
            })
            For index As Integer = 0 To flexChart.Series.Count - 1
                Dim series = flexChart.Series(index)
                Dim value = series.GetValues(0)(pointIndex)
                Dim fill = CInt(DirectCast(flexChart, IChart).GetColor(index))
                Dim content As String = String.Format("{0}{1} = {2}", 
vbLf, series.SeriesName, value.ToString())
                tb.Inlines.Add(New Run() With {
                    .Text = content,
                    .Foreground = New SolidColorBrush() With {
                    .Color = FromArgb(fill)
                    }
                })
            Next
            lineMarker.Content = tb
        End If
    End Sub