L’attributo BindFieldTo, posto prima della definizione della classe o prima della definizione di un campo di tipo TObject o record, indica che il valore di un campo della classe o del campo definito dalla proprietà SourcePath dovrà essere propagato a un elemento definito dalla properietà TargetPath, appartenente a una seconda classe il cui nome corrisponde alla proprietà TargetClassName.
In pratica, ogni cambiamento dell’elemento della classe source sarà propagato all’elemento della classe target.
Vedi FieldBind.
In questo esempio, i valori di frmBindApiSimpleDemo.speValue.Value e di testController.TestObject.IntProp sono collegati in maniera monodirezionale: se il primo cambia, il secondo assume il nuovo valore; se il secondo cambia, il primo resta immutato.
type
[ClassBind(True, 'TTestController')]
TfrmBindApiSimpleDemo = class(TForm)
[BindFieldTo('Value', 'TestObject.IntProp')]
speValue: TSpinEdit;
private
...
end; Alternativa:
type
[ClassBind(True, 'TTestController')]
[BindFieldTo(speValue.'Value', 'TestObject.IntProp')]
TfrmBindApiSimpleDemo = class(TForm)
speValue: TSpinEdit;
private
...
end; Articoli più recenti: