Programación General > Pascal
Pregunto
Enko:
--- Citar --- Function Assigned (Var P) : Bolean;
Determina si un puntero o variable de tipo procedimiento es nil. Especifica si el argumento es nil o e el argumento tiene un valor.
--- Fin de la cita ---
Encontré el enlace que buscaba!!!!
este es, te va servir un monton.
http://ar.geocities.com/nrs_arg/pascalmania/t_varptr.htm
figox:
casi he completado el programa, si lo termino se los dare con todo gusto
y gracias por los apoyos
figox:
este es el programa, hasta hay se los dejo solo le falta el copiar el archivo y paserlo al nuevo.
program Leertexto;
uses
crt;
var
fichero :text;
caracter :char;
begin
Assign(fichero,'c:\code.dat');
Reset(fichero);
clrscr;
while not eof(fichero) do
begin
while not eoln(fichero) do
begin
Read(fichero, caracter);
Write(caracter)
end;
writeln;
Readln(fichero)
end;
close(fichero)
end.
Navegación
[*] Página Anterior
Ir a la versión completa