Código Delphi [-] sl := TStringList.Create; sl.LoadFromFile('c:\archivo.txt'); sl.Delimiter := ' '; sl.DelimitedText := sl.Text; for i := 0 to sl.Count - 1 do Memo1.Lines.Add(sl[i]); sl.Free;
sl := TStringList.Create; sl.LoadFromFile('c:\archivo.txt'); sl.Delimiter := ' '; sl.DelimitedText := sl.Text; for i := 0 to sl.Count - 1 do Memo1.Lines.Add(sl[i]); sl.Free;