L’attributo BindFieldFrom, 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à ricevere il suo valore da 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 target sarà propagato all’elemento della classe source.
Vedi FieldBind.
In questo esempio, i valori di frmBindApiSimpleDemo.speValue.Value e di testController.TestObject.IntProp sono collegati in maniera monodirezionale: se il secondo cambia, il primo assume il nuovo valore; se il primo cambia, il secondo resta immutato.
type
[ClassBind(True, 'TTestController')]
TfrmBindApiSimpleDemo = class(TForm)
[BindFieldFrom('Value', 'TestObject.IntProp')]
speValue: TSpinEdit;
private
...
end; Alternativa:
type
[ClassBind(True, 'TTestController')]
[BindFieldFrom(speValue.'Value', 'TestObject.IntProp')]
TfrmBindApiSimpleDemo = class(TForm)
speValue: TSpinEdit;
private
...
end; Articoli più recenti: