*-------------------------------------------------------------------------------------------------------------------------------------------------------- * (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" /> * DataSource = .NULL. Height = 0 Left = 0 Name = "Dataenvironment" Top = 0 Width = 0 * 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="" /> * *p: ccont *p: ccursoracont *p: ccursorcont *p: id_part * * 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 * 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