Bug in TBtnBmp?

[Enrico Maria Giordano]

What is the reason for these lines in TBtnBmp:LostFocus() method?

Code: Select all  Expand view  RUN

  if ::lPressed
      ::lPressed := .f.
      ::Refresh()
   endif

A negative effect is that a pressed button (using GoDown() method) switch to non-pressed status on lostfocus.

Can I remove the above lines without side effects?

EMG

[Enrico Maria Giordano]

I just tried to comment out those lines and now the problem seems to be fixed. I can't see any side effects. Can I apply this fix in the FWH SVN?

EMG

[Enrico Maria Giordano]

Antonio?

EMG

[TimStone]

Bumped up for Daniel

[Daniel Garcia-Gil]

Thanks Enrico

already fixed and updated to SVN

[Enrico Maria Giordano]

Thank you Daniel!

EMG