よく知られている Command パターンは、元に戻す/やり直し機能を備えたモデルを実装する場合によく使用されます。元に戻す/やり直しを実装する単純な Delphi フォームの参照実装 (例) を探しています。
私が見た限りでは、3 つの編集ボックス、6 つのメモ ボックス、およびいくつかのコンボ ボックスとその他の単純な編集コントロールを備えた単純な Delphi データ入力フォームは、通常、元に戻す/やり直しをサポートしていません。
別の Delphi ビュー (フォーム) とモデル オブジェクト (データ オブジェクトはフォームへのすべての編集と同期して更新される検証および制御ロジックは、フォームやモデルに組み込まれるのではなく、分離されます。
MVC を使用する必要がなく、モデル オブジェクトやコントローラー オブジェクトを持たない Delphi デモ アプリのプロトタイプを作成するだけでよい場合、純粋で単純な Delphi の元に戻す/やり直しは「1 つのフォームが私のもの」 -app" の方が設計は簡単ですが、オブジェクトを記録して再生し、それらを TEdit.OnChange などの Delphi フォーム アクションに同期する必要があるため、より複雑になります。