Page 1 of 2
No puedo usar Scrollmsg? :-(
Posted: Thu Jun 12, 2025 10:57 pm
by Adolfo
Hola Fivewinners
Tengo la imposibilidad de usar la clase Scrollmsg en la configuracion que tengo, que es esta.
Harbour 3.2.0dev (r2407221137)
FWH32 24.09
Microsoft Visual Studio 2022
Compilador de optimización de C/C++ de Microsoft (R) versión 19.41.34120 para x86
Si hago el intento en la version HB3.0 y FWH21 con MSVC 2022, SI FUNCIONA
Aca les dejo el link de todos los archivos que use para replicar el problema, esta el ejecutable que muestra que sucede, solo hay un pequeño punto que parpadea en la esquina superior izquierda.
Por eso habia pedido primero si alguien podia hacer el ejemplo que vienen en la carpeta samples de FWH y luego trate de reinstalar Harbour y MSVC 2022, sin nigun exito.
xdata.cl/envio
Que estoy haciendo mal, me falta alguna libreria, que?
Cualquier ayuda sera bienvenida.
Saludos desde Chile
Re: No puedo usar Scrollmsg? :-(
Posted: Fri Jun 13, 2025 6:37 am
by Antonio Linares
Estimado Adolfo,
Si te refieres a samples\scrolmsg.prg aqui funciona correctamente con FWH 25.04 y buildh.bat
buildh.bat scrolmsg
Re: No puedo usar Scrollmsg? :-(
Posted: Fri Jun 13, 2025 1:22 pm
by karinha
Adolfo, mira se hay algun .EXE en la carpeta \samples del fwh24.09, puede ser un vírus. Use AVG.exe
https://imgur.com/TAB13DH
Regards, saludos.
Re: No puedo usar Scrollmsg? :-(
Posted: Sun Jun 15, 2025 5:19 pm
by nanoespinoza
Estimados todos
Siguiendo este hilo sobre clase SCROLLMSG, la he probado y efectivamente si funciona, pero igualmente tiene unos problemas que quisiera comentar:
1) Hay un método SetTimer(), el cual no tiene parámetros, que al usarlo con o sin un valor numérico (uno supone que habría que ponerlo), hace que el texto que debe circular, como en una marquesina, se quede estático. No sé, si ese será el objetivo.
2) El método TimerAction(), no entiendo para qué sirve o como usarlo.
3) El método Destroy(), pareciera que es para cerrar el control, pero no funciona, si lo cierras con oScroll:End(), funciona bien.
4) Puesto a funcionar el control SCROLLMSG, sin SetTimer(), funciona bien, pero luego de unos minutos si estas usando tu aplicación, con otras funciones o diálogos, lo bloquea y la única forma de salir, es con la X de la esquina superior derecha.
En fin, parece un control interesante y que puede ser útil en algunas situaciones, pero, al parecer, está como incompleto o no lo entiendo bien.
A la espera de sus comentarios y soporte.
Saludos
Fernando Espinoza A.
Re: No puedo usar Scrollmsg? :-(
Posted: Mon Jun 16, 2025 12:06 pm
by karinha
Buenos días, Fernando. Sin duda, DSAY.PRG y SSAY.PRG son más completos y seguros. Aquí tienes una descarga completa para que la pruebes:
DSAY.PRG:
https://mega.nz/file/kNcBTKjA#ViF4H4zNN ... sRPhdMTedY
SSAY.PRG:
https://mega.nz/file/5QVUzRSS#CxqVYgUT9 ... 5keQMGoccg
Regards, saludos.
Re: No puedo usar Scrollmsg? :-(
Posted: Tue Jun 17, 2025 5:03 am
by nanoespinoza
Estimado Karinha:
Hice la primera prueba con DSAY, compila bien y se genera el EXE, puse el control en el escritorio de mi aplicación, por tanto el DYNAMIC SAY se ejecut de inmediato al cargar la aplicación, pero de inmediato salta este error.
Estoy usando xHarbour, FWH2501 y compilo con Fivedit.
Application
===========
Path and name: C:\Sicef_desarrollo\SICEFWIN.exe (32 bits)
Size: 7,411,712 bytes
Compiler version: xHarbour 1.3.1 Intl. (SimpLex) (Build 20240624)
FiveWin version: FWH 24.10
C compiler version: Borland/Embarcadero C++ 7.7 (32-bit)
Windows 10 64 Bits, version: 10.0, Build 26100
Time from start: 0 hours 0 mins 8 secs
Error occurred at: 16/06/2025, 23:59:25
Error description: Error FiveWin/6 Cannot create window or control:
Class: TDSAY
Saludos
Fernando Espinoza A.
Re: No puedo usar Scrollmsg? :-(
Posted: Tue Jun 17, 2025 3:13 pm
by karinha
Buenas tardes Fernando, qué raro. Por favor, comparte el código para que pueda ver cómo lo haces.
Si está utilizando RECURSOS, debe definir un control TDSAY en el cuadro de diálogo.
Gracias, tks.
Regards, saludos.
Re: No puedo usar Scrollmsg? :-(
Posted: Tue Jun 17, 2025 4:38 pm
by nanoespinoza
Estimado Karinha:
El llamado se hace sin recursos, con esta sintaxis.
Code: Select all | Expand
@ oVent:nVertRes()-298-nCorrErr,124 DYNAMIC SAY oScroll VAR cPrompt ; // MemoRead("NOVEDADES.TXT") ;
OF oVent PIXEL SIZE 270,178 FONT oFont7 COLORS CLR_HRED,CLR_LGREEN VERTICAL SCROLL SPEED 1
oScroll:cToolTip:={"Lista de las Novedades o últimas mejoras implementadas en SicefWin","SicefWin "+cVersSW,1,CLR_WHITE,CLR_GREEN}
Saludos
Fernando Espinoza A.
Re: No puedo usar Scrollmsg? :-(
Posted: Tue Jun 17, 2025 4:42 pm
by karinha
¿Copiaste DSAY.CH a C:\FWH..\INCLUDE?
¿Incluiste la clase DSAY.PRG en el proyecto?
Re: No puedo usar Scrollmsg? :-(
Posted: Wed Jun 18, 2025 2:21 am
by nanoespinoza
Las 2 cosas, por ello, es que logro crear el .EXE.
Re: No puedo usar Scrollmsg? :-(
Posted: Wed Jun 18, 2025 9:35 am
by karinha
Harbour ó xHarbour? Voy crear un DEMO e probar nuevamente. Lamentablemente no tengo FWH24.09. Podría ser un defecto de esta versión.
Regards, saludos.
Re: No puedo usar Scrollmsg? :-(
Posted: Wed Jun 18, 2025 12:13 pm
by karinha
Compilando con HARBOUR y xHARBOUR ahora. Funciona perfecto. Mira CX.BAT y CX.LNK y HB.BAT y HB.LNK cambie a gusto.
Download completo:
https://mega.nz/file/9N1C2DDD#IerDgn_OW ... dOioY0kD8Q
Gracias, tks.
Regards, saludos.
Re: No puedo usar Scrollmsg? :-(
Posted: Wed Jun 18, 2025 12:19 pm
by karinha
Imagen:
https://imgur.com/4coam4o
Regards, saludos.
Re: No puedo usar Scrollmsg? :-(
Posted: Wed Jun 18, 2025 12:31 pm
by karinha
Fernando, con @SAY, no use: VAR cPrompt, mira en el ejemplo. Use DYNAMIC SAY cPrompt.
Regards, saludos.
Re: No puedo usar Scrollmsg? :-(
Posted: Fri Jun 20, 2025 4:38 am
by nanoespinoza
Hice la prueba con los nuevos archivos, lamentablemente tengo el mismo resultado; yo uso xHarbour y FHW2501.
Saludos