Files
foxbin2prg/TESTS/DATOS_READONLY/test_public_protected.frmform2.vc2
Lutz fea3596fbc Binaries to 1.20
transfered all files to 1.20
added code to create recreate FoxBin2Prg
2023-08-27 20:04:11 +02:00

47 lines
1.7 KiB
Plaintext

*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.20" SourceFile="test_public_protected.vcx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
DEFINE CLASS frmform2 AS form
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" />
*<DefinedPropArrayMethod>
*m: privatemethod && A private method
*m: protectedmethod && A protected method
*m: publicmethod && Regular public method
*</DefinedPropArrayMethod>
*<PropValue>
Caption = "Form"
DoCreate = .T.
Name = "frmform2"
*</PropValue>
ADD OBJECT 'Label1' AS label WITH ;
Caption = "Added this control first", ;
Height = 25, ;
Left = 36, ;
Name = "Label1", ;
Top = 24, ;
Width = 205
*< END OBJECT: BaseClass="label" />
HIDDEN PROCEDURE privatemethod && A private method
* Private method
ENDPROC
PROTECTED PROCEDURE protectedmethod && A protected method
* Protected method
ENDPROC
PROCEDURE publicmethod && Regular public method
* Pub method
ENDPROC
ENDDEFINE