A possible adjustment of a GET-action bmp ?

[ukoenig]

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 >



I tested
oCGet[2]:lAdjustBtn := .T.
but no difference

@ 35, 50 GET oCGet[2] VAR cGet[2] SIZE 80, 18 OF oDlg2 COLOR 0, nBColorB UPDATE ;
BITMAP c_Path1 + "Help.bmp" PIXEL ;
ACTION ( nBColorB := ChooseColor( nBColorB ), oCGet[2]:SetColor( , nBColorB ), ;
oWnd:Refresh(), oDlg2:Refresh() )

best gegards
Uwe

[Silvio.Falconi]

I have asked this topic many times, but if a topic interests no one you will not have an answer.
Then in a few months or a few years when someone is interested you will have the answer !!

[ukoenig]

Silvio,

in class tGet line 963
I moved the bmp 2 pixel to the top and adjusted the height
that seems to work

if ! IsAppThemed()
::oBtn:SetPos( -2, ::oBtn:nLeft + 2 )
::oBtn:nHeight = ::nHeight + 2 // otherwise You get space at the bottom
endif[/color]



transparent-test



regards
Uwe

[Silvio.Falconi]

Uwe
I round the soluzione on last Summer but when you use resources not run
It 's good if It Is changed from linares

[Silvio.Falconi]

Uwe
I round the soluzione on last Summer but when you use resources not run
It 's good if It Is changed from linares

[ukoenig]

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



DEFINE DIALOG oDlg2 RESOURCE "Test" PIXEL ;
STYLE WS_POPUP

REDEFINE GET oCGet[1] VAR cGet[1] ID 110 BITMAP c_Path1 + "Help.bmp" ;
ACTION ( nBColorB := ChooseColor( nBColorB ), oCGet[1]:SetColor( , nBColorB ) ) ;
COLOR CLR_BLACK, nBColorB of oDlg2

REDEFINE GET oCGet[2] VAR cGet[2] ID 120 BITMAP c_Path1 + "Help.bmp" ;
ACTION ( nBColorF := ChooseColor( nBColorF ), oCGet[2]:SetColor( , nBColorF ) ) ;
COLOR CLR_BLACK, nBColorF of oDlg2
oCGet[2]:lBtnTransparent := .T.

regards
Uwe

[Silvio.Falconi]

Uwe,
my arms have fallen out because often old errors come out that should have already been corrected in old versions of fivewin and every time we start again

I'm sorry Uwe but lately there are too many classes that don't work as they should: rpreview, btnbmp, get btn, .....

Often I have to recompile old applications if I make a small change and always find problems.

Tget
I have already asked the forum about the problem of tget and button since last year and no one has solved it, of course I could change the source but then I should change it for another program and at the new version of fwh I have to return again because often on the forum someone finds the solutions but then whoever recompiles the libraries doesn't make the changes made.

BTnbmp
this summer I raised the problem of the btnbmp class, when it is pressed many times as if you were playing "super Invader" and you have to shoot continuously, an error ":: end ()" comes out blocking the application.

Rpreview
For the latest changes I do not know from whom rpreview does not work as it should (style 2007 in windows 10 etc.) and every time I have to recompile one of my sources to override the class.

I have only mentioned a few problems that I have recently encountered but there are so many that at this moment I don't remember well