Código
//Mas, é possível abrir-se qualquer tipo de arquivo com este comando.
//Por exemplo:
var
Arquivo : File;
begin
AssignFile(Arquivo,'Teste.Bin');
Reset(Arquivo,1);
end;
//Este codigo ira' abrir um arquivo binario, com tamanho de registro setado
//para 1 byte.
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009