SoloCodigo

Hola!!  
De antemano gracias por la ayuda que me puedan prestar... sigo trabajando con archivos planos.. pero ahora mi duda es la siguiente..  Debo calcular el numero de lineas que tiene el archivo asi que lo hago con un ciclo:

lineas:=0;
  while not eof (ArchivoTemp) do begin
     readln (ArchivoTemp);
     lineas:=lineas+1;
  end;
Esto lo hago porque con el numero de lineas del archivo le asigno el tamaño a una matriz.. bien ahora necesito volver a recorrer el archivo para leer la información así que debo posicionarme al comienzo del archivo nuevamente.. entonces coloco:
Seek(ArchivoTemp,0);
pero me sale un error que dice:
 [Error] Unit2.pas(132): Incompatible types
y ya no se que pueda ser..
Podría alguien ayudarme con ello??..
Mil gracias.. Bye...

Muchas Gracias por tu ayuda, la verdad no tenía ni idea que la función Seek no se pudiera utilizar en archivos de Texto...  Lo arreglé así como me sugeriste cerrando el archivo y volviendolo a abrir....
Gracias nuevamente...