I have some small problems, to change TTitle-settings / options
at RUNTIME within my TTITLE-painter-section ( some more selections will be added ).
Is it possible to do a complete RESET of all settings before
painting new selections ?
As well I noticed : a BRUSH without SHADOW is not painted.
I still need to detect TTitle-width and height from RESOURCE to
do the calculations for text- and Image-adjustments.
aRect := GETCLIENTRECT( oTitle:hWnd ) returns 0 at startup
I used ( before showing a new selection ) :
oTitle:lBase := .F.
oTitle:aGrdBack := {}
oTitle:aGrdBase := {}
oTitle:lBorder := .F.
oTitle:nShadow := 0
// NO_SHADOW 0x00
// UP_LEFT_SHADOW 0x01
// UP_RIGHT_SHADOW 0x02
// DOWN_LEFT_SHADOW 0x03
// DOWN_RIGHT_SHADOW 0x04
oTitle:lTransparent := .F.
oTitle:lRound := .F.
oTitle:lVertical := .T.
oTitle:nClrLine1 := RGB( 141, 178, 227 )
oTitle:nClrLine2 := RGB( 237, 242, 248 )
oTitle:Refresh()
// some NEW SELECTIONS :
IF nTShadow > 0 // from selection !!!
oTitle:nShadow := nTShadow
oTitle:nXOffSetShadow := 20
oTitle:nYOffSetShadow := 20
ENDIF
IF lTBorder = .T. // from selection !!!
oTitle:lBorder := .T.
oTitle:nClrLine1 := 8388608
ENDIF
IF lTDirect = .F.
oTitle:lVertical := .F.
ENDIF
...
...
...
oTitle:Refresh()
Saving new selections and reopen the Dialog it works, but I don*t want closing the dialog :
Wrong results, after runtime-changes :
oTitle:nShadow := 1 ) shows a part of TOP / RIGHT
oTitle:nShadow := 2 ) OK
oTitle:nShadow := 3 ) shows NOTHING
oTitle:nShadow := 4 ) shows a part of UP / RIGHT
Brush WITH shadow oTitle:nShadow := ( from 1 to 4 )
The same Brush WITHOUT defined shadow ( oTitle:nShadow := 0 )
The BASE-test works, changing from TRANSPARENT to COLOR
Best Regards
Uwe
