anchor.diff:      FUpdateInterval: Cardinal;
       FEnabled: Boolean;
       FPriorInstanceRunning: Boolean;
  +    {$ifdef PollIPCMessage}
  +    Timer: TTimer;
  +    {$endif}
       procedure ReceiveMessage(Sender: TObject);
       {$ifdef PollIPCMessage}
       procedure CheckMessage(Sender: TObject);
       {$endif}
     public
       constructor Create(AOwner: TComponent); override;
  +    destructor Destroy; override;
       property PriorInstanceRunning: Boolean read FPriorInstanceRunning;
       procedure Loaded(const AParams: array of string); reintroduce; //Alexey
     published
  
positive.code: procedure TUniqueInstance.Loaded(const AParams: array of string);
  var
    IPCClient: TSimpleIPCClient;
    {$ifdef PollIPCMessage}
    Timer: TTimer;
    {$endif}
  begin
    if not (csDesigning in ComponentState) and FEnabled then
    begin
  
negative.code:       //there's no more need for IPCClient
        IPCClient.Destroy;
        {$ifdef PollIPCMessage}
        if Assigned(FOnOtherInstance) and (Timer=nil) then
        begin
          Timer := TTimer.Create(Self);
          Timer.Interval := FUpdateInterval;
  