... Construtor: Abre o banco de dados e guarda a área de trabalho
METHOD New() CLASS ProdutoDBF
// Se o DBF não existir, cria a estrutura básica
if !File( "PRODUTOS.DBF" )
DbCreate( "PRODUTOS.DBF", { ;
{ "CODIGO" , "N", 6, 0 }, ;
{ "DESCRICAO", "C", 40, 0 }, ;
{ "PRECO" , "N", 10, 2 ...
Pesquisa resultou em 4679 ocorrências: +File
Termo pesquisado: +file
- 26 Jul 2026 16:41
- Fórum: [x]Harbour
- Tópico: Como é a orientação a objeto no Harbour
- Respostas: 11
- Exibições: 224
- 03 Jul 2026 17:51
- Fórum: HwGui
- Tópico: Atualização 03-07-2026
- Respostas: 3
- Exibições: 344
Atualização 03-07-2026
... Test program added and command docu
! updated.
! The new scripts "hwmk.bat" and
! "hwmk.sh" compile a single
! program without using a .hbp file.
! For details see comment lines
! of test program.
! Hello josequintas,
! can you add this sample program
! into the demo of "samples ...
! updated.
! The new scripts "hwmk.bat" and
! "hwmk.sh" compile a single
! program without using a .hbp file.
! For details see comment lines
! of test program.
! Hello josequintas,
! can you add this sample program
! into the demo of "samples ...
- 23 Jun 2026 09:43
- Fórum: Contribuições, Dicas e Tutoriais
- Tópico: Nova Sefazclass - sem uso de capicom e simplificada
- Respostas: 0
- Exibições: 562
Nova Sefazclass - sem uso de capicom e simplificada
... SefazAssinaXmlSha1( @cXml, cCertSubject, cSenha )
- SefazAssinaXmlSha1Thumbprint( @cXml, cThumbprint, cSenha )
- SefazAssinaXmlSha1Pfx( @cXml, cPfxFile, cSenha )
- SefazCertEscolhe( @dIni, @dFim )
- SefazCertificado( cNome, @dIni, @dFim, lValidaData )
Os nomes antigos CapicomAssinaXml ...
- SefazAssinaXmlSha1Thumbprint( @cXml, cThumbprint, cSenha )
- SefazAssinaXmlSha1Pfx( @cXml, cPfxFile, cSenha )
- SefazCertEscolhe( @dIni, @dFim )
- SefazCertificado( cNome, @dIni, @dFim, lValidaData )
Os nomes antigos CapicomAssinaXml ...
- 03 Mai 2026 20:56
- Fórum: [x]Harbour
- Tópico: Gerenciador de Arquivos em Harbour
- Respostas: 9
- Exibições: 1626
Gerenciador de Arquivos em Harbour
... Para quem desejar o código fonte está abaixo:
#include "directry.ch"
TELA()
DECLARE ARQUIVOS := {}, NOMES := {}, ARQ := {}, oFile, CONT := .T., ASP:=0
DO WHILE .T.
CONT = .T.
DO WHILE CONT
NOMES := {}
ARQ := {}
@ 2,1 CLEAR TO MAXROW()-2-4,19
@ 2,22 CLEAR TO MAXROW()-2-4 ...
#include "directry.ch"
TELA()
DECLARE ARQUIVOS := {}, NOMES := {}, ARQ := {}, oFile, CONT := .T., ASP:=0
DO WHILE .T.
CONT = .T.
DO WHILE CONT
NOMES := {}
ARQ := {}
@ 2,1 CLEAR TO MAXROW()-2-4,19
@ 2,22 CLEAR TO MAXROW()-2-4 ...
- 29 Abr 2026 08:57
- Fórum: [x]Harbour
- Tópico: Exe xHarbour rodando como serviço
- Respostas: 1
- Exibições: 806
Exe xHarbour rodando como serviço
... srv2
Private k_usu
Private k_psw := '#@!$8887'
Private k_prt
Private k_dtb
Private vMEU_SQL
Private nCnn:= -1
Private lRodando := .T.
IF ! File( pasta + "servidor.ini" )
LogSupa( "ARQUIVO DE INICIALIZAÇÃO NÃO ENCONTRADO: " + pasta + "servidor.ini" )
QUIT
ENDIF
sgbd := AllTrim( hwg ...
Private k_usu
Private k_psw := '#@!$8887'
Private k_prt
Private k_dtb
Private vMEU_SQL
Private nCnn:= -1
Private lRodando := .T.
IF ! File( pasta + "servidor.ini" )
LogSupa( "ARQUIVO DE INICIALIZAÇÃO NÃO ENCONTRADO: " + pasta + "servidor.ini" )
QUIT
ENDIF
sgbd := AllTrim( hwg ...
- 06 Abr 2026 23:23
- Fórum: Outras Bibliotecas Visuais e IDEs
- Tópico: HarbourBuilder — Cross-Platform Visual IDE for Harbour
- Respostas: 14
- Exibições: 2980756
HarbourBuilder — Cross-Platform Visual IDE for Harbour
... F12), status bar (Ln/Col/INS/UTF-8)
- Build messages panel with clickable errors (jump to line)
- Incremental build (only recompiles changed files)
VISUAL FORM DESIGNER:
- WYSIWYG designer with dot grid, snap-to-grid (8px)
- Drag, resize (8 handles), rubber band multi-selection
- Copy/Paste ...
- Build messages panel with clickable errors (jump to line)
- Incremental build (only recompiles changed files)
VISUAL FORM DESIGNER:
- WYSIWYG designer with dot grid, snap-to-grid (8px)
- Drag, resize (8 handles), rubber band multi-selection
- Copy/Paste ...
- 06 Abr 2026 21:14
- Fórum: [x]Harbour
- Tópico: Coverter sistema em Clipper 5.2 gerado por GASPRO 4.0
- Respostas: 5
- Exibições: 1624
Re: Coverter sistema em Clipper 5.2 gerado por GASPRO 4.0
... botão "Harbour" e é só rolar para baixo que encontra a mensagem "Gas4Harbour" e dentro dessa mensagem tem um arquivo ZIP e quando clico na opção "File" para baixar tenho o erro citado acima.
Seguindo estes passos, não encontrei nenhum botão "File" na página da Seção Downloads. O que existe é o ...
Seguindo estes passos, não encontrei nenhum botão "File" na página da Seção Downloads. O que existe é o ...
- 05 Abr 2026 15:19
- Fórum: [x]Harbour
- Tópico: Coverter sistema em Clipper 5.2 gerado por GASPRO 4.0
- Respostas: 5
- Exibições: 1624
Re: Coverter sistema em Clipper 5.2 gerado por GASPRO 4.0
... vezes e inclusive poste alguns questionamentos e nunca fui respondido.
No caso o arquivo é na seção "Download", botão "Harbour" e é só rolar para baixo que encontra a mensagem "Gas4Harbour" e dentro dessa mensagem tem um arquivo ZIP e quando clico na opção "File" para baixar tenho o erro citado acima.
No caso o arquivo é na seção "Download", botão "Harbour" e é só rolar para baixo que encontra a mensagem "Gas4Harbour" e dentro dessa mensagem tem um arquivo ZIP e quando clico na opção "File" para baixar tenho o erro citado acima.
- 04 Abr 2026 19:05
- Fórum: [x]Harbour
- Tópico: Coverter sistema em Clipper 5.2 gerado por GASPRO 4.0
- Respostas: 5
- Exibições: 1624
Coverter sistema em Clipper 5.2 gerado por GASPRO 4.0
... orientação para migrar um sistema console Clipper 5.2 gerado por GASPRO 4.0 para Harbour, encontrei algo a respeito aqui no grupo mas não permitiu que eu fizesse o download.
Ocorre esse erro.
Access denied!
You have no permission to download this file!
Se algum dos amigos puder me ajudar eu agradeço.
Ocorre esse erro.
Access denied!
You have no permission to download this file!
Se algum dos amigos puder me ajudar eu agradeço.
- 13 Mar 2026 13:54
- Fórum: Legislação Fiscal e Tributária
- Tópico: Satus do SEFAZ CUPO/NFE
- Respostas: 5
- Exibições: 3399
Re: Satus do SEFAZ CUPO/NFE
... SEFAZ", "Status", "ON", cPathRaiz+"\nfw.ini", .T. )
ENDIF
ENDIF
RETURN { _cBola_, cResName, _lista_ }
/* ********************************
if file("DSPNBLDD.DBF")
use DSPNBLDD shared
do while .not. eof()
if _uf_ $ DSPNBLDD->Autorizado // := aTRTags[i,1]
if _operacao_ = 2 ; _cBola ...
ENDIF
ENDIF
RETURN { _cBola_, cResName, _lista_ }
/* ********************************
if file("DSPNBLDD.DBF")
use DSPNBLDD shared
do while .not. eof()
if _uf_ $ DSPNBLDD->Autorizado // := aTRTags[i,1]
if _operacao_ = 2 ; _cBola ...
- 26 Fev 2026 15:27
- Fórum: [x]Harbour
- Tópico: Usando GTQTC no Linux.
- Respostas: 0
- Exibições: 2577
Usando GTQTC no Linux.
... hbgtinfo.ch"
ANNOUNCE HB_GT_SYS
REQUEST HB_GT_QTC_DEFAULT
//REQUEST HB_GT_XWC_DEFAULT
Function main
// get font size and width from system file
hb_gtInfo( HB_GTI_FONTSIZE, 20 )
hb_gtInfo( HB_GTI_FONTWIDTH, 15 )
hb_gtInfo( HB_GTI_WINTITLE, "TEST" )
hb_gtInfo( HB_GTI_ICONFILE, "test.ico" )
hb ...
ANNOUNCE HB_GT_SYS
REQUEST HB_GT_QTC_DEFAULT
//REQUEST HB_GT_XWC_DEFAULT
Function main
// get font size and width from system file
hb_gtInfo( HB_GTI_FONTSIZE, 20 )
hb_gtInfo( HB_GTI_FONTWIDTH, 15 )
hb_gtInfo( HB_GTI_WINTITLE, "TEST" )
hb_gtInfo( HB_GTI_ICONFILE, "test.ico" )
hb ...
- 26 Jan 2026 22:54
- Fórum: [x]Harbour
- Tópico: En tiempo de ejecución error.log
- Respostas: 5
- Exibições: 3014
Re: En tiempo de ejecución error.log
... e não à classe TXmlNode.
Veja no exemplo abaixo, que consta no link acima postado por Kapiaba:
// Exemplo para ler um XML
//Reading an XML file
// This example uses the Customer.xml file created in the
// prevous example and extracts from it the structure definition
// for the Customer ...
Veja no exemplo abaixo, que consta no link acima postado por Kapiaba:
// Exemplo para ler um XML
//Reading an XML file
// This example uses the Customer.xml file created in the
// prevous example and extracts from it the structure definition
// for the Customer ...
- 26 Jan 2026 15:09
- Fórum: [x]Harbour
- Tópico: En tiempo de ejecución error.log
- Respostas: 5
- Exibições: 3014
Re: En tiempo de ejecución error.log
... 2014.09.24.1825 - Tenta somente se for erro 64 ref servidor
2014.10.28.0910 - Ajuste no texto
2016.06.30.1120 - Formatação do fonte
*/
#include "fileio.ch"
#include "error.ch"
#include "hbgtinfo.ch"
#include "hbmemory.ch"
// put messages to STDERR
#command ? <list,...> => ?? hb_Eol() ; ?? <list ...
2014.10.28.0910 - Ajuste no texto
2016.06.30.1120 - Formatação do fonte
*/
#include "fileio.ch"
#include "error.ch"
#include "hbgtinfo.ch"
#include "hbmemory.ch"
// put messages to STDERR
#command ? <list,...> => ?? hb_Eol() ; ?? <list ...
- 25 Jan 2026 13:14
- Fórum: [x]Harbour
- Tópico: Envio de e-mail
- Respostas: 47
- Exibições: 12033
Re: Envio de e-mail
... de atualização (pelo menos 90 dias).
Para o que você precisa não terá problemas com este versão.
https://www.projetoacbr.com.br/forum/files/file/455-acbrmonitorplus-windows-32-bits/
Será necessário fazer um cadastro no fórum.
Outra solução é o BLAT. Alguns e-mail´s não estavam ...
Para o que você precisa não terá problemas com este versão.
https://www.projetoacbr.com.br/forum/files/file/455-acbrmonitorplus-windows-32-bits/
Será necessário fazer um cadastro no fórum.
Outra solução é o BLAT. Alguns e-mail´s não estavam ...
- 23 Jan 2026 14:16
- Fórum: [x]Harbour
- Tópico: Cómo crear un PDF a partir de un xml
- Respostas: 3
- Exibições: 2613
Cómo crear un PDF a partir de un xml
... reference to `HB_FUN_HPDF_GETFONT'
.hbmk/win/mingw/PAGO-GEMI.o:PAGO-GEMI.c:(.data+0xe8): undefined reference to `HB_FUN_HPDF_LOADJPEGIMAGEFROMFILE'
.hbmk/win/mingw/PAGO-GEMI.o:PAGO-GEMI.c:(.data+0xf8): undefined reference to `HB_FUN_HPDF_PAGE_DRAWIMAGE'
.hbmk/win/mingw/PAGO-GEMI.o:PAGO-GEMI.c ...
.hbmk/win/mingw/PAGO-GEMI.o:PAGO-GEMI.c:(.data+0xe8): undefined reference to `HB_FUN_HPDF_LOADJPEGIMAGEFROMFILE'
.hbmk/win/mingw/PAGO-GEMI.o:PAGO-GEMI.c:(.data+0xf8): undefined reference to `HB_FUN_HPDF_PAGE_DRAWIMAGE'
.hbmk/win/mingw/PAGO-GEMI.o:PAGO-GEMI.c ...