FiveTech Software tech support forums

Small sample complete?

tks.

Regards, saludos.

... option? IF I made for a sample @ nRow,oBox[1]:nLeft+60 CHECKBOX aDat[ 5] VAR l05 Prompt axArray[ 5, 2 ] SIZE 350, 20 PIXEL OF oDlg aDat[ 5]:lTransparent:=.t. this gate covers the lower part of the dialog, hiding the other controls that are there If I rem aDat[ 5]:lTransparent:=.t. Not happend ...

... shown behind the controls too. If we want to display the background (color/brush/gradient) of a control to be shown, then we should set oControl:lTransparent := .F. in the dialog's init clause. Please test the small sample. This way you can show the gradient of oTitle on a transparent dialog. ...

... shown behind the controls too. If we want to display the background (color/brush/gradient) of a control to be shown, then we should set oControl:lTransparent := .F. in the dialog's init clause. Please test the small sample. This way you can show the gradient of oTitle on a transparent dialog. ...

... ACTION Eval(Graba) REDEFINE BTNBMP oCancelar ID Ma_Cancelar OF oDlgMa FILENAME "CANCELA.BMP" CANCEL ACTION oDlgMa:End() oAceptar:lTransparent = .t. oCancelar:lTransparent = .t. ACTIVATE DIALOG oDlgMa CENTERED if lSave if agrega Materia->(DbAppend()) Materia->Codigo := nCodigo ...

... forma lo declaro. REDEFINE ICON oIcono ID MiMje_Icono OF oDlg ; FILENAME "PREGUNTA.ICO" oIcono:nWidth = 48 oIcono:nHeight = 48 oIcono:lTransparent = .t. José, nos é mejor usar una BITMAP en este caso?    REDEFINE BITMAP oBtnA ID 120 RESOURCE "APROVAR" TRANSPARENT ...

gracias por tu tiempo Joao!!
de esta forma lo declaro.

REDEFINE ICON oIcono ID MiMje_Icono OF oDlg ;
FILENAME "PREGUNTA.ICO"
oIcono:nWidth = 48
oIcono:nHeight = 48
oIcono:lTransparent = .t.

... ; MESSAGE "Mantenimiento de Cobros"; PROMPT "Cobros" oBoton1:lTransparent = .t. y se que solo estoy cambiando 1 vez la imagen Gracias igualmente!!!!

... oBoton1 OF oBar FILE "Efectivo.bmp" ; ACTION Cobros() ; MESSAGE "Mantenimiento de Cobros"; PROMPT "Cobros" oBoton1:lTransparent = .t. necesito que al oprimirlo muestre la imagen "cheque.bmp" Gracias

... ( val_cli( 9999 ), onrocli:Refresh(), onomcli:refresh(), odircli:refresh(), BuscoAntInfo( xnrocli, xNUsuario, ofld1:aDialogs[ 1 ] ), .t. ) BtnB:lTransparent = .t. REDEFINE say onomcli var xnombre ID 202 OF ofld1:aDialogs[ 1 ] REDEFINE say odircli var xdomic ID 206 OF ofld1:aDialogs[ 1 ] REDEFINE ...

... bClrTabs, bClrText, aAlign, ; lAdjust, nSeparator, nOption, bPopUp, lStretch, ; cLayOut, bBmpAction, nBright, lAnimate, nSpeed, oFontDefault, ; lTransparent, aDialogs, lBorder, nClrPane, cVarName ) so ON PAINT TAB  -> bClrTabs ON PAINT TEXT -> bClrText

... [ Upper(<(layout)>) ], [{|Self,nOption| <uAction>}], <nBright>,; <.lAnimate.>, [<nSpeed>], <oFont>, <.lTransparent.>, [\{<cDlgsName>\}], ; <.lBorder.>, <nClrPane>, [<(oFolder)>] )      oTab_Left  := TFolderEx() :New( ...

Please try oSay:lTransparent :- .F.

Note: I did not try it myself here.

Hey Rolando, Tried it, but no changes. It seems also that lTransparent = .f. by default. It however gave me the idea to look at the settings : and see if that make any changes. Static Function StyleBrowse( oBrwSel, aBarget, aEditget, cNaam )  ...

Searching for the word "splash" in the programs in fwh\source folder, we find 1) MsgLogo( cImageFile, [nSeconds], [lTransparent] ) // old 2) MsgSplash( cImageFile, [nSeconds], [bAction], [lTransparent] ) Using bAction parameter, we can do silent tasks like connecting to server, ...