Error WINDOWHEIG WindowWidth DCGETOPTIONS 880 710 NOMAXBUTTO

[digitsoft]

Roger NOAUTORESIZE it gives me error

D: \ Win \ nom \ IB S.A> pbuilder
Xbase + + (R) Version 1.90.355 ProjectBuilder
Copyright (c) 1997-2009 Alaska Software. All rights reserved.
xpp / q / n / w / m / b / ga / COFF / oOBJ @ C: \ DOCUME ~ 1 \ NPAULI ~ 1.IBO \ CONFIG ~ 1 \ Temp \ 04079
688.tmp
Xbase + + (R) Compiler 1.90.355 April 9 2009
Copyright (c) Alaska Software. All rights reserved.
PEPPM01.PRG (481:0): error XBT0200: Syntax Error
1 error (s) found in file PEPPM01.PRG!

'xpp / q / n / w / m / b / ga / COFF / oOBJ @ C: \ DOCUME ~ 1 \ NPAULI ~ 1.IBO \ CONFIG ~ 1 \ Temp \ 0407
9688.tmp 'returned error 1
Processing time: 1.90 secs.

D: \ Win \ nom \ IB S.A>

HELP and there is no such express clause which there is NORESIZE

[rdonnay]

Is there any way you can reproduce this problem in a sample program?

[digitsoft]

Hi Roger
This function is what is causing the problem, since I'm changing the size of the bitmap to the background.

Can you help me now with this problem.

Nolberto Paulino
Thanks

STATIC FUNCTION ChangeBitmap( oDlg )
DC_PointerWait( )
if ValType(oDlg) = "O"
oDlg:options := XBP_IMAGE_SCALED
oDlg:SizeRedraw := .T.
oDlg:bitmap := DC_GetBitmap(cFondoEmpresa)
oDlg:configure( ):invalidateRect( )
END if
return DC_PointerArrow( )

[digitsoft]

Hi Roger
This function is what is causing the problem, since I'm changing the size of the bitmap to the background.

Can you help me now with this problem.

Nolberto Paulino
Thanks

STATIC FUNCTION ChangeBitmap( oDlg )
DC_PointerWait( )
if ValType(oDlg) = "O"
oDlg:options := XBP_IMAGE_SCALED
oDlg:SizeRedraw:= .T.
oDlg:bitmap := DC_GetBitmap(cFondoEmpresa)
oDlg:configure( ):invalidateRect( )
END if
return DC_PointerArrow( )

[rdonnay]

What is oDlg ? Is it an XbpDialog() object, or a :drawingArea object?

[digitsoft]

DCHOTKEY xbeK_INS ACTION {||ReadInsert(!ReadInsert())}

DCGETOPTIONS TOOLTIPCOLOR GRA_CLR_BLACK, XBPSYSCLR_INFOBACKGROUND ;
NOESCAPEKEY ; &&& AUTOWINDOWMENU ; CHECKGET ;
COLORGETS {{GRA_CLR_BLACK,GRA_CLR_YELLOW},{GRA_CLR_BLUE,GRA_CLR_WHITE}} ;
ICON ICON_PV ;
HILITEGETS GRA_CLR_RED ;
NOSUPERVISE ;
MESSAGEINTO oMsgBox ;
NOMAXBUTTON ;
TOOLTIPFONT '08.Arial Bold' ;
AUTORESIZE ;
CONFIRM ;
DISABLEDCOLOR NP_Color(255,255,255)


** AUTORESIZE
** DISABLEDCOLOR GRA_CLR_WHITE ; XBPSYSCLR_TRANSPARENT
** DISABLEDCOLOR { 50,0,0 } ;

DC_GetOptDefault( GetOptions )

DCGETOPTIONS BITMAP cFondoEmpresa ;
TOOLTIPCOLOR GRA_CLR_BLACK, XBPSYSCLR_INFOBACKGROUND ;
NOESCAPEKEY ;
CHECKGET ;
COLORGETS {{GRA_CLR_BLACK,GRA_CLR_YELLOW},{GRA_CLR_BLUE,GRA_CLR_WHITE}} ;
ICON ICON_PV ;
HILITEGETS GRA_CLR_RED ;
WINDOWHEIGHT nHeight ;
WINDOWWIDTH nWidth ;
MESSAGEINTO oMsgBox ;
TOOLTIPFONT '08.Arial Bold' ;
SCROLLBARS XBP_SCROLLBAR_VERT+XBP_SCROLLBAR_HORIZ ;
AUTORESIZE ;
ABORTQUERY MSG {||DC_WinAlert("Esta Seguro de Salir del Sistema "+NSD_TituloPrograma( cTipoMenuActivo )+" Fácil e Integrada","Atención",XBPMB_YESNO,XBPMB_WARNING,,oDlg) = XBPMB_RET_YES } ;
CLOSEQUERY MSG {||DC_WinAlert("Esta Seguro de Salir del Sistema "+NSD_TituloPrograma( cTipoMenuActivo )+" Fácil e Integrada","Atención",XBPMB_YESNO,XBPMB_WARNING,,oDlg) = XBPMB_RET_YES }


DCREAD GUI ;
TITLE NSD_TituloPrograma( cTipoMenuActivo )+" Fácil e Integrada" ;
PARENT @oDlg ;
OPTIONS GetOptions ;
SETAPPWINDOW ;
EVAL {|o|o:setFrameState( XBPDLG_FRAMESTAT_MAXIMIZED ), SetTimerEvent(100,{||_UpdateStats(GetList,oUserStatic)}), ;
MarcarDesMarcarPrinter( oMenuPrinter, aPos[1], "1" ), ;
MarcarDesMarcarPrinter( oTipoPapel , aPos[2], "2" ), ;
ChangeBitmap( @oDlg:drawingArea ),;
oThreadTPV:Animation( @oTpvStatic, {LED_ON,LED_OFF} ),;
oThreadTPV:Receive( ),;
aGetListMenu := GetList,;
SetAppFocus(o) }

close ALL
threadobject():quit()
return NIL

And oDlg is Public

[digitsoft]

Roger
Yes

[digitsoft]

Roger is an Object oDlg

Nolberto Paulino
Regards

[digitsoft]

What is oDlg ? Is it an XbpDialog() object, or a :drawingArea object?

Roger is an Object oDlg

Nolberto Paulino
Regards

[rdonnay]

I am completely lost here and do not know how to advise you.

If you can demonstrate your problem in a sample program, I am sure that I can help you.