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

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...

Gracias desde ya...!

O como se llama el procedimiento asi busco..

Saludoss

Enko

Crear el archivo de texto:

Código: Text

 
var
   F: TEXT;

Asignarlo y abrirlo:

Código: Text

 
Assign(F, 'NombreArchivo.txt');
Reset(F); {lo abres desde el principio}

lees todo el archivo y lo muestras en la pantalla;

Código: Text

 
while not EOF(F) do
begin
   ReadLn(F, Cadena);
  WriteLN(Cadena);
end;
 
 

Saiyan1

Ah OK, muchas gracias, lo pruebo y te digo.

Saludos!

SoloCodigo

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

Saiyan1

Tomar Datos De Un Archivo

Enko

Re: Tomar Datos De Un Archivo

Saiyan1

Re: Tomar Datos De Un Archivo