Necesito ayuda con un stringlist...

[mauser1985]

Hola foro,
Si alguien pudiera ayudarme, la cuestion es que hice un programa usando stringlist paracargar y crear un archivo nuevo, bueno pues lo que me hace falta es como hacer para que la informacion que el stringlistcargue e imprima en el nuevo archivo se copie siguiendo un formato determinado, y tampoco se como añadirle lineas al nuevo archivo que se crea. Aqui esta la parte que usa el tstringlist..


begin
ls := TStringList.Create;
lg := TStringList.Create;
ls.LoadFromFile(nm);
ns := ExtractFilePath(Application.Exename) + '\' + Edit1.Text;
r := ls.Count;
i := 0;
n := 0;
while i < r do
if Pos('*Node',ls[i]) <> 0 then
begin
inc(i);
inc(n);
while (Pos('*Element',ls[i]) = 0) and (i < r) do
begin
lg.Add(ls[i]);
inc(i);
end;
lg.SavetoFile(ns + inttostr(n) + '.txt');
end
else inc(i);
ls.Free;
lg.Free;
end;


Pues bien copmo pueden ver dentro de los marcadores(Node y Element) esta la info que me urge pero necesito que esa info sea guardada en el nuevo archivo siguiendo un patron, ej. Nombre:.... Edad.... Coordenadas....

[[coso]]

donde pone

Código Delphi [-]
...
lg.Add(ls[i]);
...

pon, por ejemplo

Código Delphi [-]
...
lg.Add('Coordenadas ' + ls[i]);
...

el metodo .Add (lo de detras del punto) de TStringlist incluye una string (cadena de texto) dentro de ella, como si fuese una nueva linea. Esta string
puede ser la que quieras.