FiveTech Software tech support forums

Good morning! I'm going to post here the two codes I made as an example (the second is used here on the forum), in the first the background image is the way I need it, taking up 3/4 of the screen, but the second image is not transparent. In the second, the image occupies the entire screen and the im...

Mr. Nages, I use the class TImprime and TUtilprn (provided years ago by Rafa Carmona ). At the moment this is how it works for me (more or less): ndummyaltura := ( ::oPrn:CmVertPhySize() / 2 ) + ( ::oPrn:CmtrGetTextWidth( AllTrim( ::oTDbfDatAmp:REGMER ), ::oFnt_Arial6V ) / 2 ) UTILPRN ::oUtil ndumm...

Mr. Nages, I use the class TImprime and TUtilprn (provided years ago by Rafa Carmona ). At the moment this is how it works for me (more or less): ndummyaltura := ( ::oPrn:CmVertPhySize() / 2 ) + ( ::oPrn:CmtrGetTextWidth( AllTrim( ::oTDbfDatAmp:REGMER ), ::oFnt_Arial6V ) / 2 ) UTILPRN ::oUtil ndummy...

Saludos tengo una actualización a FWH24.02 y veo que al abrir la ventana el Xbrowse se monta sobre el la barra de botones cosa q no pasaba antes DEFINE WINDOW oWnd FROM 0,0 TO nHeith,nWith PIXEL MDICHILD OF oWind ; TITLE "Mantenimiento de Valorizaciones" ICON oIco NOZOOM NOICONIZE @ 10,10 ...

LISTO !!!! ya logre que compile la prueba y ejecute bien. lo que no logro es cambiar el color del texto del titulo del dialogo ni tampoco como hacer que no sea transparente. he probado asi y nada Define Dialog oDlg TITLE "Class TSKIN" PIXEL Resource "Sample1" STYLE WS_POPUP color...

... 45, 13 PIXEL FLAT NOROUND GDIP   OF oDlg ;      ACTION NILFor n= 1 to len(oBtn) obtn[n]:bClrGrad  := < |u,oBtn|         local clr      := RGB( 245,245,235)         if oBtn:lActive            if oBtn:lMOver               clr   := {{ 1, RGB( 250,250,245),RGB( ...

... Black Box https://i.postimg.cc/Z5y5F83c/llll.png I tried also with For n= 1 to len(oBtn) obtn[n]:bClrGrad := < |u,oBtn| local clr := RGB( 245,245,235) if oBtn:lActive if oBtn:lMOver clr := {{ 1, RGB( 250,250,245),RGB( 250,250,245) }} elseif oBtn:lPressed clr := RGB( 180,136,85 ...

seem not run ok TTItle class with a dialog TRansparent DEFINE DIALOG oDlg SIZE aCooDlg[1], aCooDlg[2] PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, rgb(245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) ICON oIcon ...

seem not run ok TTItle class with a dialog TRansparent DEFINE DIALOG oDlg SIZE aCooDlg[1], aCooDlg[2] PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, rgb(245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) ICON oIcon ...

What about? If you like it, I'll post the code. ¿Que tal? Si te gusta, publicaré el código. https://imgur.com/vZ67LOJ https://i.imgur.com/vZ67LOJ.png I LOVE FIVEWIN!! hahahahahaha, Regards, saludos. You still haven't understood anything!!!! and you insist on taking the piss ...

No puede ser asi? // C:\FWH\SAMPLES\SILVTIT.PRG#include "fivewin.ch"#include "ttitle.ch"#define CLR_MSPURPLE RGB( 128,  57, 123 )#define CLR_MSRED    RGB( 232,  17,  35 )#define CLR_MSGRAY   RGB( 229, 229, 229 )FUNCTION Main()   LOCAL oDlg, oFont,...

seem not run ok TTItle class with a dialog TRansparent DEFINE DIALOG oDlg SIZE aCooDlg[1], aCooDlg[2] PIXEL TRUEPIXEL; FONT oFont TITLE "Configurazione" COLOR CLR_BLACK, rgb(245,245,235) TRANSPARENT; STYLE nOR( DS_MODALFRAME, WS_POPUP, WS_CAPTION, WS_SYSMENU, ; WS_MINIMIZEBOX) ICON oIcon @...

Buenos dias. Tengo una DBF que muestro con un xBrowse. la DBF tiene 2 indices, uno de los cuales es combinado de NOMBRE+DESCEND(dtos(FECHAPAGO)) . El problema es que con el primer indice muestra perfecto los datos y me puedo mover por ellos sin problemas, pero cuando paso al indice mencionado inicia...

Estimado José. Si saco los refresh() ( que lo hice ) no me actualiza ni el get ni el detalle la variable se pasa con @ pero se recibe sin ella. Todo lo sugerido lo intente y no va. asi me quedo el codigo en discordia Function Materiales() local ...... DEFINE DIALOG oDlgMa RESOURCE "Material&quo...

Joao y José: Gracias por molestarse!!! Algo debo esta haciendo mal ( muy Mal ) No logro hacerlo funcionar. mi fuente es asi: ..... REDEFINE GET oRamo VAR nRamo PICTURE "99" ID Ma_Ramo OF oDlgMa valid veoramo(@nRamo,@cVeoRamo) .and. (oRamo:Refresh(),oVeoRamo:Refresh(),.t.) REDEFINE SAY oVeo...