Asi es como defino el gradiente:
- Code: Select all Expand view
- DEFINE DIALOG oDlg Resource cResource OF oWnd Transparent Gradient { { 1, RGB(229, 233, 238), RGB(255, 255, 255) } }
La única forma que se me ha ocurrido es incluir esto en el ON RESIZE
- Code: Select all Expand view
- oDlg:SetColor(,, oDlg:oBrush:Resized( oDlg:nWidth, oDlg:nHeight, 2) )
Funciona, aunque la redimensión con el ratón va un poco como a tirones.
Es correcto, o existe alguna otra posibilidad.