Günther, How can i change the color of the triangle? just use Your own selector-image //New Method SetRecSelBmp( uNew ) // Changing or omitting bitmap //If uNew is 0, no bitmap is displayed on record selector //If uNew is NIL, standard FWRArrow() bitmap is displayed //If uNew is imagefile or resourc...
Hello Otto, the next release will include many improvements like a complete user defined visual-design :D Also I do not see the msginfos with the text what next to do. < what to do next > is defined inside the tooltip and show as message at the end of the buttonlist on button-action. it seems ...
Silvio, I round the soluzione on last Summer but when you use resources not run a RESOURCE-test color and transparent my solution works as well it looks perfect now It 's good if It Is changed from linares maybe Antonio can check it it is just a little change http://www.pflegeplus.com/IM...
Hello, is it possible to make a little hight-adjustment of the imagesize close to the top using a GET with action ? With a background-color it doesn't look very nice. I'm using it for a color-selection. in METHOD CreateButton() CLASS TGet I noticed everywhere < ::nHeight - 4 > http://www...
I used it otherwise the painting is not included 1) Try "SaveAsViewed" and save as bmp file. The same usage but with a quality-difference // xImage DEFINE BUTTON OF oDlg:oBar PROMPT "Save xImage" CENTER ; ACTION ( oImage1:Save( .T., c_path1 + "EXPORT\" + "SAVED1.JP...
Armando, In an Xbrowse I usually do the following for a logical field WITH OBJECT :aCols[09] :SetCheck( { "SI16","NO16" } ) END but what should I do for a decimal field ? I don't know exactly what You need just a sample ( any fieldtype ) // numeric :aCols[ 4 ]:nEditType := EDIT_B...
Christobal, thank You very much I remember :roll: I tested using a brushed font but that doesn't work ( just a idea ) aPalBmp := oWnd:ReadImage( c_Path1 + "Blustone.bmp", nil, .t. ) pBrush := GDIP_IMAGEBRUSH( aPalBmp[ 1 ] ) oGraphics:DrawText( nTop + ( nWidth / 2 ) - 15, nLeft + ( nWidth /...
Antonio, no changes needed, just a window adjustment ( NO window maximized ) If the slider is needed, just 1 line has to be changed METHOD Paint() CLASS TMetroPanel oRect:nTop := oRect:nBottom - SCRLB_HEIGHT adjusted to oRect:nTop := oRect:nBottom - SCRLB_HEIGHT - 40 The defined mainwindow DEFINE W...
I tested a solution that works in all directions The problem is not with bitmaps. The problem is with the painting of XBrowse. When we navigate to the cell with arrow-keys with go-up, go-down or go-left, the gap is not visible. But when we navigate to the cell with go-right or with a mouse click, th...
Silvio, calculated button-position from get : @ 380, 570 GET oGet VAR cGet SIZE 130, 50 PIXEL OF oDlg // button adjusted to get size and position // the button-height should be close to the get-hight // otherwise the arrow will be stretched to much @ oGet:nTop +1, oGet:nRight BTNBMP oBtn OF oDlg ; S...
We can define brushes for color and gradient CLASS Brush DATA hBrush METHOD NewSolidBrush METHOD NewGradientBrush how to define something like METHOD NewImageBrush :?: ------------ http://www.pflegeplus.com/IMAGES/GDI1.jpg The Bmp-brush is shown as a resized image not tiled Image-tes...
Marc, I added the test but with different results 1. No resize of small images only images > cellsize are resized. 2. A visible celltext adding :lBmpStretch := .t. fills the cellarea but doesn't keep the aspect ratio http://www.pflegeplus.com/IMAGES/XbrwImage2.jpg WITH OBJECT oBrw...