Method TSBrowse:  Set3DText()

 

Syntax: 

 

oBrw:Set3DText( [ lOnOff ], [ lRaised ], [ nColumn ], [ nLevel ], [ nClrLight ], [ nClrShadow ] ) ŕ oBrw

 

Description:

 

Assigns the 3D attribute to the text of cells, headers, superheaders and footers.

 

Parameters:

 

lOnOff.- .T. = 3D text;   .F. = Toggles to normal text.   Default is .T.

 

lRaised.- .T. = Raised text;     .F. = Bas-relief text   Default is .T.

 

nColum.-  Number of column to set the 3D text attribute. If ommited, all columns is assumed.

 

nLevel.-  1 = Cells   2 = Headers   3= Footers.  If ommited all levels is assumed.

 

nClrLigtn.- Color expression for the light color to be used in 3D effect.  Defaults to GetSysColor( COLOR_BTNHIGHTLIGHT )

 

nColum.- Color expression for the shadow color to be used in 3D effect. Defaults to GetSyscolor( COLOR_BTNSHADOW )

                       

For colors you can use code blocks which will be evaluated receiving nRow, nCol as parameters.

 

Returns: A reference to the same TSBrowse object modified.

 

Examples:

 

1.- Assign 3D text attribute ( raised ) to cells of column 1 using special colors for 3D effect.

 

            oBrw:Set3Dtext( .T., .T., 1, 1, CLR_YELLOW, CLR_GREEN )

 

2.- Assign 3D text attribute ( bas-relief ) to all headers using default colors.

 

            oBrw:Set3Dtext( .T., .F., Nil, 2 )