Como leer un txt?

[pablopessoa]

Saludos gente del foro!
Se que esto deberia ser facil.. pero me estoy enroscando y no me sale :S
Lo que pretendo hacer es leer un archivo txt y encontrar una linea en particular (la linea es : // MARCAS)
la idea es encontrar esa linea para agregarle datos que tengo en una consulta en la aplicacion ( latitudes y longitudes para crear un mapa de Gmaps)
Hasta ahora cargo el txt en un TStringList.. pero no se como recorrer las lineas para encontrar esa en particular ( // Marcas) y a partir de ahi agregar los datos que tengo.
Luego lo guardaria como un html y lo cargo en un TwebBrowser.
Si alguno me puede tirar una luz lo agradeceria mucho.
Saludos!!

[*Caro*]

Hola pablopessoa, ¿desde que parte tienes problemas?, debes recorrer tu TStringList, cada línea se te cargara en cada posición de tu StringList, buscas "Marcas" con la función Pos.

Código Delphi [-]
 for i:=0 to sl.Count-1 do
  begin
    if Pos('Marcas', sl[i])>0 then
     begin
       shomessage('Se ha encontrado en la línea'+IntToStr(i));
       break;
     end;
  end;

Saluditos

[pablopessoa]

Genial! muchas gracias !!
Desconocia esa forma de usar el pos. Pero ahora que puedo encontrar la linea, para insertarle nuevas lineas uso algo como "sl.add('Linea Nueva')" ??
Saludos Caro y gracias por la respuesta tan veloz !!

[*Caro*]

Empezado por pablopessoa

Pero ahora que puedo encontrar la linea, para insertarle nuevas lineas uso algo como "sl.add('Linea Nueva')" ??

Hola de nuevo, si quieres añadir líneas debes hacerlo con Add, pero eso te añadira al final de tu lista, si quisieras en la línea siguiente a la que has encontrado o en cualquier posición, puedes utilizar insert:

Código Delphi [-]
  sl.Insert(LineaEncontrada, 'nueva línea');//donde LineaEncontrada es un Integer

Saluditos

[pablopessoa]

Simplemente... muchisimas gracias!!!!