leitura de caracteres
11/02/2003
0
Mais ou menos como a função fgetc em C.
Anonymous
Posts
11/02/2003
Nildo
11/02/2003
Anonymous
11/02/2003
Nildo
O arquivo que voce vai ler pode contér #0 no meio ? (arquivos compilados)
11/02/2003
Navoid
*********
procedure learquivo;
var
arquivo: textfile;
caracter: array[1..1024] of char;
i: integer;
begin
assignfile(arquivo, ´arquivo_a_serlido´);
reset(arquivo);
try
while not eof(arquivo) do
begin
for i:= 1 to 1024 do
begin
read(arquivo, caracter[i]);
end;
// aqui voce processa os caracteres lidos
end;
finally
closefile(arquivo);
end;
end;
*********
espero ter ajudado
11/02/2003
Nildo
nem precisei terminar o código dele :wink:
Clique aqui para fazer login e interagir na Comunidade :)