TBrookAction: added the "Writes(AObject: TObject);" method.