Files
roacont/Ferestre/datedisp542.sc2

162 lines
5.2 KiB
Plaintext

*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="datedisp542.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>
DataSource = .NULL.
Height = 0
Left = 0
Name = "Dataenvironment"
Top = 0
Width = 0
*</PropValue>
ENDDEFINE
DEFINE CLASS frm_termin_renunt1 AS frm_termin_renunt OF "..\comun\clase\_frm_child.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Clb_scop" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_explicatie" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_suma_cifre" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_functie" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ed_suma_litere" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_bi_numar" UniqueID="" Timestamp="" />
*<DefinedPropArrayMethod>
*p: ccont
*p: ccursoracont
*p: ccursorcont
*p: id_part
*</DefinedPropArrayMethod>
*<PropValue>
BorderStyle = 1
ccont =
ccursoracont =
ccursorcont =
DoCreate = .T.
Height = 242
id_part = 0
Name = "Frm_termin_renunt1"
Width = 355
_shape1.Height = 29
_shape1.Left = 0
_shape1.Name = "_shape1"
_shape1.Top = 0
_shape1.Width = 360
_shape2.Height = 29
_shape2.Left = 294
_shape2.Name = "_shape2"
_shape2.Top = 0
_shape2.Width = 62
Lb_titlu_alb_b121.Caption = "DATE PRIVIND DISPOZITIA"
Lb_titlu_alb_b121.FontBold = .T.
Lb_titlu_alb_b121.Name = "Lb_titlu_alb_b121"
Lb_titlu_alb_b121.TabIndex = 11
BUT_TERMIN1.Left = 325
BUT_TERMIN1.Name = "BUT_TERMIN1"
BUT_TERMIN1.TabIndex = 8
BUT_TERMIN1.Top = 1
Gridsort1.Left = 12
Gridsort1.Name = "Gridsort1"
Gridsort1.Top = 192
But_renunt1.Left = 296
But_renunt1.Name = "But_renunt1"
But_renunt1.TabIndex = 9
But_renunt1.Top = 1
*</PropValue>
ADD OBJECT 'Clb_bi_numar' AS clb_tx_simplu WITH ;
Height = 29, ;
Left = 24, ;
Name = "Clb_bi_numar", ;
TabIndex = 7, ;
Top = 205, ;
Width = 290, ;
Text_simplu1.ControlSource = "pcNumar", ;
Text_simplu1.Height = 23, ;
Text_simplu1.Left = 121, ;
Text_simplu1.Name = "Text_simplu1", ;
Text_simplu1.Top = 3, ;
Text_simplu1.Width = 164, ;
Lb_simplu1.Caption = "C.I. / Reg. Comert", ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_explicatie' AS clb_tx_simplu WITH ;
Left = 24, ;
Name = "Clb_explicatie", ;
TabIndex = 2, ;
Top = 64, ;
Text_simplu1.ControlSource = "pcNume", ;
Text_simplu1.Name = "Text_simplu1", ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_functie' AS clb_tx_simplu WITH ;
Left = 24, ;
Name = "Clb_functie", ;
TabIndex = 5, ;
Top = 177, ;
Width = 290, ;
Text_simplu1.ControlSource = "pcFunctie", ;
Text_simplu1.Name = "Text_simplu1", ;
Lb_simplu1.Caption = "Functia", ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_scop' AS clb_tx_simplu WITH ;
Left = 24, ;
Name = "Clb_scop", ;
TabIndex = 1, ;
Top = 36, ;
Text_simplu1.ControlSource = "pcScop", ;
Text_simplu1.Name = "Text_simplu1", ;
Lb_simplu1.Caption = "Scopul", ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_suma_cifre' AS clb_tx_simplu WITH ;
Left = 24, ;
Name = "Clb_suma_cifre", ;
TabIndex = 3, ;
TabStop = .F., ;
Top = 92, ;
Text_simplu1.ControlSource = "pnSuma", ;
Text_simplu1.InputMask = (get_mask(14,gnPa)), ;
Text_simplu1.Name = "Text_simplu1", ;
Text_simplu1.ReadOnly = .F., ;
Lb_simplu1.Caption = "Suma ( in cifre )", ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Ed_suma_litere' AS ed_tx_simplu WITH ;
Left = 24, ;
Name = "Ed_suma_litere", ;
TabIndex = 4, ;
Top = 120, ;
_edbase1.ControlSource = "pcSumaLitere", ;
_edbase1.Name = "_edbase1", ;
_lbbase1.Caption = "Suma (in litere)", ;
_lbbase1.Height = 34, ;
_lbbase1.Left = 8, ;
_lbbase1.Name = "_lbbase1", ;
_lbbase1.Top = 6, ;
_lbbase1.Width = 52, ;
_lbbase1.WordWrap = .T.
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
PROCEDURE Init
DoDefault()
Thisform.clb_explicatie.lb_simplu1.Caption = pcExplicatie
ENDPROC
ENDDEFINE