Saltar para o conteúdo

BlitzMax/Lições/Arquivo

Origem: Wikilivros, livros abertos por um mundo aberto.

Arquivo em computação é um conjunto de dados armazenado em uma memória rígida não volátil, ou seja que não se perde caso o programa seja encerrado. O BlitzMax tem vários comandos de manipulação de arquivo.

Criando um arquivo

[editar | editar código-fonte]

Você pode criar o seu próprio arquivo no BlitzMax através da função CreateFile, use como parâmetro a string com o nome e o local do arquivo que você deseja criar, caso você escreva apenas o nome do arquivo este será salvo na mesma pasta onde o seu projeto está.

novoArquivo=CreateFile("C:\Documents and Settings\Administrador\Desktop\Meu Arquivo.arq")

Abrindo um arquivo

[editar | editar código-fonte]

Com o seu arquivo criado agora iremos abrir o seu arquivo salvo, para isso vamos utilizar a função OpenFile com atributo o local do arquivo, a função irá retornar a variável arquivo. Vamos também criar um procedimento para verificar se foi possível abrir o arquivo.

meuArquivo = OpenFile("C:\Documents and Settings\Administrador\Desktop\Meu Arquivo.arq")
If Not meuArquivo
    Print "Nao foi possivel abrir o arquivo"
EndIf

Colocando uma informação em um arquivo

[editar | editar código-fonte]

Vimos como criar e abrir um arquivo, mas ele não contem nenhum bit de informação. Vamos escrever algo no arquivo através do comando WriteLine, colocando como parâmetro a variável do tipo arquivo e a informação a ser incluida.

meuArquivo = OpenFile("C:\Documents and Settings\Administrador\Desktop\Meu Arquivo.arq")
If Not meuArquivo
    Print "Nao foi possivel abrir o arquivo"
EndIf
WriteLine(meuArquivo, "ola mundo")

Com o bloco de notas você pode abrir o seu arquivo e ver a informação que você colocou nele.

Lendo uma informação de um arquivo

[editar | editar código-fonte]

Agora que você escreveu algo em seu arquivo vamos agora ler e exibir o conteudo dele na tela, para isso vamos usar a função ReadLine com o nome do arquivo como parâmetro, essa função irá retornar o conteudo inserido no arquivo.

meuArquivo = OpenFile("C:\Documents and Settings\Administrador\Desktop\Meu Arquivo.arq")
If Not meuArquivo
    Print "Nao foi possivel abrir o arquivo"
EndIf
Print ReadLine(meuArquivo)

Você também pode ler informações de outros tipos de arquivo com esse comando.

Colocando várias informações em um arquivo

[editar | editar código-fonte]

Vimos como colocar uma única informação no arquivo, agora vamos ver como colocar várias informações em um arquivo, um arquivo tem o tamanho ilimitado de bytes, ou melhor, tem o tamanho máximo que a memória rígida pode suportar.

meuArquivo = OpenFile("C:\Documents and Settings\Administrador\Desktop\Meu Arquivo.arq")
If Not meuArquivo
    Print "Nao foi possivel abrir o arquivo"
EndIf
WriteLine(meuArquivo, "Linha 1")
WriteLine(meuArquivo, "Linha 2")
WriteLine(meuArquivo, "Linha 3")

Lendo várias informações em um arquivo

[editar | editar código-fonte]

As informações em um arquivo são organizadas em linha, ou seja, cada linha ocupará um bloco dememória na leitura, veremos como fazer essa leitura.

meuArquivo = OpenFile("C:\Documents and Settings\Administrador\Desktop\Meu Arquivo.arq")
If Not meuArquivo
    Print "Nao foi possivel abrir o arquivo"
EndIf
Print ReadLine(meuArquivo)
Print ReadLine(meuArquivo)
Print ReadLine(meuArquivo)

Você deve ter notado que usamos o mesmo comando para ler todas as linhas do arquivo, em compensação você vê que foram exibidas informações diferentes, isso porque a cada leitura de bloco o stream que controla a leitura do arquivo passa automaticamente para a linha abaixo.