FiveTech Software tech support forums

tengo un dialogo con un listbox y necesito cambiar su tamaño de dibujado dinamicamente, he estado probando nleft, nwidth , ntop etc.. y ninguna forma de cambiar sus dimensiones parece funcionarme, el codigo que lo declara es este y luegoo no encuentro la forma de cambiar sus dimensiones, ...

... to propose these changes to the fwteam #define WHITE_PEN 6 // add this on top METHOD PaintBorder() CLASS TBtnBmp local nAdjustBorder := 0 local nWidth, nAdj, oCli local nRound := If( ::lRound, ::nRound, 0 ) local hWhitePen, hGrayPen, hOldPen add these line 1752 //if ! ::lPressedif !   ::lMOver  ...

>FW_DrawImage( hDC, "c:\fwh\bitmaps\alphabmp\ichat.bmp", {::nHeight-30, ::nWidth-25, ::nHeight - 10, ::nWidth-5}, .t. ) for me it's no good perhaps... data hBmpPop on METHOD Paint() CLASS TBtnBmp if ::oPopup != nil if ::hBmpPop != 0        DrawBitmap( ...

... ) ) ) )},, .T., 50,,;        .F.,, .F.,, "oFld" ) this i compare with Parameter in my CODE oTab_Left := TFolderEx() :New( 40 + nBB, 1, ( nWidth / 2 ) - 05, nHeight - 180 - nBB, oMain, ; aBitmaps, lPixel, lDesign, aPrompts, nFolderHeight, ; aHelps, nRound, bAction, bClrTabs, bClrText, ...

... Parameter of TFolderEx() :New() are ON PAINT TAB ON PAINT TEXT => ; [<oFolder> := ] TFoldereX():New( <nRow>, <nCol>, <nWidth>, <nHeight>,; <oWnd>, [\{<cbmps>\}], <.lPixel.>, <.lDesign.>, [\{<cPrompt>\}], ; <ntabheight>, [\{<cnHelpids>\}], ...

... nulo, el formato se devuelve en este parámetro. * Nuevo: Nueva función FW_ImageToBlob( [npImage], [cType], [nJpgQuality], ; [lAlpha], [nClrBack], [nWidth], [nHeight] ) ; --> cBlob - 1. npImage: Opcional. hBitmap o puntero de imagen GDI+. Si es nulo, por defecto hBitmap desde el portapapeles, ...

... I got the error is a simple btnbmp control that opens a popup menu https://i.postimg.cc/6TsL3c6w/mmmm.png @ oBrw:nBottom+2, oBrw:nWidth-20 BTNBMP aBtnBrow[3] ; FLAT .... ACTION ::ShowPopUp( { |oBtn| MenuContextual(oBtn,oBrw,oDbf,cIniUser,cSection,,,oDlg,aBtnBrow[4]) } ) Error ...

... and nFormat is nil, the format is returned in this parameter. * New: FW_ImageToBlob( [npImage], [cType], [nJpgQuality], ; [lAlpha], [nClrBack], [nWidth], [nHeight] ) ; --> cBlob - 1.npImage: Optional. hBitmap or GDI+ image pointer If nil, defaults to hBitmap from Clipboard, if available. - ...

... 0 )   Called from: source\ut_preview.prg => PRNIMAGE( 409 ) I cal this method with oPrn:PrintImage( nRow,nCol,cImage,nWidth,nBottom,; lStretch, nAlpha, lTransp, lGray,; cUnits, cAlign) where is the error ?

... DIALOG princfac CENTERED nowait ON INIT princfac:Move( 0, 0 ) //, oRich:LoadRtf( xobserva ), oRich:PostMsg( WM_KEYDOWN, VK_HOME, 0 )) oWndChild:nWidth := princfac:nWidth + 7 oWndChild:nHeight := princfac:nHeight + 32 ACTIVATE WINDOW oWndChild // ON INIT ( iif ( trabajard <> "S", ...

... oDlg:bPainted := < |hDC| oBtn:setsize(20,17.6) // this because the obtn is more big with png DRAWBORDER( hDC, oBtn:nLeft-2, oBtn:ntop-2,; oBtn:nWidth+2, oBtn:nHeight+2 , 0, 1, Rgb(195,195,185), .t. ) RETURN NIL > ACTIVATE DIALOG oDlg.... Result ( in my opinion it is better to see the bmp ...

... because I'm old man , but here I see the border color allways black https://i.postimg.cc/CKC4YVFZ/k.jpg @ oBrw:nBottom+1, oBrw:nWidth-44.4 BTNBMP aBtnBrow[1] SIZE 20,20 PIXEL OF oDlg NOROUND 2007 aBtnBrow[1]:bClrGrad := { |lInvert| If( lInvert, aBru[ 2 ]:hBrush, aBru[ 1 ]:hBrush ...

... and I resolved with oDlg:bPainted := < |hDC| DRAWBORDER( hDC, oBrw:nLeft-2, oBrw:ntop-2,; oBrw:nWidth+2, oBrw:nHeight+62 , 0, 1, Rgb(195,195,185), .t. ) RETURN NIL > why do we have to resort to these tricks , while the xbrowse class should ...

... run @ nRow, 440 XIMAGE oImage ; FILENAME IF(empty(cImmagine ),cDefaImage,cImmagine );// NOBORDER ; SIZE 350,174 ; OF oDlg ; UPDATE @ nRow, oDlg:nWidth-50 BTNBMP oBtnSel[6] FLAT SIZE 30, 24 OF oDlg PIXEL ; COLOR nRgb(238,236,219),nRgb(238,236,219) ; BITMAP ".\bitmaps\folder_add.png" ...

Dear Jimmy,

Please try:

oTab:aDialogs[ ii ]:SetSize( nWidth, nHeight )