Co-Authored-By: Claude Fable 5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_012P75yL9Fc9EcT33tMbuxcF
76 lines
2.1 KiB
Plaintext
76 lines
2.1 KiB
Plaintext
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
|
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
|
*< FOXBIN2PRG: Version="1.21" SourceFile="atentie1.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" />
|
|
|
|
*<PropValue>
|
|
Name = "Dataenvironment"
|
|
*</PropValue>
|
|
|
|
ENDDEFINE
|
|
|
|
DEFINE CLASS fatentie1 AS fatentie OF "..\clase\ferestrebaza.vcx"
|
|
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
|
|
|
|
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
|
*< OBJECTDATA: ObjPath="Label2" UniqueID="" Timestamp="" />
|
|
*< OBJECTDATA: ObjPath="CMDTERMIN1" UniqueID="" Timestamp="" />
|
|
|
|
*<PropValue>
|
|
BorderStyle = 3
|
|
DoCreate = .T.
|
|
Height = 84
|
|
Name = "Fatentie1"
|
|
Width = 353
|
|
WindowType = 0
|
|
Shape1.Height = 75
|
|
Shape1.Left = 4
|
|
Shape1.Name = "Shape1"
|
|
Shape1.Top = 4
|
|
Shape1.Width = 344
|
|
IMAGE1.Height = 32
|
|
IMAGE1.Left = 24
|
|
IMAGE1.Name = "IMAGE1"
|
|
IMAGE1.Top = 12
|
|
IMAGE1.Width = 32
|
|
Label1.Left = 64
|
|
Label1.Name = "Label1"
|
|
Label1.Top = 14
|
|
*</PropValue>
|
|
|
|
ADD OBJECT 'CMDTERMIN1' AS cmdtermin WITH ;
|
|
AutoSize = .F., ;
|
|
Caption = "\<OK", ;
|
|
Height = 24, ;
|
|
Left = 134, ;
|
|
Name = "CMDTERMIN1", ;
|
|
Top = 46, ;
|
|
Width = 84
|
|
*< END OBJECT: ClassLib="..\clase\ferestrebaza.vcx" BaseClass="commandbutton" />
|
|
|
|
ADD OBJECT 'Label2' AS label WITH ;
|
|
AutoSize = .T., ;
|
|
Caption = "Modificarile sunt ireversibile!", ;
|
|
FontSize = 12, ;
|
|
Height = 21, ;
|
|
Left = 129, ;
|
|
Name = "Label2", ;
|
|
Top = 14, ;
|
|
Width = 200
|
|
*< END OBJECT: BaseClass="label" />
|
|
|
|
PROCEDURE Deactivate
|
|
thisform.release
|
|
ENDPROC
|
|
|
|
PROCEDURE LostFocus
|
|
thisform.release
|
|
|
|
ENDPROC
|
|
|
|
ENDDEFINE
|