FiveTech Software tech support forums

... DEFINE IMAGE oImagem FILENAME cImagem oBrush := TBrush():new( ,,,, ResizeBmp( oImagem:hBitmap, 600, 600, .T. ) ) oImagem:End() oDlg:SetBrush( oBrush ) oBrush:End() Return NIL *----------------------------------------------------------------------------------*

... oPanel1 is a ttaskpanel //the shadow oItem1:=Tpanel():New( oPanel1:nTitleHeight +10, 10,; oPanel1:nBottom-30,oPanel1:nWidth-40, oPanel1 ) oItem1:SetBrush( oBrushshadow ) //panel for the text oItem2:=Tpanel():New( 2, 2,; oItem1:nBottom-45,oItem1:nWidth-4, oItem1) oItem2:SetBrush( oBrushtext ) ...

... FROM 118, 266 TO 561, 801 PIXEL ; COLOR 0, 14215660 DEFINE BUTTONBAR oBar OF oWnd _3D Size 030, 030 DEFINE BUTTON oBtn1 OF oBar oBar:SetBrush( oBrush ) ACTIVATE WINDOW oWnd RETURN NIL lo que pasa y necesito es el el jpg se ajuste a toda la tbar se podra?

... If( lInvert, aBru[ 2 ]:hBrush, aBru[ 1 ]:hBrush ) }   oBtn:disable()  RETURN NIL  another types Horizontal SetBrush( "HORIZONTAL", nRGB( 0, 255, 0 ) ) Vertical SetBrush( "VERTICAL", nRGB( 20, 30, 40 ) ) FDiagonal SetBrush( "FDIAGONAL", ...

... BRUSH oBrush1 FILE "MARBLE.bmp" DEFINE BRUSH oBrush2 FILE "MARBLE6.bmp" DEFINE WINDOW oWnd FROM 70, 70 TO 400, 500 PIXEL oWnd:SetBrush( oBrush1 ) DEFINE DIALOG oDlg RESOURCE "Test" OF ownd PIXEL // TRANSPARENT oDlg:SetBrush( oBrush2 ) REDEFINE SAY oSay1 PROMPT "Test ...

I use a brush to colorize a dialog DEFINE BRUSH oBrush1 COLOR COLORE_MIO oApp:oMyDialog:SetBrush(oBrush1) for reasons that I am not here to list now I would need to know if I can color a two-color dialog i.e. having a light blue color for two fingers above and another ...

... := TBrush():new( ,,,, ResizeBmp( oImage:hBitmap, aRect[4], aRect[3], .T. ) ) // 1 = stretch, 2 : fitoutside, 3:fitinside oImage:End() oMetro:SetBrush( oBrush ) RELEASE BRUSH oBrush is it possible to define a metro-image-background without using FREEIMAGE ? regards Uwe :?: Except the TImage() ...

... := TBrush():new( ,,,, ResizeBmp( oImage:hBitmap, aRect[4], aRect[3], .T. ) ) // 1 = stretch, 2 : fitoutside, 3:fitinside oImage:End() oMetro:SetBrush( oBrush ) RELEASE BRUSH oBrush is it possible to define a metro-image-background without using FREEIMAGE ? regards Uwe :?:

... WS_POPUP ); COLOR CLR_WHITE, CLR_GREEN oMetro := MakeMetroPanel( oMWnd ) DEFINE BRUSH oBrush FILE c_Path1 + "earth.bmp" RESIZE oMetro:SetBrush( oBrush ) oBrush:End() oMetro:bRClicked := { |r,c,f,o| msginfo( 'HWND' + NUMTOHEX( oMWnd:hWnd, 8 ) ) } ACTIVATE WINDOW oMWnd ON INIT oMetro:Show() ...

I tried to insert

IF !Empty(cBackBrush)
DEFINE BRUSH oBrush1 FILENAME cBackBrush
ELSE
DEFINE BRUSH oBrush1 COLOR COLORE_SABBIA
ENDIF

oPanel:bResized := { || oPanel:SetBrush( oBrush1) }

but it is the same

I wish create a colored panel but I cannot show the border ...why ?
this is the sources :

oPanelCustomer:=Tpanel():New( 35, 5, 55, oFld:aDialogs[1]:nWidth-5, oFld:aDialogs[1])
oPanelCustomer:SetBrush( oBrushGreen )
oPanelCustomer:WinStyle(WS_BORDER, .t.)

... WS_POPUP ); COLOR CLR_WHITE, CLR_GREEN oMetro := MakeMetroPanel( oMWnd ) DEFINE BRUSH oBrush FILE c_Path1 + "earth.bmp" RESIZE oMetro:SetBrush( oBrush ) oBrush:End() oMetro:bRClicked := { |r,c,f,o| msginfo( 'HWND' + NUMTOHEX( oMWnd:hWnd, 8 ) ) } ACTIVATE WINDOW oMWnd ON INIT oMetro:Show() ...

I tried with

aGrad :={ { 1, CLR_BLUE, CLR_WHITE } }
DEFINE BRUSH oBrush GRADIENT aGrad
oPanel:=TPanel(5,215,155,305,oDlg)
oPanel:SetBrush( oBrush )

I see all black!!!

... // ----------------------- oBrush := WD_BACKGRD( oMetro, aVal[1], aVal[2], aVal[3], aVal[5], aVal[4], aVal[6], aVal[7] ) oMetro:SetBrush( oBrush ) oBrush:End() cText := "Stammdaten" aPalBmp := oWnd:ReadPalBmpEx( c_Pfad1 + "Blustone.bmp", nil, .t. ) pBrush ...

... oBrush := TBrush():new( ,,,, ResizeBmp( oImage:hBitmap, aRect[4], aRect[3], .T. ) ) // 1 = stretch, 2 : fitoutside, 3:fitinside oImage:End() oDlg:SetBrush( oBrush ) oBrush:End() define a new size and REDO using the original aRect best regards Uwe :?: