Excelente César.
// https://forums.fivetechsupport.com/viewtopic.php?p=276837#p276837
// C:\FWH\SAMPLES\QRCODE4.PRG
#Include "fivewin.ch"
STATIC oPrn, nRow, nRowStep, nColStep
STATIC nWidthPage := 80
STATIC nHightPage := 66
FUNCTION Main()
LOCAL cCia := "SysCtrl Software"
LOCAL cCalle ...
Search found 1948 matches
- Thu Jan 09, 2025 2:31 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: CODIGO QR EN DOCUMENTO CON TPRINTER
- Replies: 10
- Views: 261
- Wed Jan 08, 2025 7:13 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: CODIGO QR EN DOCUMENTO CON TPRINTER
- Replies: 10
- Views: 261
Re: CODIGO QR EN DOCUMENTO CON TPRINTER
Code: Select all | Expand
Pasta de c:\XHBBCC77\lib
09/10/2024 10:55 53.248 hbzebra.lib
- Wed Jan 08, 2025 4:55 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: xbrowse, bkeydown and number
- Replies: 1
- Views: 86
Re: xbrowse, bkeydown and number
Mira se ayuda,
// C:\FWH..\SAMPLES\TECLAS.PRG
#Include "FiveWin.Ch"
FUNCTION Main()
LOCAL oWnd
DEFINE WINDOW oWnd TITLE "Testando as Teclas - Caixa Alta e Baixa"
oWnd:bKeyDown = { | nKey | MsgInfo( "Caixa Baixa: " + Str( nKey ) ) }
oWnd:bKeyChar = { | nKey | MsgInfo( "Caixa Alta ...
// C:\FWH..\SAMPLES\TECLAS.PRG
#Include "FiveWin.Ch"
FUNCTION Main()
LOCAL oWnd
DEFINE WINDOW oWnd TITLE "Testando as Teclas - Caixa Alta e Baixa"
oWnd:bKeyDown = { | nKey | MsgInfo( "Caixa Baixa: " + Str( nKey ) ) }
oWnd:bKeyChar = { | nKey | MsgInfo( "Caixa Alta ...
- Wed Jan 08, 2025 3:03 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: WhatsAaa
- Replies: 4
- Views: 778
- Tue Jan 07, 2025 2:15 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: CODIGO QR EN DOCUMENTO CON TPRINTER
- Replies: 10
- Views: 261
Re: CODIGO QR EN DOCUMENTO CON TPRINTER
Directo en el .BMP:
// Our first DialogBox sample
#include "FiveWin.ch"
#include "ttitle.ch"
#define HTTPREQUEST_PROXYSETTING_PROXY 2
// Para xHarbour
#ifdef __XHARBOUR__
#xtranslate hb_DateTime([<x,...>]) => DateTime(<x>)
#xtranslate hb_tstostr([<x>]) => TToS(<x>)
#xtranslate hb_stot([<x ...
// Our first DialogBox sample
#include "FiveWin.ch"
#include "ttitle.ch"
#define HTTPREQUEST_PROXYSETTING_PROXY 2
// Para xHarbour
#ifdef __XHARBOUR__
#xtranslate hb_DateTime([<x,...>]) => DateTime(<x>)
#xtranslate hb_tstostr([<x>]) => TToS(<x>)
#xtranslate hb_stot([<x ...
- Mon Jan 06, 2025 7:16 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Xbrowser keeps in a continious loop
- Replies: 11
- Views: 297
Re: Xbrowser keeps in a continious loop
marc, answer: NO, NO, NO,NO and DISCARD.
Regards, saludos.
Regards, saludos.
- Fri Jan 03, 2025 5:49 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Por qué el oDLG cambia de color?
- Replies: 19
- Views: 1242
Re: Por qué el oDLG cambia de color?
Armando, no esta completo, por favor mire estas lyneas:
LABARRA(529)->(b) -> BAD(Malo)
LABARRA(543)->(b)
LABARRA(550)->(b)
LABARRA(557)->(b)
LABARRA(584)->(b)
LABARRA(591)->(b)
LABARRA(598)->(b)
LABARRA(605)->(b)
LABARRA(612)->(b)
LABARRA(619)->(b)
LABARRA(626)->(b)
LABARRA(633)->(b)
LABARRA(640 ...
LABARRA(529)->(b) -> BAD(Malo)
LABARRA(543)->(b)
LABARRA(550)->(b)
LABARRA(557)->(b)
LABARRA(584)->(b)
LABARRA(591)->(b)
LABARRA(598)->(b)
LABARRA(605)->(b)
LABARRA(612)->(b)
LABARRA(619)->(b)
LABARRA(626)->(b)
LABARRA(633)->(b)
LABARRA(640 ...
- Fri Jan 03, 2025 12:58 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Por qué el oDLG cambia de color?
- Replies: 19
- Views: 1242
Re: Por qué el oDLG cambia de color?
Poste LABARRA.prg para correcciones.
Regards, saludos.
Regards, saludos.
- Thu Jan 02, 2025 1:14 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Milestone Achieved: WINHOTEL as a Web Application
- Replies: 5
- Views: 299
Re: Milestone Achieved: WINHOTEL as a Web Application
Happy New Year Otto!
Regards, saludos.
Regards, saludos.
- Mon Dec 30, 2024 3:23 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: PrinterInfo with Powershell
- Replies: 3
- Views: 212
Re: PrinterInfo with Powershell
Mister Otto,explain, pls:
LOCAL cScript, cOutputFile := ".\psfiles\get_printers.ps1"
LOCAL cResultFile := ".\psfiles\printers_output.txt"
LOCAL cScript, cOutputFile := ".\psfiles\get_printer_info.ps1"
LOCAL cResultFile := ".\psfiles\printer_info_output.csv"
???????????
Regards, saludos.
LOCAL cScript, cOutputFile := ".\psfiles\get_printers.ps1"
LOCAL cResultFile := ".\psfiles\printers_output.txt"
LOCAL cScript, cOutputFile := ".\psfiles\get_printer_info.ps1"
LOCAL cResultFile := ".\psfiles\printer_info_output.csv"
???????????
Regards, saludos.
- Thu Dec 26, 2024 4:49 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: get...action
- Replies: 24
- Views: 873
Re: get...action
Disculpa Joao, lo tarde, ya lo probé en el mismo lugar y se ve igual.
En otras partes del programa tu ejemplo se bien.
Sigo buscando. Loper que puede pasar es que el código de este prg lo escriba de nuevo...
Gracias.
Saludos
Ruben Dario Fernandez.
Buenas tardes. Sólo puedo imaginar que hay ...
En otras partes del programa tu ejemplo se bien.
Sigo buscando. Loper que puede pasar es que el código de este prg lo escriba de nuevo...
Gracias.
Saludos
Ruben Dario Fernandez.
Buenas tardes. Sólo puedo imaginar que hay ...
- Thu Dec 26, 2024 4:46 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: Color dialogo con letras blancas, Radio tambien
- Replies: 1
- Views: 181
Re: Color dialogo con letras blancas, Radio tambien
mira se ayuda:
// C:\FWH\SAMPLES\CORCHK.PRG
// Button< Reset > uses TESTCOLOR( oDlg, nBColor1, nTxtColor1 ) // RED = 255, WHITE = 16777215
// Button< Color > uses TESTCOLOR( oDlg, nBColor2, nTxtColor2 ) // BLUE = 16711680, YELLOW = 65535
#include "fivewin.ch"
FUNCTION Main()
LOCAL oDlg ...
// C:\FWH\SAMPLES\CORCHK.PRG
// Button< Reset > uses TESTCOLOR( oDlg, nBColor1, nTxtColor1 ) // RED = 255, WHITE = 16777215
// Button< Color > uses TESTCOLOR( oDlg, nBColor2, nTxtColor2 ) // BLUE = 16711680, YELLOW = 65535
#include "fivewin.ch"
FUNCTION Main()
LOCAL oDlg ...
- Sun Dec 22, 2024 3:26 pm
- Forum: FiveWin for Harbour/xHarbour
- Topic: Browse of my ADO Class
- Replies: 59
- Views: 7150
Re: Browse of my ADO Class
GTWVG?? What is that? I have no idea how to compile this thing. It doesn't even make sense to me, knowing how to program in PURE FIVEWIN, why would I mix something prehistoric with something as modern and powerful as FIVEWIN? I'm sorry, I don't use CONSOLE MODE under any circumstances.
GTWVG?? ¿Qué ...
GTWVG?? ¿Qué ...
- Sun Dec 22, 2024 3:18 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: get...action
- Replies: 24
- Views: 873
Re: get...action
Rubén, a un diálogo como este me refiero. Modifique este modelo para adaptarlo a sus necesidades y pruébelo para ver los resultados.
DLGFECHA DIALOG 305, 61, 203, 160
STYLE DS_ABSALIGN | DS_MODALFRAME | 0x4L | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "TFechas - Using: Harbour .and ...
DLGFECHA DIALOG 305, 61, 203, 160
STYLE DS_ABSALIGN | DS_MODALFRAME | 0x4L | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "TFechas - Using: Harbour .and ...
- Sat Dec 21, 2024 2:09 pm
- Forum: FiveWin para Harbour/xHarbour
- Topic: get...action
- Replies: 24
- Views: 873
Re: get...action
Rubén, publica aquí el .RC del diálogo que contiene el GET que causa el problema, por favor. Gracias.
Regards, saludos.
Regards, saludos.