PC Toledo

Argument error: transform
Se eu tirar esta linha abaixo, o erro nao acontece:
SET VIDEOMODE TO LLG_VIDEO_VGA_640_480_16
-----------------------------
ATENCAO: PORQUE QUANDO TIRO A LINHA ACIMA O
ERRO NAO ACONTECE.
TO TENTANDO USAR A LLIBG, MAS QUANDO ATIVO O
MODO DE TELA GRAFICA CONFORME ACIMA, COMECA
A APARECER ERROS QUE ANTES NAO EXISTIAM.
*********************************
function EXPLODE
PARAMETERS mn_lin1,mn_col1,mn_lin2,mn_col2
PRIVATE mn_medi,mn_colm,mn_expl
mn_medi=int((mn_col1+mn_col2)/2)
FOR mn_expl=mn_medi TO mn_col2
mn_colm=mn_medi-(mn_expl-mn_medi)
BoxShadow( MN_LIN1, iif(mn_colm<mn_col1,mn_col1,mn_colm), MN_LIN2, MN_EXPL )
@ MN_LIN1,iif(mn_colm<mn_col1,mn_col1,mn_colm) TO MN_LIN2,mn_expl
@ MN_LIN1+1,iif(mn_colm<mn_col1,mn_col1,mn_colm)+1 clea to mn_lin2-1,mn_expl-1
XTEMPODE=1000
DO WHILE XTEMPODE>1
XTEMPODE=XTEMPODE-1
ENDDO
NEXT
return " "
************************************
FUNCTION BoxShadow( nTop, nLeft, nBottom, nRight )
LOCAL nShadTop
LOCAL nShadLeft
LOCAL nShadBottom
LOCAL nShadRight
nShadTop := nShadBottom := MIN( nBottom + 1, MAXROW() )
nShadLeft := nLeft + 1
nShadRight := MIN( nRight + 1, MAXCOL() )
RESTSCREEN( nShadTop, nShadLeft, nShadBottom, nShadRight, ;
TRANSFORM( SAVESCREEN(nShadTop, nShadLeft, nShadBottom, nShadRight), ;
************ O ERRO E NESTA LINHA *******
REPLICATE("X", nShadRight - nShadLeft + 1 ) ) )
****************************************
nShadTop := nTop + 1
nShadLeft := nShadRight := MIN( nRight + 1, MAXCOL() )
nShadBottom := nBottom
RESTSCREEN( nShadTop, nShadLeft, nShadBottom, nShadRight, ;
TRANSFORM( SAVESCREEN(nShadTop, nShadLeft, nShadBottom, nShadRight), ;
REPLICATE("X", nShadBottom - nShadTop + 1 ) ) )
RETURN ( NIL )

O erro está no TRANSFORM(SAVESCREEN.... porque no modo gráfico não é possível usar isto. Alias as funções de SOMBRA usadas no modo texto não deverão funcionar no modo gráfico.

isso mesmo, eu tb ja passei por isso...