Source position: db.pas line 406
protected procedure TField.SetParentField(
AField: TObjectField
); virtual;