Error Ejemplo Chat en Indy tcp (server & socket)

[Clantt]

Hola me da mucho gusto que me ayudaras, aún no lo probé pero se que funcionará. Como dije al principio estoy aprendiendo los componentes Indy y bueno en este código hay algunas cosas que no entiendo.

Empezado por m@kio

Código Delphi [-]
//Creo la clase TMsj
 TMsj = class(TThread)
      protected
        procedure Execute; override;
      end;
    
    var
      //Declaramos una variable del tipo TMsj
      ChecarMsj:TMsj;
    
    //Procedimiento de la clase ¿Cuando se lo llama, ó Donde lo llamamos?
    procedure Tmsj.Execute;
    var
      Msg : String;
    begin
     with form1 do
     begin
      if not IdTCPClient1.Connected then
        exit;
    
      Msg := IdTCPClient1.ReadLn('');
    
      if Msg <> '' then
        if Msg[1] <> '@' then
          begin
          { Not a system command }
            memLines.Lines.Add(Msg);
          end
     end;
    end;
    
    //Creamos un objeto de la clase TMsj
    procedure TForm1.Timer1Timer(Sender: TObject);
    begin
 //¿Por que creamos al objeto con un parámetro booleano?
    ChecarMsj:=TMsj.Create(false);
    end;
 
 //¿dónde llamamos a Execute?