unit Fcl.Observer; {$DEFINE FPC_DOTTEDUNITS} {$i fpobserver.pp}