Initial: flux text FoxBin2Prg (git urmareste .??2 in-arbore, binarele VFP git-ignored)

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>

ferestre/frm_changelog.sc2

@@ -0,0 +1,76 @@
+*--------------------------------------------------------------------------------------------------------------------------------------------------------
+* (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<69>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