... table>]
cXMLSedex := cXMLSedex + [</html>]
else
cXMLSedex := "" // Esvazia para pegar novo conteudo
oPg := _XMLHttpRequest() // TOLEAuto():New("Microsoft.XMLHTTP")
if oPg = nil
return nil
end
oPg:Open( "GET", cEanApi, .F. )
oPg:Send()
cXMLSedex := oPg:ResponseText // oPg:ResponseXML ...
Pesquisa resultou em 4276 ocorrências: +New
Termo pesquisado: +new
- 13 Mar 2026 13:54
- Fórum: Legislação Fiscal e Tributária
- Tópico: Satus do SEFAZ CUPO/NFE
- Respostas: 5
- Exibições: 359
- 10 Mar 2026 12:02
- Fórum: [x]Harbour
- Tópico: PdfClass como fazer um retangulo com fundo colorido?
- Respostas: 8
- Exibições: 301
Re: PdfClass como fazer um retangulo com fundo colorido?
... IF Empty( aBoletoList )
RETURN Nil
ENDIF
IF ValType( aBoletoList ) != "A"
aBoletoList := { aBoletoList }
ENDIF
oPDFBoleto := BoletoPDFClass():New()
oPDFBoleto:Begin( oPDF, oPDF == Nil )
FOR EACH oBoleto IN aBoletoList
oPDFBoleto:Add( oBoleto )
NEXT
IF ! Empty( cFileName )
oPDFBoleto ...
RETURN Nil
ENDIF
IF ValType( aBoletoList ) != "A"
aBoletoList := { aBoletoList }
ENDIF
oPDFBoleto := BoletoPDFClass():New()
oPDFBoleto:Begin( oPDF, oPDF == Nil )
FOR EACH oBoleto IN aBoletoList
oPDFBoleto:Add( oBoleto )
NEXT
IF ! Empty( cFileName )
oPDFBoleto ...
- 10 Mar 2026 11:44
- Fórum: [x]Harbour
- Tópico: PdfClass como fazer um retangulo com fundo colorido?
- Respostas: 8
- Exibições: 301
Re: PdfClass como fazer um retangulo com fundo colorido?
... JPEMPRESA ON JPEMPRESA.IDEMPRESA = " + NumberSQL( AppFilial() ) + ;
" WHERE IDPEDIDO = " + NumberSQL( nIdPedido )
:Execute()
oPDF := PDFClass():New()
oPDF:SetType( 2 )
oPDF:nDrawMode := 2
oPDF:nPDFPage := 2
oPDF:cFontName := "Helvetica"
oPDF:Begin()
oPDF:AddPage()
FOR nCont = 0 TO 150 ...
" WHERE IDPEDIDO = " + NumberSQL( nIdPedido )
:Execute()
oPDF := PDFClass():New()
oPDF:SetType( 2 )
oPDF:nDrawMode := 2
oPDF:nPDFPage := 2
oPDF:cFontName := "Helvetica"
oPDF:Begin()
oPDF:AddPage()
FOR nCont = 0 TO 150 ...
- 26 Fev 2026 15:27
- Fórum: [x]Harbour
- Tópico: Usando GTQTC no Linux.
- Respostas: 0
- Exibições: 395
Usando GTQTC no Linux.
... gtInfo( HB_GTI_FONTWIDTH, 15 )
hb_gtInfo( HB_GTI_WINTITLE, "TEST" )
hb_gtInfo( HB_GTI_ICONFILE, "test.ico" )
hb_gtInfo( HB_GTI_FONTNAME, "Courier New" )
hb_gtInfo( HB_GTI_CODEPAGE, 255 )
hb_gtInfo( HB_GTI_ALTENTER, .T. )
hb_gtInfo( HB_GTI_RESIZEMODE, HB_GTI_RESIZEMODE_FONT )
hb_gtInfo( HB_GTI ...
hb_gtInfo( HB_GTI_WINTITLE, "TEST" )
hb_gtInfo( HB_GTI_ICONFILE, "test.ico" )
hb_gtInfo( HB_GTI_FONTNAME, "Courier New" )
hb_gtInfo( HB_GTI_CODEPAGE, 255 )
hb_gtInfo( HB_GTI_ALTENTER, .T. )
hb_gtInfo( HB_GTI_RESIZEMODE, HB_GTI_RESIZEMODE_FONT )
hb_gtInfo( HB_GTI ...
- 26 Fev 2026 10:15
- Fórum: [x]Harbour
- Tópico: Atualizações Harbour 3.2 - 16/02/2025
- Respostas: 0
- Exibições: 268
Atualizações Harbour 3.2 - 16/02/2025
... 02-07 20:58 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* contrib/gtqtc/gtqtc1.cpp
* set HighDpiScaleFactorRoundingPolicy to Round for new QT versions
except Android builds.
It fixes problem with proportional fonts in QT6 though in some
environments it may not give the optimal ...
* contrib/gtqtc/gtqtc1.cpp
* set HighDpiScaleFactorRoundingPolicy to Round for new QT versions
except Android builds.
It fixes problem with proportional fonts in QT6 though in some
environments it may not give the optimal ...
- 18 Fev 2026 21:59
- Fórum: [x]Harbour
- Tópico: tela cheia no linux
- Respostas: 13
- Exibições: 782
Re: tela cheia no linux
... 02-07 20:58 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* contrib/gtqtc/gtqtc1.cpp
* set HighDpiScaleFactorRoundingPolicy to Round for new QT versions
except Android builds.
It fixes problem with proportional fonts in QT6 though in some
environments it may not give the optimal ...
* contrib/gtqtc/gtqtc1.cpp
* set HighDpiScaleFactorRoundingPolicy to Round for new QT versions
except Android builds.
It fixes problem with proportional fonts in QT6 though in some
environments it may not give the optimal ...
- 18 Fev 2026 21:43
- Fórum: [x]Harbour
- Tópico: tela cheia no linux
- Respostas: 13
- Exibições: 782
Re: tela cheia no linux
... text?", { "YES", "NO" } ) == 1
s := hb_TSToStr( hb_DateTime() ) + hb_eol() + ;
"Harbour GT" + hb_gtVersion() + " clipboard test" + hb_eol()
? "New clipboard text: [" + s + "]"
hb_gtInfo( HB_GTI_CLIPBOARDDATA, s )
ENDIF
#endif
ENDIF
ENDDO
?
RETURN
Então o ambiente nativo(para os ...
s := hb_TSToStr( hb_DateTime() ) + hb_eol() + ;
"Harbour GT" + hb_gtVersion() + " clipboard test" + hb_eol()
? "New clipboard text: [" + s + "]"
hb_gtInfo( HB_GTI_CLIPBOARDDATA, s )
ENDIF
#endif
ENDIF
ENDDO
?
RETURN
Então o ambiente nativo(para os ...
- 07 Fev 2026 18:49
- Fórum: [x]Harbour
- Tópico: Atualização da GtQtc
- Respostas: 5
- Exibições: 498
Re: Atualização da GtQtc
... 02-07 20:58 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* contrib/gtqtc/gtqtc1.cpp
* set HighDpiScaleFactorRoundingPolicy to Round for new QT versions
except Android builds.
It fixes problem with proportional fonts in QT6 though in some
environments it may not give the optimal ...
* contrib/gtqtc/gtqtc1.cpp
* set HighDpiScaleFactorRoundingPolicy to Round for new QT versions
except Android builds.
It fixes problem with proportional fonts in QT6 though in some
environments it may not give the optimal ...
- 28 Jan 2026 10:51
- Fórum: FiveWin
- Tópico: fechar dialog "morta" em outra thread
- Respostas: 2
- Exibições: 429
fechar dialog "morta" em outra thread
... CREATE CLASS RunWhileThreadClass
VAR lExit INIT .F.
VAR nThreadId
VAR nInterval INIT 600
VAR cWindowTitle INIT ""
VAR bCode
METHOD New() INLINE ::nThreadId := hb_ThreadSelf(), SELF
METHOD Execute( bCode )
ENDCLASS
METHOD Execute( bCode ) CLASS RunWhileThreadClass
LOCAL nCont ...
VAR lExit INIT .F.
VAR nThreadId
VAR nInterval INIT 600
VAR cWindowTitle INIT ""
VAR bCode
METHOD New() INLINE ::nThreadId := hb_ThreadSelf(), SELF
METHOD Execute( bCode )
ENDCLASS
METHOD Execute( bCode ) CLASS RunWhileThreadClass
LOCAL nCont ...
- 26 Jan 2026 22:54
- Fórum: [x]Harbour
- Tópico: En tiempo de ejecución error.log
- Respostas: 5
- Exibições: 740
Re: En tiempo de ejecución error.log
... the
// prevous example and extracts from it the structure definition
// for the Customer.dbf file.
PROCEDURE Main
LOCAL oXmlDoc := TXmlDocument():new()
LOCAL oXmlNode, aStruct := {}
oXMlDoc:read( Memoread( "customer.xml" ) )
oXmlNode := oXmlDoc:findFirst()
? oXmlNode:cName
oXmlNode ...
// prevous example and extracts from it the structure definition
// for the Customer.dbf file.
PROCEDURE Main
LOCAL oXmlDoc := TXmlDocument():new()
LOCAL oXmlNode, aStruct := {}
oXMlDoc:read( Memoread( "customer.xml" ) )
oXmlNode := oXmlDoc:findFirst()
? oXmlNode:cName
oXmlNode ...
- 24 Jan 2026 12:59
- Fórum: [x]Harbour
- Tópico: Cómo crear un PDF a partir de un xml
- Respostas: 3
- Exibições: 642
Re: Cómo crear un PDF a partir de un xml
NÃO É um teste de uso, é apenas teste de compilação.
PROCEDURE Main
SetMode(33,100)
CLS
hpdf_New()
hb_Zebra()
Inkey(0)
RETURN
d:\temp>hbmk2 test
hbmk2: Processing environment options: -comp=mingw
hbmk2: Processing configuration: d:\harbour\bin\hbmk.hbc
Harbour 3.2.0dev (r2601171121 ...
PROCEDURE Main
SetMode(33,100)
CLS
hpdf_New()
hb_Zebra()
Inkey(0)
RETURN
d:\temp>hbmk2 test
hbmk2: Processing environment options: -comp=mingw
hbmk2: Processing configuration: d:\harbour\bin\hbmk.hbc
Harbour 3.2.0dev (r2601171121 ...
- 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: 642
Cómo crear un PDF a partir de un xml
... Version: Harbour 3.2.0dev (r2601091642)
Compiler: MinGW GNU C 7.3 (32-bit)
Platform: Windows 11 or newer 10.0.26200
PCode version: 0.3
ChangeLog last entry: 2026-01-09 17:42 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
ChangeLog ID ...
Compiler: MinGW GNU C 7.3 (32-bit)
Platform: Windows 11 or newer 10.0.26200
PCode version: 0.3
ChangeLog last entry: 2026-01-09 17:42 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
ChangeLog ID ...
- 22 Jan 2026 22:58
- Fórum: HwGui
- Tópico: DESATIVAR TAB HWGUI 2.23 B8
- Respostas: 21
- Exibições: 1508
Re: DESATIVAR TAB HWGUI 2.23 B8
... principais
// -------------------------------------------------
STATIC ThisForm
STATIC oTab, oBrw, oEdBusca
STATIC oEdUsuario, oEdSenhaOld, oEdSenhaNew, oEdSenhaConf
STATIC oBtnInclui, oBtnAltera, oBtnExcluir, oBtnSalvar, oBtnCancelar, oBtnSair ...
// -------------------------------------------------
STATIC ThisForm
STATIC oTab, oBrw, oEdBusca
STATIC oEdUsuario, oEdSenhaOld, oEdSenhaNew, oEdSenhaConf
STATIC oBtnInclui, oBtnAltera, oBtnExcluir, oBtnSalvar, oBtnCancelar, oBtnSair ...
- 19 Jan 2026 11:28
- Fórum: MiniGui
- Tópico: Envio de e-mail
- Respostas: 3
- Exibições: 621
Re: Envio de e-mail
... cMsgHTML:= '<html><head><title>' + hb_ansitooem([Envio Automático de Nota Fiscal Eletrônica (NF-e)]) + '</title></head>' + cStilo + '<body>' + hb_OsNewLine() + ;
'<h1 Align=Center>' + hb_ansitooem([Envio Automático de Nota Fiscal Eletrônica (NF-e)]) + '</h1><br>' + ;
'<dt><div align="center ...
'<h1 Align=Center>' + hb_ansitooem([Envio Automático de Nota Fiscal Eletrônica (NF-e)]) + '</h1><br>' + ;
'<dt><div align="center ...
- 13 Jan 2026 12:16
- Fórum: [x]Harbour
- Tópico: Atualizações do Harbour 13/01/2026
- Respostas: 5
- Exibições: 649
Atualizações do Harbour 13/01/2026
... 2026-01-13 14:37 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* include/harbour.hbx
* src/harbour.def
* src/rtl/version.c
+ added new PRG function hb_osIsWine()
* src/rtl/gtxwc/gtxwc.c
+ added small hack to retrive some key codes hidden by X*LookupString()
2026-01-09 17:42 UTC ...
* include/harbour.hbx
* src/harbour.def
* src/rtl/version.c
+ added new PRG function hb_osIsWine()
* src/rtl/gtxwc/gtxwc.c
+ added small hack to retrive some key codes hidden by X*LookupString()
2026-01-09 17:42 UTC ...