FiveTech Software tech support forums

Yo personalmente utilizo la funcion: FUNCTION NoScape() RETURN !( GetKeyStat( 27 ) ) Y la llamo desde un valid del dialogo: DEFINE DIALOG oDlg ..... ... ... ACTIVATE oDlg VALID NoScape() Observa que la función devuelve .T. cuando no se ha pulsado Escape. Por si quieres utilizarlo en conjunción con o...

No sé si estoy en lo cierto o no, pero creo que lo que RBECARES confunde eventos con mmensajes a clases, y lo que progunta, es una cosa que a mí también me interesaría saber con exactitud; y es: en qué secuencia ejecuta el Windows los METHOD's de las clases. Personalmente, creo que es, al principio:...

Intenta EXI:SetColor( RBG(0,0,0) RBG(128,130,255) ).
Prueba primero poniéndolo antes del ACTIVATE del Dialogo o, sino, prueba: ON INIT EXI:SetColor( RBG(0,0,0) RBG(128,130,255) ).
Debería funcionar.

No sé exactamente por donde se te descuandran los digitos. Por la derecha o por la izquierda. En teoría, según tu código, deberían salir alineados a la derecha, pues seguramente enviaras menos dígitos que "9" tiene la máscara (picture). Si quieres que salgan justificados a la izquierda, a ...

No se que versión tienes de la clase TDIAG, que como la he cambiado ligeramente, te la vuelvo a pegar a continuación. Después te explico como la uitlizo: #Include "FiveWin.ch" #define GWL_STYLE -16 #define GWL_EXSTYLE -20 #define WS_EX_TRANSPARENT 32 CLASS TDIAG OF TDIALOG CLASSDATA lRegis...

Quizá tengas que averiguar cuales son las secuencias de escape de tu impresora y mandarselas, vía PrinterEsc(), nada más definir el TPRINTER. Intenta mandar, primero, la secuencia de inicialización. Muchas veces es CHR(27)+"@" o algo así. Después, la de tamaño de pagina. Algo similar a CHR...

Gracias Antonio, nos aguantaremos con lo que hay. Por ahora.

Tengo un pequeño problema que no sé si se puede solucionar. Resulta que programo con Windows Me, pero mi ultima aplicación tiene que correr en XP. Claro, como es FW 16 Bits los windows/dialogs tienen aspecto de windows 95/98/Me con una pequeña pega, la barra de títulos, en Xp, aparece más gruesa que...

Yo he utilizado alguna vez QSETUP STUDIO de PANTARAY no está mal. Si me das tu e-mail te lo mando.

¿Alguien me puede mandar TPRINTER y TDosPrint a mi correo particular?:

ramosframit@ono.com

muchas gracias.

Alguién sabe si se le puede asignar un Heap a una variable cualquiera. ¿Cómo se haría? La idea, es descargar la memoria tras utilizar variables/objetos de gran tamaño. Estaría bien asignarle un lugar exclusivo en memoria con un Heap para poder vaciarlo para recuperar esa memoria. El Get parece que l...

Tras corregir algunos bugs y poco más, ahora TGSAY también puede editar SAY's Multilinea.

TGSAY's now can edit Multiline SAY's

http://hyperupload.com/download/c35ea689/TGSAY.zip.html

Saludos/Regards

Cierto Marco, hace poco puibliqué una clase TDIAG, que como la he cambiado ligeramente, te la vuelvo a pegar a continuación: #Include "FiveWin.ch" #define GWL_STYLE -16 #define GWL_EXSTYLE -20 #define WS_EX_TRANSPARENT 32 CLASS TDIAG OF TDIALOG CLASSDATA lRegistered AS LOGICAL DATA lSomb A...

Me complace exponer algunos Datas que utilizo en mi clase GET que creo pueden interesar a más de una persona: 1º) Evaluar bValid sólo si hubo cambios en el Get. Esto es interesante cuando el valid supone habrir una base de datos para comprobar ciertas cosas. ¿Para qué abrirla si no hubo cambios? Sup...

El AEVAL sería así:

AEVAL(aDbf,{ |v,i| aDbf[i,3] := Val(v[3])}) // "i" es Indice y "v" es Valor, para cada elemento evaluado.

En cuanto a la velocidad, AEVAL es más rápido que FOR...NEXT pero desconozco si es más mejor que FOR EACH.

Un saludo