43 lines
1.5 KiB
Plaintext
43 lines
1.5 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="form1.scx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
|
*
|
|
DEFINE CLASS dataenvironment AS dataenvironment
|
|
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" />
|
|
|
|
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
|
*< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" />
|
|
|
|
*<PropValue>
|
|
DataSource = .NULL.
|
|
Height = 200
|
|
Left = 1
|
|
Name = "Dataenvironment"
|
|
Top = 220
|
|
Width = 520
|
|
*</PropValue>
|
|
|
|
ADD OBJECT 'Cursor1' AS cursor WITH ;
|
|
Alias = "foxuser_fdbozzo", ;
|
|
CursorSource = foxuser_fdbozzo.dbf, ;
|
|
Height = 90, ;
|
|
Left = 10, ;
|
|
Name = "Cursor1", ;
|
|
Top = 20, ;
|
|
Width = 90
|
|
*< END OBJECT: BaseClass="cursor" />
|
|
|
|
PROCEDURE BeforeOpenTables
|
|
*-- Dataenvironment.BeforeOpenTables()
|
|
|
|
ENDPROC
|
|
|
|
PROCEDURE Cursor1.Init
|
|
*-- Dataenvironment.Cursor1.Init()
|
|
|
|
ENDPROC
|
|
|
|
ENDDEFINE
|