 |
|
Você está aqui: Delphi ::: Dicas & Truques ::: Arquivos e Diretórios |
|||
Como usar a função BlockWrite() para escrever um ou mais bytes em um arquivoQuantidade de visualizações: 10914 vezes |
|||
|
A função BlockWrite pode ser usada quando precisamos escrever um ou mais bytes em um arquivo não tipado, ou seja, um arquivo de tipo arbitrário não texto. Veja sua assinatura: a) procedure BlockWrite(var F: File; var Buf; Count: Integer); overload; b) procedure BlockWrite(var F: File; var Buf; Count: Integer; var AmtTransferred: Integer); overload; Aqui F é um arquivo não tipado no qual os dados serão escritos, Buf é qualquer variável contendo os dados que serão escritos no arquivo, Count é uma expressão do tipo Integer e representa a quantidade de registros a serem escritos e AmtTransferred é uma variável opcional do tipo Integer que representa a quantidade de registros realmente escritos. Vamos ver um exemplo do uso desta função? Considere o seguinte trecho de código:
Aqui nós escrevemos o byte 90 no arquivo "dados.dat". Note que, ao chamar a função Rewrite() nós informamos que o arquivo sendo criado terá o tamanho de 1 byte por registro. Vejamos agora como escrever quatro bytes (agrupados em um Integer):
Desta vez nós definimos que cada registro no arquivo terá 4 bytes, ou seja, um inteiro (Integer). Para finalizar, veja como podemos escrever um array (matriz) de bytes:
|
|||
 Link para compartilhar na Internet ou com seus amigos: |
|||
Desafios, Exercícios e Algoritmos Resolvidos de Delphi |
Veja mais Dicas e truques de Delphi |
|
Como selecionar um item de uma ListBox do Delphi em tempo de execução usando a propriedade ItemIndex |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
|
1º lugar: Java |
