Flickering in checkbox click

[byte-one]

My way to kill all this problems:
Function isthemed() return .T. if i use a manifest in RC.
I commented out the messages VM_LBUTTONDOWN and WM_LBUTTONUP in control.prg. Flickering on both cases: when mouse down and mouse up.
I am also defined all dialogs as transparent. Whe i not do this, all static says are not transparent!??In control.prg in method colors i commented out the "SendMessage(::oWnd:hWnd, WM_ERASEBKGROUND, hDC,0)".

I wrote my way (but not a really solution) sometimes in this forum but no reaction!?

[Antonio Linares]

Jeff,

Your flickering comes from your call to GradientFill() from the ON PAINT as you force the dialog to get repainted and that forces all controls to be painted again:

ACTIVATE DIALOG oDlgPat ON PAINT GradientFill( ... )

You should use a brush instead of calling to GradientFill()

DEFINE DIALOG oDlg TRANSPARENT BRUSH oBrush
...
ACTIVATE DIALOG oDlg

Here you have a complete example that Daniel implemented:
viewtopic.php?f=6&t=19363&hilit=+brush#p102058

[Jeff Barnes]

If I remove the "ON PAINT....." I still get the flickering.

Code: Select all  Expand view

#include "FiveWin.ch"

FUNCTION Test()
    LOCAL oDlgPat, lTest:=.t., oCbx, oRadio, nSelect
    DEFINE DIALOG oDlgPat RESOURCE "PatInfo" FROM 0,0 TO MAXROW(),MAXCOL() TRANSPARENT
        REDEFINE RADIO oRADIO  VAR nSelect OF oDlgPat  id 1014,1015
        REDEFINE CHECKBOX oCbx VAR lTest ID 1018
    ACTIVATE DIALOG oDlgPat
RETURN Nil

 

If I remove the "TRANSPARENT" the problem is not there.

[Jeff Barnes]

Solved.

I went back to the beginning and it looks like the modified control.prg was not getting added.

Thanks for all the help.