Arquivos textos text Manipulao de Arquivos em PASCAL

Arquivos textos (text)

Manipulação de Arquivos em PASCAL 1. Tipos de arquivos: Texto Binário 1. 1. Arquivos Texto (Text) Um arquivo texto contém informações no formato ASCII, podendo ser manipulados com editores de texto.

Definição de um arquivo texto: Var identificador : Text; onde: identificador é o nome da variável a ser utilizada no programa para identificar um arquivo; Text é uma palavra reservada do Pascal para identificar arquivos do tipo texto (File of Char). Ex: Var arq: Text; {A variável arq será utilizada para acesso a um arquivo ASCII}

Os comandos do Pascal Assign, Reset, Rewrite e Close são utilizados da mesma forma tanto para arquivos texto quanto para arquivos binários. Assign é utilizado para associar uma variável do tipo Text (arquivo texto) à um arquivo existente ou não em um determinado disco. Reset é utilizado para abrir o arquivo para leitura, Rewrite é utilizado para abrir o arquivo para escrita (destruindo seu conteúdo, caso exista), e Close é utilizado para fechar um arquivo aberto com Reset ou Rewrite.

Para abrir um arquivo texto é necessário, previamente, associar a sua variável do tipo Text com o nome de um arquivo físico reconhecido ou não pelo sistema operacional. Essa associação, conforme colocado anteriormente, é realizada com o procedimento Assign.

Sintaxe: Assign (<variável do tipo FILE (ou Text)>, string identificando o nome do arquivo a ser utilizado). Ex: Assign (arq, 'Autoexec. bat'); {Associa à variável arq um arquivo denominado Autoexec. bat} Após utilizar o Assign é preciso tornar o arquivo utilizável pelo programa. Essa operação é realizada com o uso dos procedimentos Reset ou Rewrite. É importante ressaltar que Reset só pode ser utilizado com arquivos já existentes.

Sintaxe: Reset (<variável do tipo FILE (ou Text)>); Ex: Reset (arq); {Abre o arquivo associado à variável arq para leitura} Sintaxe: Rewrite (<variável do tipo FILE (ou Text)>); Ex: Rewrite (arq); {Abre o arquivo associado à variável arq para escrita}

Para escrever informações em um arquivo são utilizados os comandos do Pascal Write e Writeln. Para leitura de informações de um arquivo são utilizados os comandos Read e Readln. Os comandos Read e Readln funcionam de forma semelhante para leitura. Sempre que um desses comandos for utilizado para acesso a arquivos, deve ser utilizado como primeiro argumento a variável associada ao arquivo comando Assign.

Sintaxe: Write (<variável do tipo FILE (ou Text)>, variável ou constante a ser escrita no arquivo); Ex: Write (arq, 'Teste de escrita'); {Escreve a string 'Teste de escrita' no arquivo associado à variável arq. Para isso o arquivo arq deve ter sido aberto para escrita} Sintaxe: Read (<variável do tipo FILE (ou Text)>, variável que receberá o dado a ser lido do arquivo); Ex: Read (arq, buffer); {Obtém dados do arquivo identificado por arq e coloca em buffer}

INSTRUÇÃO TIPO SINTAXE DESCRIÇÃO ASSIGN Procedure Assign (<variável>, <arquivo>) Associa um nome lógico de arquivo interno ao programa, a um nome físico. Variável é o nome da variável do tipo arquivo que contém o nome interno do arquivo, e <arquivo> é o nome do arquivo a ser manipulado. REWRITE Procedure Rewrite(<variável>) Cria um arquivo utilizando o nome que estiver no parâmetro ou na variável <variável>. Caso o arquivo já exista, ele será apagado e criado novamente vazio. RESET Procedure Reset(<variável>) Abre um arquivo existente para uso para escrita e leitura pelo programa utilizando o nome que estiver na <variável> WRITE Procedure Write(<variável>, <dado>) Escreve a informação <dado> no arquivo indicado pelo <variável>) READ Procedure Read(<variável>, <dado>) Lê a informação <dado> no arquivo chamado <variável> SEEK Procedure Seek(<variável>, <num_reg>) Procura no arquivo <variável> o registro de posição número <num_reg> e posiciona o ponteiro de leitura no inicio deste registro FILEPOS Função Filepos(<variável>) Retorna o número da posição do registro atual do arquivo em uso CLOSE Procedure Close(<variável>) Fecha o arquivo chamado <variável> que está sendo usado pelo programa. Nenhum programa deve ser encerrado antes de fechar todos os arquivos que estiver utilizando