Manuel Valdenebro wrote:Raymundo,
A mi me da error los Box.- Me dice "La aplicación GDI.EXE no es una imagen válida".
¿Que error te da a tí?.
Le he enviado un email a Rafa Carmona, por si pudiera echarnos una mano.
Ya te envie las clases
para 32 bits.
Seria cojonudo que Mister Antonio las incluyera como contrib en Fivewin,
¿Antonio ?, tienes mi total consentimiento, como siempre
, en coger lo que done a la comunidad y ponerlo en Fivewin.
La solucion es la siguiente, en la clase TUtilPrn , poneis esto:
******************************************************************************
******************************************************************************
#IFDEF __HARBOUR__
DLL FUNCTION RoundRect( hDC AS LONG, ;
iLeft AS _INT , iTop AS _INT, ;
iRight AS _INT, iBottom AS _INT, ;
iWidth AS _INT, iHeight AS _INT ) AS BOOL PASCAL LIB "GDI32.DLL"
#ELSE
DLL FUNCTION RoundRect( hDC AS WORD, ;
iLeft AS _INT , iTop AS _INT, ;
iRight AS _INT, iBottom AS _INT, ;
iWidth AS _INT, iHeight AS _INT ) AS BOOL PASCAL LIB "GDI.EXE"
#ENDIF
Seria interesante que Fivewin imlemente esta funcion, si no lo hace ya, porque de esto hace muchisimo tiempo
Saludos
Rafa Carmona