anchor.diff:    FIdIRC.OnServerWelcome := nil;
     FIdIRC.OnRaw := nil;
     FIdIRC.OnQuit := nil;
  +  FIdIRC.OnTopic := nil;
   end;
   
   function TIRC.RemoveOPVoicePrefix(const Channel: string): string;
  
positive.code:   FIdIRC.OnServerWelcome := @OnWelcome;
    FIdIRC.OnRaw := @OnRaw;
    FIdIRC.OnQuit := @OnQuit;
  end;
  
  function TIRC.FormatMessage(const NickName, Message: string): string;
  
negative.code: begin
    FServerMessage := AMsg;
    TIdSync.SynchronizeMethod(@SendServerMessage);
  end;
  
  procedure TIRC.OnTopic(ASender: TIdContext; const ANickname, AHost, AChannel, ATopic: String);
  begin
    FChannel := AChannel;
    FMessage := ATopic + sLineBreak;
    TIdSync.SynchronizeMethod(@SendMessage);
  end;
  
  procedure TIRC.RemoveEvents;
  