*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="frm_changelog.scx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS _frmbase1 AS _frmbase OF "..\clase\_frm_base.vcx" 
 	*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />

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

	*<DefinedPropArrayMethod>
		*p: cchangelog
	*</DefinedPropArrayMethod>

	*<PropValue>
		cchangelog = 
		DoCreate = .T.
		FontCharSet = 238
		Height = 250
		Name = "_frmbase1"
		Width = 375
		_shape1.Anchor = 10
		_shape1.Name = "_shape1"
		_shape2.Anchor = 8
		_shape2.Height = 29
		_shape2.Left = 340
		_shape2.Name = "_shape2"
		_shape2.Top = 0
		_shape2.Width = 36
		Lb_titlu_alb_b121.Caption = "Jurnal modificări"
		Lb_titlu_alb_b121.Name = "Lb_titlu_alb_b121"
		BUT_TERMIN1.Anchor = 8
		BUT_TERMIN1.Left = 344
		BUT_TERMIN1.Name = "BUT_TERMIN1"
		BUT_TERMIN1.Top = 1
		Gridsort1.Name = "Gridsort1"
	*</PropValue>

	ADD OBJECT 'Edit1' AS editbox WITH ;
		Anchor = 15, ;
		ControlSource = "thisform.cChangeLog", ;
		FontSize = 12, ;
		Height = 204, ;
		Left = 12, ;
		Name = "Edit1", ;
		ReadOnly = .T., ;
		Top = 36, ;
		Width = 348
		*< END OBJECT: BaseClass="editbox" />
	
	PROCEDURE Init
		this.WindowState = 2
		lcAppName = gcAppName
		lcFile = ADDBS(gcAppPath) + 'changelog_' + lcAppName + '.txt'
		IF FILE(lcFile)
			thisform.cChangeLog = FILETOSTR(lcFile)
		ENDIF 
	ENDPROC

ENDDEFINE

DEFINE CLASS dataenvironment AS dataenvironment 
 	*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" />

	*<PropValue>
		DataSource = .NULL.
		Height = 0
		Left = 0
		Name = "Dataenvironment"
		Top = 0
		Width = 0
	*</PropValue>

ENDDEFINE
