Problema con POP3 INDY

[steelha]

Gracias por contestar, inmediatamente probare

[steelha]

Edwardfeliz, gracias por el tip ya probé y por lo menos me dice total correo = 0 total size =0. Ya es algo seguiré viendo a ver que puede ser

[Edwardfeliz]

Empezado por steelha

Edwardfeliz, gracias por el tip ya probé y por lo menos me dice total correo = 0 total size =0. Ya es algo seguiré viendo a ver que puede ser

Solo avisa, aqui hay mucha gente dispuesta a ayudar.

Saludos!

[Edwardfeliz]

Chequea aqui a ver si resuelves algo:
Leyendo Correos


Saludos!

[steelha]

acabo de actualizar a indy 10 segun un articulo que lei y ahora es que tengo problema vere como voy soluccionando poco a poco

[steelha]

A ver si me ayudan aca me da error de '.' expected but ) found :

Código Delphi [-]
                               if (Msg.MessageParts.Items[J] is IdAttachment) then  //en esa linea me da este error no veo el problema
                               else
                                   // begin
                                      // for K := 0 to 1 do
                                         // begin
                                                 if Msg.MessageParts.Items[J] is IdText then
                                                    begin
                                                         Memo1.Lines.AddStrings(TIdText( Msg.MessageParts.Items[J]).Body);
                                                         BodyS.AddStrings( TIdText( Msg.MessageParts.Items[ J ]).Body );
                                                    end;
                          end;

[Edwardfeliz]

Empezado por steelha

A ver si me ayudan aca me da error de '.' expected but ) found :

Código Delphi [-]
                               if (Msg.MessageParts.Items[J] is IdAttachment) then  //en esa linea me da este error no veo el problema
                               else
                                   // begin
                                      // for K := 0 to 1 do
                                         // begin
                                                 if Msg.MessageParts.Items[J] is IdText then
                                                    begin
                                                         Memo1.Lines.AddStrings(TIdText( Msg.MessageParts.Items[J]).Body);
                                                         BodyS.AddStrings( TIdText( Msg.MessageParts.Items[ J ]).Body );
                                                    end;
                          end;

Yo lo probe y a mi no me dio ese problema, aunque tube que cambiar IdAttachment por TIdAttachment y IdText por TIdText en esa linea no esta el problema, muestra el código superior para poder visualizar el problema.

Saludos!