Ver Mensaje Individual
  #2  
Antiguo 25-11-2009
[coso] coso is offline
Miembro Premium
 
Registrado: may 2008
Ubicación: Girona
Posts: 1.678
Reputación: 0
coso Va por buen camino
Hola,

prueba esto

Código Delphi [-]
var
   s1,s2 : TStringList;
   i : integer;
begin
   s1 := TStringList.Create;
   s1.LoadFromFile('c:\archivo.txt');
 
   s2 := TStringList.Create;
   s2.CommaText := s1.Text;
 
   for i := 0 to s2.Count - 1 do ShowMessage(s2[i]);
end;

Lo hago de cabeza. La idea es cargar en commatext el archivo, y el stringlist ya separa los elementos automaticamente. Un saludo.
Responder Con Cita