*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="fundal.scx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS dataenvironment AS dataenvironment 
 	*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" />

	*<PropValue>
		Name = "Dataenvironment"
	*</PropValue>

ENDDEFINE

DEFINE CLASS ffergen1 AS ffergen OF "..\clase\ferestrebaza.vcx" 
 	*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />

	*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder 
	*< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" />

	*<PropValue>
		AlwaysOnTop = .F.
		AutoCenter = .T.
		BackColor = 255,255,255
		BorderStyle = 0
		DoCreate = .T.
		Enabled = .T.
		Height = 337
		Name = "Ffergen1"
		Picture = ..\..\..\standarde\
		Width = 700
		WindowState = 0
		WindowType = 0
	*</PropValue>

	ADD OBJECT 'Image1' AS image WITH ;
		Height = 189, ;
		Left = 68, ;
		Name = "Image1", ;
		Picture = ..\grafice\conimob.bmp, ;
		Stretch = 0, ;
		Top = 9, ;
		Width = 563
		*< END OBJECT: BaseClass="image" />
	
	PROCEDURE Activate
		IF PRIMADATA
			Do ce_windows In pmenu.prg
		*!*	PUBLIC op_imob
		*!*		op_imob=Crea('p_imob')
			DO alegeprogram
			DO FORM START00
			OSTART=CREATEOBJ('START00')
			PRIMADATA=.F.
			op_imob.Show
		ENDIF
	ENDPROC

	PROCEDURE Init
		*thisform.image1.height=thisform.height
		*thisform.image1.width=thisform.width
	ENDPROC

	PROCEDURE Release
		OSTART.RELEASE
		
	ENDPROC

	PROCEDURE RightClick
		DO FORM START00
		*OSTART.SHOW(1)
	ENDPROC

	PROCEDURE Image1.RightClick
		thisform.rightclick
		
	ENDPROC

ENDDEFINE