[Delpho]

Muchas Gracias, ya encontre yo la funcion

i:=Pos(buscar,texto);

si i=0 es que no lo a enontrado, sino muestro la linea

Hasta Luego, y perdon por el nombre del hilo