XE5: Probleme mit LiveBindings "CheckedState(Self)"

[jus]

Sorry, dass ich einen alten Thread wieder rauskrame, aber in Moment beschäftige ich mich mit MVVM und bin zufällig über das geniale Beispiel von Sir Rufo gestoplert. Meine Frage ist, kann man eigentlich sagen, dass die folgenden zwei Methoden eigentlich schon die konkrete Implementierung von ViewModel sind?

Zitat von Sir Rufo:

Delphi-Quellcode:

unit ViewFormMain;

...

  procedure TMainFormView.DoLoadFromModel;
    begin
      // Binding Model => View
      CheckBox1.Checked := ViewModel.Value;
      Edit1.Enabled     := not ViewModel.Value;
      Edit2.Enabled     := not ViewModel.Value;
      Edit3.Enabled     := not ViewModel.Value;
    end;

  procedure TMainFormView.DoSaveToModel;
    begin
      // Binding View => Model
      ViewModel.Value := CheckBox1.Checked;
    end;

...

end.

Lg,
jus