*-------------------------------------------------------------------------------------------------------------------------------------------------------- * (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.21" SourceFile="filename_caps.pjx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * LPARAMETERS tcDir lcCurdir = SYS(5)+CURDIR() CD ( EVL( tcDir, JUSTPATH( SYS(16) ) ) ) * _Author = "" _Company = "" _Address = "" _City = "" _State = "" _PostalCode = "" _Country = "" *-- _Comments = "Capitalization for files" _CompanyName = "Fernando D. Bozzo" _FileDescription = "Capitalization for files" _LegalCopyright = "MIT License" _LegalTrademark = "MIT License" _ProductName = "FILENAME_CAPS" _MajorVer = "2" _MinorVer = "4" _Revision = "0" _LanguageID = "" _AutoIncrement = "0" * * *<.HomeDir = 'g:\desa\foxbin2prg\filename_caps' /> FOR EACH loProject IN _VFP.Projects FOXOBJECT loProject.Close() ENDFOR STRTOFILE( '', '__newproject.f2b' ) BUILD PROJECT Filename_caps.pjx FROM '__newproject.f2b' FOR EACH loProject IN _VFP.Projects FOXOBJECT loProject.Close() ENDFOR MODIFY PROJECT 'Filename_caps.pjx' NOWAIT NOSHOW NOPROJECTHOOK loProject = _VFP.Projects('Filename_caps.pjx') WITH loProject.FILES .ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> .ADD('filename_caps.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" /> * .ITEM('__newproject.f2b').Remove() * * * * * .ITEM("config\config.fpw").Type = 'T' * ENDWITH WITH loProject * .Debug = .T. .Encrypted = .F. *<.CmntStyle = 1 /> *<.NoLogo = .F. /> *<.SaveCode = .T. /> *<.User = '' /> .ProjectHookLibrary = '' .ProjectHookClass = '' * ENDWITH _VFP.Projects('Filename_caps.pjx').Close() *ERASE '__newproject.f2b' CD (lcCurdir) RETURN