• Lunes 29 de Abril de 2024, 23:39
« anterior próximo »
Páginas: [1]

Autor Tema:  Tomar Datos De Un Archivo  (Leído 1468 veces)

Saiyan1

  • Miembro activo
  • **
  • Mensajes: 54
    • Ver Perfil
    • http://www.anaprog.com.ar
Tomar Datos De Un Archivo
« en: Martes 26 de Septiembre de 2006, 02:51 »
0
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
----------------------
Gustavo Insaurralde
Foro de Analista Programador

Enko

  • Miembro de PLATA
  • *****
  • Mensajes: 1562
  • Nacionalidad: 00
    • Ver Perfil
Re: Tomar Datos De Un Archivo
« Respuesta #1 en: Martes 26 de Septiembre de 2006, 03:17 »
0
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.  

Saiyan1

  • Miembro activo
  • **
  • Mensajes: 54
    • Ver Perfil
    • http://www.anaprog.com.ar
Re: Tomar Datos De Un Archivo
« Respuesta #2 en: Martes 26 de Septiembre de 2006, 12:14 »
0
Ah OK, muchas gracias, lo pruebo y te digo.

Saludos!
----------------------
Gustavo Insaurralde
Foro de Analista Programador
Páginas: [1]
« anterior próximo »