mi problema puede que a alguno le parezca elemental pero soy novato y llevo mucho rompiendome la cabeza intentando solucionarlo .
Cree un programa para practicar que simplemente copiaria una cifra de un archivo de texto a otro, bien el programa es es
program copiar (output,datossal,datosent);
var
datosent,datossa:text;
A:integer;
begin
reset(datosent);
rewrite(datossal);
read(datosent,A);
write(datossal,B);
end.
el programa compila y todo, el problema no hace nada, no copia el dato tengo tanto el ejecutable como los archivos en la carpeta C:\FPC\2.2.2\bin .En la opcion directories pestaña libreries e indicado esta ruta pero nada no hay manera el programa no hace nada de nada
Problema con la lectura y escrituera de text (freepascal)
Comenzado por
gabito
, oct 17 2010 08:30
3 respuestas en este tema
#1
Escrito 17 octubre 2010 - 08:30
#2
Escrito 17 octubre 2010 - 08:43
Hola gabito, bienvenido a DelphiAccess
Checa ésta página para que veas como se manipulan los archivos de texto.
Salud OS
Checa ésta página para que veas como se manipulan los archivos de texto.
Salud OS
#3
Escrito 17 octubre 2010 - 08:59
sigo sin entenderlo,
yo e seguido paso a paso las instrucciones de mi kibro de pascal, los archivos se llaman tal como pongo en el programa y estan junto al ejecutable, ademas antes de compilar en la comfiguracions options/directories/libreries indico la ruta, porque no copi los datos de un archivo a otro?
yo e seguido paso a paso las instrucciones de mi kibro de pascal, los archivos se llaman tal como pongo en el programa y estan junto al ejecutable, ademas antes de compilar en la comfiguracions options/directories/libreries indico la ruta, porque no copi los datos de un archivo a otro?
#4
Escrito 17 octubre 2010 - 09:21
Este es el esquema genérico de lectura y escritura de archivos, verificalo contra lo que tu tienes.
1. Asignas Archivos
2. Abres archivo A
3. Lees Archivo A (aquí es donde no entiendo muy bien algo, ¿ solo tienes un dato en el archivo A ?)
4. Creas el archivo B
5. Escribes en el archivo B
6. Cierras Archivo A y Archivo B
Salud OS
1. Asignas Archivos
delphi
AssignFile(datosent, 'archivo A'); AssignFile(datossal, 'archivo B');
2. Abres archivo A
delphi
Reset(datosent);
3. Lees Archivo A (aquí es donde no entiendo muy bien algo, ¿ solo tienes un dato en el archivo A ?)
delphi
Read(datosent,A);
4. Creas el archivo B
delphi
ReWrite(datossal);
5. Escribes en el archivo B
delphi
Write(datossal,A);
6. Cierras Archivo A y Archivo B
delphi
CloseFile(datossal); CloseFile(datosent);
Salud OS