¿como parsear texto?

[[Al González]]

Hola Ángel.

Suponiendo que el contenido del archivo sea uniforme, es decir, que a partir de la línea 0 y cada tres líneas el texto a encontrar lleve siempre antepuesta la subcadena de 13 caracteres 'descripcion: ', el siguiente código te servirá:

Código Delphi [-]
Var
  I :Integer;
begin
  { L1 es un TStringList con el contenido del archivo y L2 un TStringList
    vacío donde se guardará el resultado }

  I := 0;

  While I < L1.Count Do
  Begin
    L2.Add (Copy (L1 [i], 14, MaxInt));
    Inc (I, 3);
  End;
end;

En caso de que el contenido del archivo sea más variado, convendría que nos dieras otros ejemplos del mismo para idear una mejor forma de realizar el análisis sintáctico ("parseo") que necesitas.

Saludos.

Al González.

[JXJ]

no es uniforme... este problema me ha inspirado en hacer
mi lenguaje de programacion tijp php. asp.

pero con syntaxis delphi.

[Fuera del tema]
Conoce mi bitácora. ■ Solicito empleo fuera de México.
¿a que pais te quieres ir?

[[Al González]]

Empezado por JXJ

no es uniforme... este problema me ha inspirado en hacer
mi lenguaje de programacion tijp php. asp.

pero con syntaxis delphi.

Si el contenido del archivo no es uniforme, antes de otra cosa convendría conocer varios ejemplos de cómo pueden ser esos archivos, con el fin de determinar un patrón común. Una vez hecho esto, se podrá comenzar a desarrollar una rutina más elaborada que extraiga las partes deseadas del texto.

Empezado por JXJ

[Fuera del tema]
Conoce mi bitácora. ■ Solicito empleo fuera de México.
¿a que pais te quieres ir?

Estoy a la espera de propuestas sin mayores distinciones por el momento. Como van las cosas en México, cada vez hay más países con entornos que facilitan una mayor calidad de vida. Me quedaría si mi concepto de patria no fuera el planeta entero, tuviera mucho arraigo local o no hubiera soñado de pequeño con vivir en otra nación. Cierro el off topic.