import.css=/download/attachments/327912/newLayout.css |
Função: FOpen
Abre um arquivo binário. FOpen ( < cArq>, [ nModo], [ xParam3], [ lChangeCase] ) --> nRet
Tabela A - Modos de acesso a arquivos binários
|
| modo | constante (fileio.ch) | Operação |
|---|---|---|
| 0 | FO_COMPAT | Modo de compatibilidade (padrão). |
| 16 | FO_EXCLUSIVE | Acesso total exclusivo. |
| 32 | FO_DENYWRITE | Acesso bloqueado a gravação de outros processos ao arquivo. |
| 48 | FO_DENYREAD | Acesso bloqueado a leitura de outros processos ao arquivo. |
| 64 | FO_DENYNONE | Acesso compartilhado. Permite a leitura e gravação por outros processos ao arquivo. |
| 64 | FO_SHARED | Igual à FO_DENYNONE. |
#include 'fileio.ch'...// Abrir o arquivo error.log para escrita e gravação compartilhada.nHandle := fopen('\sigaadv\error.log' , FO_READWRITE + FO_SHARED )If nHandle == -1 MsgStop('Erro de abertura : FERROR '+str(ferror(),4))Else MsgStop('Arquivo aberto com sucesso.') fclose(nHandle) // Fecha arquivoEndif