コンソールウインドウのようなテキストが流れるウインドウの作成

Question

質問させてください。
コンソール画面(ターミナル画面)のような、テキスト文字を出力する度にスクロールするウインドウを作成したいと思っています。
ある程度まではスクロールバーで過去の情報も表示しつつ、全てをTextBoxで保持するとメモリを消費し過ぎるので、どこかで最近の情報だけに
したいと思います。
バッファが溜まれば削除以外に何か良い方法はありますか？

開発環境：Visual Studio 2017 (WPF)
動作環境：Windows10

Answer 1

以下の記事が参考になると思います。

記事
WPF で PowerShell コンソールを作る

記事の中で紹介されているサンプルコード
WPF で Windows PowerShell コンソールを再現します。

Comments

[juntaro]

こういった本格的なPowerShellの出し方もあるんですね。
ご親切にサンプルもありがとうございます。
一度、検証してみます。

Answer 2

たとえばこんな感じに ListBox と ObservableCollection<string> をバインドし、ObservableCollection の方にリミットをつけておけばいいのではないかと。

using System;
using System.Collections.Generic;
using System.Collections.ObjectModel;
using System.ComponentModel;
using System.Runtime.CompilerServices;
using System.Windows.Input;

namespace WpfApp1
{
	public class ViewModel : INotifyPropertyChanged
	{
		public ViewModel()
		{
			EnterCommand = new ActionCommand(() => List.Add(CommandLine));
		}

		public event PropertyChangedEventHandler PropertyChanged;

		protected virtual void OnPropertyChanged([CallerMemberName]string propertyName = null)
		{
			PropertyChanged?.Invoke(this, new PropertyChangedEventArgs(propertyName));
		}

		protected bool SetProperty<T>(ref T field, T value, [CallerMemberName]string propertyName = null)
		{
			if (EqualityComparer<T>.Default.Equals(field, value)) return false;
			field = value;
			OnPropertyChanged(propertyName);
			return true;
		}

		private string commandLine;
		public string CommandLine
		{
			get => commandLine;
			set => SetProperty(ref commandLine, value);
		}

		private ActionCommand enterCommand;
		public ActionCommand EnterCommand
		{
			get => enterCommand;
			set => SetProperty(ref enterCommand, value);
		}

		public OverflowableList List { get; } = new OverflowableList();
	}

	public class ActionCommand : ICommand
	{
		public ActionCommand(Action action)
		{
			Action = action;
		}

		public Action Action { get; private set; }

		public bool CanExecute(object parameter)
		{
			return true;
		}

		public void Execute(object parameter)
		{
			Action();
		}

		public event EventHandler CanExecuteChanged;
	}

	public class OverflowableList : ObservableCollection<string>
	{
		protected bool SetProperty<T>(ref T field, T value, [CallerMemberName]string propertyName = null)
		{
			if (EqualityComparer<T>.Default.Equals(field, value)) return false;
			field = value;
			OnPropertyChanged(new PropertyChangedEventArgs(propertyName));
			return true;
		}

		protected virtual void Shrink()
		{
			while (Limit < Count) RemoveAt(0);
		}

		private int limit = 10;
		public int Limit
		{
			get => limit;
			set
			{
				if (SetProperty(ref limit, value))
				{
					Shrink();
				}
			}
		}

		protected override void InsertItem(int index, string item)
		{
			base.InsertItem(index, item);
			Shrink();
		}
	}
}

<Window x:Class="WpfApp1.MainWindow"
        xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
        xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
        xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
        xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
        xmlns:local="clr-namespace:WpfApp1"
        mc:Ignorable="d"
        Title="MainWindow" Height="450" Width="800">
    <Window.DataContext>
        <local:ViewModel/>
    </Window.DataContext>
    <Grid>
        <Grid.RowDefinitions>
            <RowDefinition/>
            <RowDefinition Height="Auto"/>
        </Grid.RowDefinitions>
        <ListBox Grid.Row="0" ItemsSource="{Binding List}" ScrollViewer.HorizontalScrollBarVisibility="Disabled">
            <ListBox.ItemTemplate>
                <DataTemplate>
                    <TextBlock TextWrapping="Wrap" Text="{Binding}"/>
                </DataTemplate>
            </ListBox.ItemTemplate>
        </ListBox>
        <Grid Grid.Row="1">
            <Grid.ColumnDefinitions>
                <ColumnDefinition/>
                <ColumnDefinition Width="Auto"/>
            </Grid.ColumnDefinitions>
            <TextBox Grid.Column="0" Text="{Binding CommandLine}"/>
            <Button Grid.Column="1" Command="{Binding EnterCommand}">Click</Button>
        </Grid>
    </Grid>
</Window>

Comments

[juntaro]

長いサンプルまでありがとうございます。
大変、参考になりました。
長いけどシンプルな内容ですね。
順番をスワップするのではなく、RemoveAtを使用するという所が興味深いですね。
本当にありがとうございます。

[juntaro]

長いサンプルまでありがとうございます。
大変、参考になりました。
長いけどシンプルな内容ですね。
順番をスワップするのではなく、RemoveAtを使用するという所が興味深いですね。
本当にありがとうございます。

Answer 3

循環バッファ とか リングバッファ とか呼ばれるものが向いていると思います。

Comments

[juntaro]

循環バッファですね。
早急のご回答ありがとうございます。初耳でした。
これからじっくり調べてみます。

Answer 4

WindowsFormでやってる方法ですが（WPFでできるかどうかはわかりませんが）
TextBoxで追記していって、ある程度溜まった場合に（数M文字）、先頭からその容量の半分程度を削除して最終行にスクロールし直す、ということをやってます

・textbox.Selectで先頭から削除する容量まで選択
・textbox にDELキー送出
・最終行にカーソル移動
・textbox.ScrollCaretでスクロール

これでわりと違和感なく表示できてます

＃他にいい方法があれば私も知りたいところです

Comments

[juntaro]

具体的なご説明ありがとうございます。
何となく考えていた実現方法に近いです。
もっと良い方法があれば良いと私も考えています。

Answer 5

http://www.woodensoldier.info/computer/csharptips/125.htm

textBox1.AppendText(message + "\r\n");

textBoxを使うなら、
AppendTextが最強なので、適当なタイミングで、消すをやればいいと思う。
TextのBindingでやると、遅い。全部のテキストを書き換えようとするからね。
差分書き換えみたいなことをできないといけない。
循環バッファ は、みたいな機構は、やりたいけど、専用のコントロールが必要そう。

Comments

[juntaro]

さすがに全てを更新すると遅いですよね。
色々と試してみて早いものを採用しようと思います。
ありがとうございました。

Answer 6

時間が経ちましたが、テストの結果、処理時間とシンプル性を考慮しまして、AppendTextで追加し、設定値より大きいサイズになった場合は半分程度に減らす処理としました。
ありがとうございました。

Answer 7

様々なご回答、本当にありがとうございました。
一度、全ての手法を試してみて、最適な方法を取りたいと思います。
自分では思いつかないようなロジック、大変助かりました。
ありがとうございます。