37 lines
1.3 KiB
Plaintext
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.20" SourceFile="lib_controles.vcx" CPID="1252" /> (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
|