Files
foxbin2prg/TESTS/DATOS_READONLY/lib_controles.cl_image.vc2
2023-08-26 21:49:42 +02:00

37 lines
1.3 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.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
DEFINE CLASS cl_image AS image
*< CLASSDATA: Baseclass="image" Timestamp="" Scale="Pixels" Uniqueid="" />
*<DefinedPropArrayMethod>
*m: test_aa_access
*m: test_aa_assign
*p: test_aa
*</DefinedPropArrayMethod>
*<PropValue>
Height = 12
Name = "cl_image"
test_aa = .F.
Width = 12
*</PropValue>
PROCEDURE test_aa_access
*To do: Modify this routine for the Access method
RETURN THIS.test_aa
ENDPROC
PROCEDURE test_aa_assign
LPARAMETERS vNewVal
*To do: Modify this routine for the Assign method
THIS.test_aa = m.vNewVal
ENDPROC
ENDDEFINE