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?
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