SoloCodigo

Programación General => Pascal => Mensaje iniciado por: Saiyan1 en Martes 26 de Septiembre de 2006, 02:51

Título: Tomar Datos De Un Archivo
Publicado por: Saiyan1 en Martes 26 de Septiembre de 2006, 02:51
Como van?

en este caso para el ahorcado... como puedo hacer para que un programa (pascal) tome al azar palabras de un archivo (ej: un .txt)? Se que se puede.. pero no se como...  :alien:

Gracias desde ya...!

O como se llama el procedimiento asi busco..  ;)


Saludoss
Título: Re: Tomar Datos De Un Archivo
Publicado por: Enko en Martes 26 de Septiembre de 2006, 03:17
Crear el archivo de texto:
Código: Text
  1.  
  2. var
  3.    F: TEXT;
  4.  
  5.  

Asignarlo y abrirlo:
Código: Text
  1.  
  2. Assign(F, 'NombreArchivo.txt');
  3. Reset(F); {lo abres desde el principio}
  4.  
  5.  
lees todo el archivo y lo muestras en la pantalla;
Código: Text
  1.  
  2. while not EOF(F) do
  3. begin
  4.    ReadLn(F, Cadena);
  5.   WriteLN(Cadena);
  6. end;
  7.  
  8.  
Título: Re: Tomar Datos De Un Archivo
Publicado por: Saiyan1 en Martes 26 de Septiembre de 2006, 12:14
Ah OK, muchas gracias, lo pruebo y te digo.

Saludos!