Bei uns sieht das Bindung z.B. so aus:
Delphi-Quellcode:
procedure TConstructGroupFrameEvalDirection.BindControls();
var
evalDirection: IEvalDirectionViewModel;
begin
...
//---- element id
edDirElementId.Bindings.New(evalDirection.ElementId, BindingModeET.Bidirectional, true);
//---- value
vfDirection.Bindings.New(evalDirection.EvalDirection, BindingModeET.Bidirectional);
end;
Dabei sind edDirElementId und vfDirection Controls.
@Rollo: klar darf jeder machen was er will, nur soll er das dann nicht MVVM nennen.
Noch was: inzwischen sehen wir das MVVM zumindest für Delphi recht kritisch. Wenn wir von vorne anfangen müüsten würden wir das wohl nicht mehr verwenden.