FWH 8.08 - New ACTION clause for GETs

[Antonio Linares]

In FWH 8.08 an ACTION can be used with a GET, i.e.:

Code: Select all  Expand view  RUN

#include "FiveWin.ch"

function Main()

   local oWnd, cTest := "Hello world!"

   DEFINE WINDOW oWnd COLOR "N/W"

   @ 2, 2 GET cTest SIZE 100, 20 ACTION MsgInfo( "click" )

   ACTIVATE WINDOW oWnd

return nil


So there is no longer need for Class TBtnGet

[Antonio Linares]

[Enrico Maria Giordano]

Is it possible to redefine the button caption or to put a bitmap on the button?

EMG

[James Bott]

Nice.

I like the concept. I would like to see it look just like a combobox with a theme aware button. I have tried to do this before without success.

James

[Antonio Linares]

Yes, its going to support an optional bitmap too.

And we can make it themes aware

[Silvio]

good mr linares!
last year I made something of it using as bmp the btnbmp class.

[Antonio Linares]

Themes support:

[Antonio Linares]

Themes and bitmap support:

[Enrico Maria Giordano]

Wonderful!

EMG

[Gianni]

Great !!!

Are you also thinking to support color change when get take focus?

Regards
Gianni

[James Bott]

I love it!

James

[hag]

Looks real good.

I have a question due to my great lack of knowledge re FWH and other things of course. What is "themes support" and how does one initilaize it in a program?

Thank for this info.

[ukoenig]

That looks very nice.
Does it work with resources as well ?

Regards
Uwe

[JC]

Incredible!

Linares, and the right alignment with number values? The limit of end of get at button it's ok too?

[Antonio Linares]

Harvey,

Your application uses Windows themes when you include these lines in your RC file:

Code: Select all  Expand view  RUN

#ifdef __FLAT__
  1 24 "WindowsXP.Manifest"
#endif


You can find the file "WindowsXP.Manifest" in FWH\samples\winxp folder.

Alternatively you can also have themes support if such file is in the same folder where your EXE is. Not sure about this way, as it is a long time since we don't use it.