Mover o ponteiro do registro em um arquivo texto.
Alguem sabe como mover o ponteiro de registro em um arquivos txt!!
Gostaria de ler as informações do arquivo txt do apartir do ultimo registro e voltando até o primeiro registro.
Alguem lembra disto
Type arq=Record
variavel: string[13]
end;
var
Prod:File of Arq;
Assingn(Arq,´c:\teste.txt´);
Read(Arq);
Prod.variavel:=´fulano´;
write(arq);
Aqui estou gravando no promeiro registro...Tudo bem, agora imagine que o banco de dados esta com 100 registros, eu gostaria de mover o ponteiro do registro para o ultimo registro e voltar com o ponteiro até o primeiro registro, tem um comando ...FilePos???...Eu não lembro alguem é da antiga, que saiba como fazer isto?
Gostaria de ler as informações do arquivo txt do apartir do ultimo registro e voltando até o primeiro registro.
Alguem lembra disto
Type arq=Record
variavel: string[13]
end;
var
Prod:File of Arq;
Assingn(Arq,´c:\teste.txt´);
Read(Arq);
Prod.variavel:=´fulano´;
write(arq);
Aqui estou gravando no promeiro registro...Tudo bem, agora imagine que o banco de dados esta com 100 registros, eu gostaria de mover o ponteiro do registro para o ultimo registro e voltar com o ponteiro até o primeiro registro, tem um comando ...FilePos???...Eu não lembro alguem é da antiga, que saiba como fazer isto?
Host
Curtidas 0