Histórico da Página

Sintaxis

FREADSTR( <expresión numérica 1>,  <expresión numérica 2> )

Propósito

Lee caracteres de un archivo binario, suministrando una cadena de caracteres hasta de 65.536 bytes (64 K).

Argumentos

< expresión numérica 1 >

Define el número de manejo que identifica el archivo binario que se leerá. Este número se obtiene por las funciones FOPEN() o FCREATE().

< expresión numérica 2 >

Define el número de bytes que se leerán, a partir de la posición actual del puntero de archivos.

Utilización

Una cadena de caracteres nula (“”) indicará que hubo algún error o que se encontró el final del archivo.

A partir de la posición actual del puntero de archivos binarios, la función FREADSTR() lee el número de bytes (caracteres) especificados por la expresión numérica 2, o hasta que se encuentre un carácter nulo CHR(0). Como sucede con la función FREAD(), todos los caracteres se leen, incluso los de alto nivel (por encima del ASCII 127) y los de control, excepto el carácter nulo CHR(0), que finaliza la lectura de la función FREADSTR().

Cada carácter leído mueve el puntero de archivos en una posición. Si el número especificado en la expresión numérica 2 es mayor que el número de bytes existentes en el archivo, a partir de la posición actual del puntero hasta el final del archivo, el puntero se ubicará al final del archivo.

Ejemplos

El siguiente ejemplo muestra los códigos ASCII de los 16 primeros bytes de un archivo texto:

#include "Fileio.ch"

FUNCTION LerArq()

LOCAL nHandle := FOPEN("New.txt", FC_NORMAL)

LOCAL cString   := “”

IF FERROR() <> 0

          MsgAlert("Error de apertura: " + STR(FERROR()))

          BREAK

ELSE

          cString := FREADSTR(nHandle, 16)

          MsgAlert(cString)

          FCLOSE(nHandle)

ENDIF