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?

[johncook]

/¿Por que creamos al objeto con un parámetro booleano?
ChecarMsj:=TMsj.Create(false);
end;

//¿dónde llamamos a Execute?

Cuando creas el hilo, le indicas al mismo como crearse... Si el parámetro es false (CreateSuspended), significa que el hilo ejecuta una vez creado.
Creo que eso también responde tu pregunta sobre "donde se invoca el método Execute?".
Saludos.

[Clantt]

Mil gracias ahora me voy a probarlo y bueno ademas ya se de donde leer sobre estos componetes. Con esto tengo trabajo hasta el fin de semana gracias a todos.