mterraz wrote:Buenos dias Antonio,
Me interesa ser parte de este grupo de beta testers, cuento con una aplicacion de alrededor de 14k lineas de desarrollo y con muchas interfaces con casi todas las tecnologias.Muchas gracias, siempre un placer compartir tiempo y trabajo contigo y los usuario de Fivewin.
Saludos cordiales, Mariano.
Mándame un whatsapp al +34 722461100
karinha wrote:Maestro, \SAMPLES\BRWCOLOR.PRG, genera este error: -> BCC77 y XHBBCC77.
Application =========== Path and name: C:\FWH2603\samples\brwcolor.exe (32 bits) Size: 5,016,576 bytes Compiler version: xHarbour 1.3.2 Intl. (SimpLex) (Build 20260103) FiveWin version: FWH 26.03 C compiler version: Borland/Embarcadero C++ 7.7 (32-bit) Windows 11 64 Bits, version: 6.2, Build 9200 Time from start: 0 sec Error occurred at: 03/26/26, 15:00:30 Error description: Error BASE/1068 Argument error: array access Args: [ 1] = A {"One","Two","Three"} length: 3 [ 2] = U Stack Calls =========== Called from: brwcolor.prg => (b)MAIN( 14 ) Called from: source\classes\wbrowse.prg => WBRWLINE( 2706 ) Called from: source\classes\wbrowse.prg => (b)TWBROWSE:TWBROWSE( 152 ) Called from: => TWBROWSE:DRAWLINE( 0 ) Called from: source\classes\wbrowse.prg => TWBROWSE:PAINT( 804 ) Called from: source\classes\wbrowse.prg => TWBROWSE:DISPLAY( 2353 ) Called from: source\classes\control.prg => TCONTROL:HANDLEEVENT( 1863 ) Called from: source\classes\wbrowse.prg => TWBROWSE:HANDLEEVENT( 1731 ) Called from: source\classes\window.prg => _FWH( 272 ) Called from: => DIALOGBOXINDIRECT( 0 ) Called from: source\classes\dialog.prg => TDIALOG:ACTIVATE( 338 ) Called from: brwcolor.prg => MAIN( 18 )Regards, saludos.
Arreglado, muchas gracias! :wink:
Maestro Antonio
Estoy interesado para probarlo en una aplicación de impuesto que tengo. +57 322 651 91 46
Por favor envíame un whatsapp al +34 722461100
Mañana publicaremos una nueva beta. La última distribuida tiene un bug con los diálogos y MSVC 32 y 64 bits
Con el potente XHARBOUR, todo funciona a la perfección hasta el momento.
Gracias super maestro!
Insisto y solicito humildemente que los ejemplos de la carpeta \samples se devuelvan a su carpeta ORIGINAL. Llevo años usando la carpeta \SAMPLES en FiveWin, y buscar en ella con XDEV STUDIO es muy sencillo; ahora es imposible. Y para los nuevos usuarios, la búsqueda se vuelve pésima.
Regards, saludos.
Buenas tardes Antonio,
Instalada la versión recibida hoy 27/03 persiste el error mencionado en post anterior:
El error no salta en pantalla, hay que buscar el "error.log" en la carpeta en la que se ejecuta el programa manualmente.
Contenido extractado del "error.log":
Tiempo desde inicio: 16 sec
Error ocurrido en: 27/03/26, 18:29:25
Descripción del error: Error DBCMD/2001 Area de trabajo no usada: ORDSETFOCUS
Variables en uso
================
Procedimiento Tipo Valor
==========================
ORDSETFOCUS
Param 1: O Class: ERROR
RESUMENDIFSCP2CONTADORES
Param 1: N 1
Local 1: L .F.
Local 2: U
(b)MENUPPAL
Param 1: C "01/01/2026"
Param 2: C "27/03/26"
Local 1: A Len: 0
Local 2: C ""
Local 3: N 0
Local 4: N 0
Local 5: A Len: 0
Local 6: N 0
Local 7: D 01/01/26
Local 8: D 27/03/26
TMENU:COMMAND
Param 1: O Class: TMENUITEM
TWINDOW:COMMAND
Param 1: N 20200
Local 1: O Class: TMENUITEM
TWINDOW:HANDLEEVENT
Param 1: N 20200
Param 2: N 0
Local 1: N 0
Local 2: N 20200
Local 3: N 0
Local 4: U
_FWH
Param 1: N 273
Param 2: N 20200
Param 3: N 0
WINRUN
Param 1: N 0
Param 2: N 273
Param 3: N 20200
Param 4: N 0
Param 5: N 1
Local 1: O Class: TWINDOW
TWINDOW:ACTIVATE
Param 1: N 525242
MAIN
Param 1: C "MAXIMIZED"
Param 2: U
Param 3: U
Param 4: U
Param 5: U
Param 6: U
Param 7: U
Param 8: B {|| ... }
Param 9: U
Param 10: U
Param 11: U
Param 12: U
Param 13: U
Param 14: U
Param 15: U
Param 16: U
Param 17: U
Param 18: U
Param 19: U
Param 20: L .F.
Param 21: U
Local 1: O Class: TWINDOW
Local 2: U
Local 3: U
RDDs enlazados
==============
DBF
DBFFPT
DBFBLOB
DBFCDX
DBFNTX
Bases de datos en uso
=====================
1: TB_TURNO RddName: DBFCDX
==============================
RecNo RecCount BOF EOF
227 226 .F. .T.
Indexes in use TagName
=> TURNO TB_TUR
dtos(FECHAINI)+strzero(TURNO,4) TB_TUR2
Relations in use
Clases en uso:
==============
1 ERROR
2 HBCLASS
3 HBOBJECT
4 TFONT
5 TWINDOW
6 TCONTROL
7 TICON
8 TBRUSH
9 TMENU
10 TREG32
11 TMENUITEM
12 TMSGBAR
13 TRECT
14 TMSGITEM
15 TTIMER
16 TBAR
17 TBTNBMP
18 TCALC
19 TDIALOG
20 TSAY
21 TBUTTON
22 TXBROWSE
23 TXBRWCOLUMN
24 TSCROLLBAR
25 TCLIPBOARD
Análisis de memoria
===================
758 Variables estáticas
Consumo de memoria dinámica:
Valor actual: 4718592 bytes
Valor máximo: 4718592 bytesEstimado Antonio
Al querer guardar la impresión a PDF da éste error
Descripción del error: Error BASE/1004 No existe el método: CDOCUMENT
Argumentos:
[ 1] = A {"C:\Users\acuellar\AppData\Local\Temp\13842937.emf"} length: 1
Llamado desde: => CDOCUMENT( 0 )
Llamado desde: source\classes\printer.prg => MSPRINTTOPDF( 2334 )
Llamado desde: source\classes\rpreview.prg => TPREVIEW:SAVEAS( 1764 )
karinha wrote:Con el potente XHARBOUR, todo funciona a la perfección hasta el momento.
Gracias super maestro!
Insisto y solicito humildemente que los ejemplos de la carpeta \samples se devuelvan a su carpeta ORIGINAL. Llevo años usando la carpeta \SAMPLES en FiveWin, y buscar en ella con XDEV STUDIO es muy sencillo; ahora es imposible. Y para los nuevos usuarios, la búsqueda se vuelve pésima.
Regards, saludos.
Estimado João,
Que versión de xHarbour usas ?
Podrias compartir el codigo de ese dialogo para enviar emails ? Puedes enviarmelo ?
Vamos a reorganizar los samples, gracias por tu consejo :idea:
Antonio Linares wrote:Con el potente XHARBOUR, todo funciona a la perfección hasta el momento.
Gracias super maestro!
Insisto y solicito humildemente que los ejemplos de la carpeta \samples se devuelvan a su carpeta ORIGINAL. Llevo años usando la carpeta \SAMPLES en FiveWin, y buscar en ella con XDEV STUDIO es muy sencillo; ahora es imposible. Y para los nuevos usuarios, la búsqueda se vuelve pésima.
Regards, saludos.
Estimado João,
Que versión de xHarbour usas ?
Podrias compartir el codigo de ese dialogo para enviar emails ? Puedes enviarmelo ?
Vamos a reorganizar los samples, gracias por tu consejo :idea:
Con mucho gusto. Enviado vía WhatsApp. No puedes distribuirlo como material de archivo, pero puedes usarlo para estudiar y enseñar a otros como desees.
Gracias, tks.
Regards, saludos.
Estimado Antonio
La funcion HB_PING no se encuentra en Five64.a
acuellar wrote:Estimado Antonio
La funcion HB_PING no se encuentra en Five64.a
En el nuevo sistema de construcción de FWH basada en hbmk2 se nos ha pasado incluir Borland 7 64 bits :!:
Tu observación ha sido la clave para darnos cuenta, Gracias :!: :)
Hola Antonio.
He logrado compilar mi proyecto de mi sistema SEM con el nuevo FWH 26.03 y todo funcionando correctamente.
Hice la prueba del FW_SetDarkMode() con exito! y esto le da otra opcion al sistema para que los clientes puedan tener esta nueva opcion.
Seguire haciendo mas pruebas e implementado lo nuevo de esta nueva version 26.03 a mi sistema.
Gran trabajo Antonio.
Saludos cordiales.
Carlos.
acuellar wrote:Estimado Antonio
Al querer guardar la impresión a PDF da éste error
Descripción del error: Error BASE/1004 No existe el método: CDOCUMENT
Argumentos:
[ 1] = A {"C:\Users\acuellar\AppData\Local\Temp\13842937.emf"} length: 1Pila de llamadas
Llamado desde: => CDOCUMENT( 0 )
Llamado desde: source\classes\printer.prg => MSPRINTTOPDF( 2334 )
Llamado desde: source\classes\rpreview.prg => TPREVIEW:SAVEAS( 1764 )
Estimado Antonio
Porfa revisar éste error
Hola Antonio...
Este no sale con la versiones de FW 2512 hacia atras--- solo con la 2603
Ruta y nombre: D:\PRGS\SIAE\BIN\SIAE.EXE (32 bits)
Tamaño: 2,724,352 bytes
Versión del compilador: Harbour 3.2.0dev (r2407221137)
Versión de FiveWin: FWH 26.03
Versión del compilador C: Borland/Embarcadero C++ 7.7 (32-bit)
Windows 11 64 Bits, version: 6.2, Build 9200
Tiempo desde inicio: 43 sec
Error ocurrido en: 28-03-2026, 09:03:08
Descripción del error: Error FiveWin/2 Duplicated Id: No: 120
Llamado desde: source\classes\dialog.prg => TDIALOG:DEFCONTROL( 404 )
Llamado desde: source\classes\xbrowse.prg => TXBROWSE:NEW( 874 )
Llamado desde: source\classes\xbrowse.prg => XBROWSENEW( 18252 )
Llamado desde: ..\prg\SIAE04.PRG => VENTAELEC( 430 )
Llamado desde: ..\prg\SIAE.PRG => (b)MAIN( 211 )
Llamado desde: source\classes\btnbmp.prg => TBTNBMP:CLICK( 820 )
Llamado desde: source\classes\btnbmp.prg => TBTNBMP:LBUTTONUP( 1107 )
Llamado desde: source\classes\control.prg => TCONTROL:HANDLEEVENT( 1887 )
Llamado desde: source\classes\btnbmp.prg => TBTNBMP:HANDLEEVENT( 2150 )
Llamado desde: source\classes\window.prg => _FWH( 4019 )
Llamado desde: source\classes\window.prg => WINRUN( 0 )
Llamado desde: source\classes\window.prg => TMDIFRAME:ACTIVATE( 1205 )
Llamado desde: ..\prg\SIAE.PRG => MAIN( 261 )
CPU type: Intel(R) Core(TM) i7-9700T CPU @ 2.00GHz 1992 Mhz
Hardware memory: 12070 megs
Recursos del sistema libres: 90 %
Recursos GDI: 90 %
Recursos de usuario: 90 %
Total de aplicaciones Windows en ejecución: 1
1 ,
Procedimiento Tipo Valor
TDIALOG:DEFCONTROL
Param 1: O Class: ERROR
TXBROWSE:NEW
Param 1: O Class: TXBROWSE
XBROWSENEW
Param 1: O Class: TDIALOG
Local 1: U
VENTAELEC
Param 1: O Class: TDIALOG
Param 2: N 0
Param 3: N 0
Param 4: U
Param 5: U
Param 6: U
Param 7: U
Param 8: U
Param 9: B {
Param 10: U
Param 11: U
Param 12: O Class: TFONT
Param 13: U
Param 14: N 16777215
Param 15: N 13815298
Param 16: U
Param 17: L .F.
Param 18: A Len: 1
Param 19: U
Param 20: L .F.
Param 21: U
Param 22: L .F.
Param 23: N 205
Param 24: L .F.
Param 25: L .F.
Param 26: U
Param 27: U
Param 28: U
Param 29: U
Param 30: L .F.
Param 31: L .T.
Param 32: L .F.
Param 33: L .T.
Param 34: U
Param 35: U
Param 36: U
Param 37: U
Param 38: L .F.
Param 39: L .F.
Param 40: C "oBrw"
Param 41: U
Local 1: U
Local 2: U
Local 3: U
Local 4: U
Local 5: U
(b)MAIN
Param 1: O Class: TMDIFRAME
Param 2: O Class: FWMARIACONNECTION
Param 3: O Class: TBAR
Param 4: O Class: TBTNBMP
Local 1: O Class: TDIALOG
Local 2: U
Local 3: O Class: TCURSOR
Local 4: O Class: TFONT
Local 5: O Class: TFONT
Local 6: O Class: TFONT
Local 7: O Class: TFONT
Local 8: O Class: TFONT
Local 9: O Class: TFONT
Local 10: O Class: TFONT
Local 11: O Class: TSAY
Local 12: O Class: TMDICHILD
Local 13: U
Local 14: U
Local 15: U
Local 16: U
Local 17: U
Local 18: A Len: 1
Local 19: N 1
Local 20: U
Local 21: U
Local 22: A Len: 0
Local 23: C "BOLETA"
Local 24: N 1
Local 25: A Len: 4
Local 26: L .F.
Local 27: L .F.
Local 28: A Len: 7
Local 29: A Len: 13
Local 30: A Len: 9
Local 31: C "03"
Local 32: C "MODO : PRODUCCION OP:GERENCIA
PROCESO MANUAL"
Local 33: B {
Local 34: C ""
Local 35: N 1.00
Local 36: N 0
Local 37: N 0
Local 38: N 0
Local 39: N 0
Local 40: N 0
Local 41: N 0
Local 42: N 0
Local 43: C "0010"
Local 44: C "OFICINA"
Local 45: N 1
Local 46: O Class: TBTNBMP
Local 47: O Class: TBTNBMP
Local 48: U
Local 49: L .F.
Local 50: U
Local 51: A Len: 30
Local 52: N 0
Local 53: C ""
Local 54: N 0
Local 55: L .F.
Local 56: U
Local 57: O Class: TBTNBMP
Local 58: A Len: 30
Local 59: N 1
Local 60: O Class: TTIMER
Local 61: L .T.
Local 62: B {
Local 63: C "INTERNET"
Local 64: C ""
Local 65: N 0.00
Local 66: L .T.
Local 67: L .F.
Local 68: N 1
Local 69: B {
Local 70: A Len: 19
Local 71: A Len: 3
Local 72: A Len: 3
Local 73: U
Local 74: B {
Local 75: B {
Local 76: B {
Local 77: U
Local 78: O Class: TBTNBMP
Local 79: O Class: TBTNBMP
Local 80: O Class: TBTNBMP
Local 81: U
Local 82: U
Local 83: A Len: 0
Local 84: U
Local 85: N 0
Local 86: U
Local 87: C ""
Local 88: A Len: 4
Local 89: N 0
Local 90: O Class: TBTNBMP
Local 91: U
Local 92: L .T.
TBTNBMP:CLICK
Param 1: O Class: TBTNBMP
TBTNBMP:LBUTTONUP
TCONTROL:HANDLEEVENT
Param 1: N 14
Param 2: N 89
Param 3: N 0
Local 1: L .T.
Local 2: N 0
Local 3: S @CLICK()
TBTNBMP:HANDLEEVENT
Param 1: N 514
Param 2: N 0
Param 3: N 917593
Local 1: U
_FWH
Param 1: N 514
Param 2: N 0
Param 3: N 917593
WINRUN
Param 1: N 917593
Param 2: N 514
Param 3: N 0
Param 4: N 917593
Param 5: N 10
Local 1: O Class: TBTNBMP
TMDIFRAME:ACTIVATE
Param 1: N 525534
MAIN
Param 1: C "MAXIMIZED"
Param 2: U
Param 3: B {
Param 4: U
Param 5: B {
Param 6: B {
Param 7: U
Param 8: B {
Param 9: U
Param 10: U
Param 11: U
Param 12: U
Param 13: U
Param 14: U
Param 15: U
Param 16: U
Param 17: B {
Param 18: U
Param 19: U
Param 20: L .F.
Param 21: U
Local 1: O Class: TMDIFRAME
Local 2: U
Local 3: U
DBF
DBFFPT
DBFBLOB
DBFCDX
DBFNTX
1 ERROR
2 HBCLASS
3 HBOBJECT
4 TFONT
5 TBRUSH
6 TVARGENERAL
7 TWINDOW
8 TCONTROL
9 TGET
10 TCOMBOBOX
11 TFILE
12 TTXTFILE
13 TDIALOG
14 TXBROWSE
15 TREG32
16 TXBRWCOLUMN
17 TSCROLLBAR
18 TCLIPBOARD
19 TRECT
20 TCURSOR
21 TSAY
22 TBUTTON
23 TXIMAGE
24 FWMARIACONNECTION
25 FWROWSET
26 FWMARIAROWSET
27 TFIELD
28 TFIELDS
29 TBITMAP
30 GET
31 TCLIPGET
32 TBTNBMP
33 TTIMER
34 TPROGRESSWHEEL
35 BRUSH
36 PATH
37 MYREGION
38 PATHGRADIENTBRUSH
39 GRAPHICS
40 TICON
41 TMDIFRAME
42 TMENU
43 TMENUITEM
44 TMDICLIENT
45 TBAR
46 TMSGBAR
47 TMSGITEM
48 WIN_OLEAUTO
49 TOLEAUTO
50 TMDICHILD
51 TSTRUCT
854 Variables estáticas
Consumo de memoria dinámica:
Valor actual: 3735552 bytes
Valor máximo: 3735552 bytes
Hola Antonio, estuve uno dias fuera, no se si podré probar tambien el nuevo FW. Si aun hay tiempo, estaría muy interesado en probarlo. Desde ya muchas gracias. Te mando un whatsapp por adelantado. Abrazo grande y gracias por el aporte!
