Changeset: 137 v1.19.3 Change on TXT timestamps to preserve empty values / Optimization on TXT generation of ZOrders
This commit is contained in:
fernando
520
TESTS/DATOS_READONLY/fb2p_frm_1.sc2
Normal file
520
TESTS/DATOS_READONLY/fb2p_frm_1.sc2
Normal file
@@ -0,0 +1,520 @@
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>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.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\fb2p_frm_1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
*< OLE: Nombre="Cl_form1.Cl_olecontrol1" Parent="Cl_form1" ObjName="Cl_olecontrol1" OLEObject="C:\Windows\system32\richtx32.ocx" Checksum="1767681336" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHCT7i+++c4BAwAAAIACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAOAAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAAIAAAABwAAAP7///8JAAAA/v////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP////8AAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACACwAAAEFwcGVhcmFuY2UACQAAAEkKAAAAAAAAAAwAAABCb3JkZXJTdHlsZQAJAAAASQoAAAABAAAADQAAAAAAAAUAAIAAAAAAAAABAAAAAAABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dABCdWxsZXRJbmRlbnQAEQAAAE4NAAAABwAAAAAAAAAAAAAAEAAAAERpc2FibGVOb1Njcm9sbAAFAAAATAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAABSaWdodE1hcmdpbgARAAAATg0AAAAHAAAAAAAAAAAAAAAFAAAAVGV4dAAUAAAASAAAAAALAAAAT2xlY29udHJvbDENAAAAQXV0b1ZlcmJNZW51AAUAAABMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA" />
|
||||
*
|
||||
DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="2013/12/15 18:50:25" Scale="" Uniqueid="_3XW0B1R2O" />
|
||||
AllowOutput = .T.
|
||||
AlwaysOnBottom = .F.
|
||||
AlwaysOnTop = .F.
|
||||
AutoCenter = .T.
|
||||
BackColor = 240,240,240
|
||||
BindControls = .T.
|
||||
BorderStyle = 3
|
||||
BufferMode = 0
|
||||
Caption = "Form"
|
||||
ClipControls = .T.
|
||||
Closable = .T.
|
||||
ColorSource = 4
|
||||
Comment = ""
|
||||
ContinuousScroll = .T.
|
||||
ControlBox = .T.
|
||||
DataSession = 1
|
||||
DefOleLCID = 0
|
||||
Desktop = .F.
|
||||
Dockable = 0
|
||||
DoCreate = .T.
|
||||
DrawMode = 13
|
||||
DrawStyle = 0
|
||||
DrawWidth = 1
|
||||
Enabled = .T.
|
||||
FillColor = 0,0,0
|
||||
FillStyle = 1
|
||||
FontBold = .F.
|
||||
FontCharSet = 0
|
||||
FontCondense = .F.
|
||||
FontExtend = .F.
|
||||
FontItalic = .F.
|
||||
FontName = "Arial"
|
||||
FontOutline = .F.
|
||||
FontShadow = .F.
|
||||
FontSize = 9
|
||||
FontStrikethru = .F.
|
||||
FontUnderline = .F.
|
||||
ForeColor = 0,0,0
|
||||
HalfHeightCaption = .F.
|
||||
Height = 346
|
||||
HelpContextID = 0
|
||||
HScrollSmallChange = 10
|
||||
Icon = ..\..\
|
||||
KeyPreview = .F.
|
||||
LockScreen = .F.
|
||||
MacDesktop = 0
|
||||
MaxButton = .T.
|
||||
MaxHeight = -1
|
||||
MaxLeft = -1
|
||||
MaxTop = -1
|
||||
MaxWidth = -1
|
||||
MDIForm = .F.
|
||||
MinButton = .T.
|
||||
MinHeight = -1
|
||||
MinWidth = -1
|
||||
MouseIcon = ..\..\
|
||||
MousePointer = 0
|
||||
Movable = .T.
|
||||
Name = "Cl_form1"
|
||||
OLEDragMode = 0
|
||||
OLEDragPicture = ..\..\
|
||||
OLEDropEffects = 3
|
||||
OLEDropMode = 0
|
||||
Picture = ..\..\
|
||||
RightToLeft = .F.
|
||||
ScaleMode = 3
|
||||
ScrollBars = 0
|
||||
ShowInTaskBar = .T.
|
||||
ShowTips = .F.
|
||||
ShowWindow = 0
|
||||
SizeBox = .F.
|
||||
TabIndex = 1
|
||||
TabStop = .T.
|
||||
Tag = ""
|
||||
Themes = .T.
|
||||
TitleBar = 1
|
||||
Visible = .T.
|
||||
VScrollSmallChange = 10
|
||||
WhatsThisButton = .F.
|
||||
WhatsThisHelp = .F.
|
||||
WhatsThisHelpID = -1
|
||||
Width = 648
|
||||
WindowState = 0
|
||||
WindowType = 0
|
||||
ZoomBox = .F.
|
||||
Cl_commandgroup1.Command1.Left = 8
|
||||
Cl_commandgroup1.Command1.Name = "Command1"
|
||||
Cl_commandgroup1.Command1.RightToLeft = .F.
|
||||
Cl_commandgroup1.Command1.Top = 4
|
||||
Cl_commandgroup1.Command2.Left = 124
|
||||
Cl_commandgroup1.Command2.Name = "Command2"
|
||||
Cl_commandgroup1.Command2.RightToLeft = .F.
|
||||
Cl_commandgroup1.Command2.Top = 4
|
||||
Cl_commandgroup1.Name = "Cl_commandgroup1"
|
||||
Cl_commandgroup1.una_prop_cmgroup = Ahora tiene valor
|
||||
Cl_commandgroup1.ZOrderSet = 2
|
||||
Cl_imagen1.Left = 268
|
||||
Cl_imagen1.Name = "Cl_imagen1"
|
||||
Cl_imagen1.Top = 292
|
||||
Cl_imagen1.ZOrderSet = 3
|
||||
Cl_imagen2.Left = 316
|
||||
Cl_imagen2.Name = "Cl_imagen2"
|
||||
Cl_imagen2.Top = 292
|
||||
Cl_imagen2.ZOrderSet = 4
|
||||
Cl_optiongroup1.Name = "Cl_optiongroup1"
|
||||
Cl_optiongroup1.Option1.Left = 8
|
||||
Cl_optiongroup1.Option1.Name = "Option1"
|
||||
Cl_optiongroup1.Option1.RightToLeft = .F.
|
||||
Cl_optiongroup1.Option1.Top = 8
|
||||
Cl_optiongroup1.Option1.Value = 0
|
||||
Cl_optiongroup1.Option2.Left = 124
|
||||
Cl_optiongroup1.Option2.Name = "Option2"
|
||||
Cl_optiongroup1.Option2.RightToLeft = .F.
|
||||
Cl_optiongroup1.Option2.Top = 8
|
||||
Cl_optiongroup1.Option2.Value = 1
|
||||
Cl_optiongroup1.propiedad_de_clase_sin_valor = Valor reescrito en el form!
|
||||
Cl_optiongroup1.Value = 2
|
||||
Cl_optiongroup1.ZOrderSet = 1
|
||||
|
||||
ADD OBJECT 'Cl_olecontrol1' AS cl_olecontrol WITH ;
|
||||
Height = 67, ;
|
||||
Left = 484, ;
|
||||
Name = "Cl_olecontrol1", ;
|
||||
Top = 256, ;
|
||||
Width = 131
|
||||
*< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="olecontrol" UniqueID="_3XW0BXGCR" Timestamp="2013/12/03 20:18:24" ZOrder="2900" OLEObject="C:\Windows\system32\richtx32.ocx" CheckSum="1767681336" />
|
||||
|
||||
ADD OBJECT 'Commandgroup1' AS commandgroup WITH ;
|
||||
BackColor = 255,128,255, ;
|
||||
ButtonCount = 2, ;
|
||||
Height = 76, ;
|
||||
Left = 8, ;
|
||||
Name = "Commandgroup1", ;
|
||||
Top = 172, ;
|
||||
Value = 1, ;
|
||||
Width = 244, ;
|
||||
ZOrderSet = 16, ;
|
||||
Command1.Caption = "\<Abrir", ;
|
||||
Command1.Height = 56, ;
|
||||
Command1.Left = 12, ;
|
||||
Command1.Name = "Command1", ;
|
||||
Command1.Picture = bmps\carpetaabierta.bmp, ;
|
||||
Command1.RightToLeft = .F., ;
|
||||
Command1.Top = 8, ;
|
||||
Command1.Width = 100, ;
|
||||
Command2.Caption = "\<Cerrar", ;
|
||||
Command2.Height = 56, ;
|
||||
Command2.Left = 128, ;
|
||||
Command2.Name = "Command2", ;
|
||||
Command2.Picture = bmps\carpetacerrada.bmp, ;
|
||||
Command2.RightToLeft = .F., ;
|
||||
Command2.Top = 8, ;
|
||||
Command2.Width = 96
|
||||
*< END OBJECT: BaseClass="commandgroup" UniqueID="_3XW0BCM76" Timestamp="2013/12/03 20:18:24" ZOrder="2700" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas' AS grid WITH ;
|
||||
ColumnCount = 5, ;
|
||||
DeleteMark = .F., ;
|
||||
Height = 140, ;
|
||||
Left = 268, ;
|
||||
Name = "grdEncuestas", ;
|
||||
Panel = 1, ;
|
||||
ReadOnly = .T., ;
|
||||
RecordSource = "encuestas", ;
|
||||
RecordSourceType = 1, ;
|
||||
RightToLeft = .F., ;
|
||||
Top = 12, ;
|
||||
Width = 320, ;
|
||||
ZOrderSet = 15, ;
|
||||
Column1.ControlSource = "encuestas.promotor", ;
|
||||
Column1.Name = "Column1", ;
|
||||
Column1.ReadOnly = .T., ;
|
||||
Column1.Width = 58, ;
|
||||
Column2.ControlSource = "encuestas.idenc", ;
|
||||
Column2.Name = "Column2", ;
|
||||
Column2.ReadOnly = .T., ;
|
||||
Column2.Width = 46, ;
|
||||
Column3.ControlSource = "encuestas.calific", ;
|
||||
Column3.Name = "Column3", ;
|
||||
Column3.ReadOnly = .T., ;
|
||||
Column3.Width = 41, ;
|
||||
Column4.ControlSource = "encuestas.fecha", ;
|
||||
Column4.Name = "Column4", ;
|
||||
Column4.ReadOnly = .T., ;
|
||||
Column4.Width = 69, ;
|
||||
Column5.ControlSource = "encuestas.resultado", ;
|
||||
Column5.Name = "Column5", ;
|
||||
Column5.ReadOnly = .T., ;
|
||||
Column5.Width = 58
|
||||
*< END OBJECT: BaseClass="grid" UniqueID="_3XW0B58PA" Timestamp="2013/12/15 18:50:25" ZOrder="1600" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column1.Header1' AS header WITH ;
|
||||
Caption = "promotor", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PB" Timestamp="2013/12/03 19:56:18" ZOrder="1700" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column1.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
BorderStyle = 0, ;
|
||||
ForeColor = 0,0,0, ;
|
||||
Margin = 0, ;
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PC" Timestamp="2013/12/15 18:50:25" ZOrder="1800" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column2.Header1' AS header WITH ;
|
||||
Caption = "idenc", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PD" Timestamp="2013/12/03 19:56:18" ZOrder="1900" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column2.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
BorderStyle = 0, ;
|
||||
ForeColor = 0,0,0, ;
|
||||
Margin = 0, ;
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PE" Timestamp="2013/12/15 18:50:25" ZOrder="2000" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column3.Header1' AS header WITH ;
|
||||
Caption = "calific", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PF" Timestamp="2013/12/03 19:56:18" ZOrder="2100" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column3.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
BorderStyle = 0, ;
|
||||
ForeColor = 0,0,0, ;
|
||||
Margin = 0, ;
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PG" Timestamp="2013/12/15 18:50:25" ZOrder="2200" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column4.Header1' AS header WITH ;
|
||||
Caption = "fecha", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PH" Timestamp="2013/12/03 19:56:18" ZOrder="2300" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column4.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
BorderStyle = 0, ;
|
||||
ForeColor = 0,0,0, ;
|
||||
Margin = 0, ;
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PI" Timestamp="2013/12/15 18:50:25" ZOrder="2400" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column5.Header1' AS header WITH ;
|
||||
Caption = "resultado", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PJ" Timestamp="2013/12/03 19:56:18" ZOrder="2500" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column5.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
BorderStyle = 0, ;
|
||||
ForeColor = 0,0,0, ;
|
||||
Margin = 0, ;
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PK" Timestamp="2013/12/15 18:50:25" ZOrder="2600" />
|
||||
|
||||
ADD OBJECT 'lblCalific' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
BackStyle = 0, ;
|
||||
Caption = "Calific", ;
|
||||
Left = 491, ;
|
||||
Name = "lblCalific", ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 7, ;
|
||||
Top = 164, ;
|
||||
Width = 34, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 10
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P5" Timestamp="2013/12/15 18:50:25" ZOrder="1100" />
|
||||
|
||||
ADD OBJECT 'lblFecha' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
BackStyle = 0, ;
|
||||
Caption = "Fecha", ;
|
||||
Left = 491, ;
|
||||
Name = "lblFecha", ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 9, ;
|
||||
Top = 192, ;
|
||||
Width = 34, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 12
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P7" Timestamp="2013/12/15 18:50:25" ZOrder="1300" />
|
||||
|
||||
ADD OBJECT 'lblIdenc' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
BackStyle = 0, ;
|
||||
Caption = "Idenc", ;
|
||||
Left = 292, ;
|
||||
Name = "lblIdenc", ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 5, ;
|
||||
Top = 192, ;
|
||||
Width = 30, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 8
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P3" Timestamp="2013/12/15 18:50:25" ZOrder="900" />
|
||||
|
||||
ADD OBJECT 'lblPromotor' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
BackStyle = 0, ;
|
||||
Caption = "Promotor", ;
|
||||
Left = 271, ;
|
||||
Name = "lblPromotor", ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 3, ;
|
||||
Top = 164, ;
|
||||
Width = 51, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 6
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P1" Timestamp="2013/12/15 18:50:25" ZOrder="700" />
|
||||
|
||||
ADD OBJECT 'lblResultado' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
BackStyle = 0, ;
|
||||
Caption = "Resultado", ;
|
||||
Left = 472, ;
|
||||
Name = "lblResultado", ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 11, ;
|
||||
Top = 220, ;
|
||||
Width = 57, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 14
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P9" Timestamp="2013/12/15 18:50:25" ZOrder="1500" />
|
||||
|
||||
ADD OBJECT 'Optiongroup1' AS optiongroup WITH ;
|
||||
BackColor = 0,128,255, ;
|
||||
ButtonCount = 2, ;
|
||||
Height = 72, ;
|
||||
Left = 8, ;
|
||||
Name = "Optiongroup1", ;
|
||||
Top = 256, ;
|
||||
Value = 2, ;
|
||||
Width = 244, ;
|
||||
ZOrderSet = 17, ;
|
||||
Option1.Caption = "Option1", ;
|
||||
Option1.Height = 48, ;
|
||||
Option1.Left = 16, ;
|
||||
Option1.Name = "Option1", ;
|
||||
Option1.Picture = bmps\scccheckout.bmp, ;
|
||||
Option1.RightToLeft = .F., ;
|
||||
Option1.Style = 1, ;
|
||||
Option1.Top = 12, ;
|
||||
Option1.Value = 0, ;
|
||||
Option1.Width = 92, ;
|
||||
Option2.Caption = "Option2", ;
|
||||
Option2.Height = 48, ;
|
||||
Option2.Left = 132, ;
|
||||
Option2.Name = "Option2", ;
|
||||
Option2.Picture = bmps\scccheckout.bmp, ;
|
||||
Option2.RightToLeft = .F., ;
|
||||
Option2.Style = 1, ;
|
||||
Option2.Top = 12, ;
|
||||
Option2.Value = 1, ;
|
||||
Option2.Width = 88
|
||||
*< END OBJECT: BaseClass="optiongroup" UniqueID="_3XW0BCM77" Timestamp="2013/12/03 20:18:24" ZOrder="2800" />
|
||||
|
||||
ADD OBJECT 'Shape1' AS shape WITH ;
|
||||
BorderStyle = 2, ;
|
||||
BorderWidth = 1, ;
|
||||
Curvature = 16, ;
|
||||
Height = 49, ;
|
||||
Left = 264, ;
|
||||
Name = "Shape1", ;
|
||||
SpecialEffect = 0, ;
|
||||
Top = 284, ;
|
||||
Width = 101, ;
|
||||
ZOrderSet = 0
|
||||
*< END OBJECT: BaseClass="shape" UniqueID="_3XW0BQM70" Timestamp="2013/12/03 20:18:24" ZOrder="500" />
|
||||
|
||||
ADD OBJECT 'txtCalific' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
ControlSource = "encuestas.calific", ;
|
||||
DisabledForeColor = 0,0,160, ;
|
||||
ForeColor = 0,0,255, ;
|
||||
Height = 23, ;
|
||||
Left = 532, ;
|
||||
MaxLength = 2, ;
|
||||
Name = "txtCalific", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 8, ;
|
||||
Top = 164, ;
|
||||
Width = 38, ;
|
||||
ZOrderSet = 9
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P4" Timestamp="2013/12/15 18:50:25" ZOrder="1000" />
|
||||
|
||||
ADD OBJECT 'txtFecha' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
ControlSource = "encuestas.fecha", ;
|
||||
DisabledForeColor = 0,0,160, ;
|
||||
ForeColor = 0,0,255, ;
|
||||
Height = 23, ;
|
||||
Left = 532, ;
|
||||
Name = "txtFecha", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 10, ;
|
||||
Top = 192, ;
|
||||
Width = 73, ;
|
||||
ZOrderSet = 11
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P6" Timestamp="2013/12/15 18:50:25" ZOrder="1200" />
|
||||
|
||||
ADD OBJECT 'txtIdenc' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
ControlSource = "encuestas.idenc", ;
|
||||
DisabledForeColor = 0,0,160, ;
|
||||
ForeColor = 0,0,255, ;
|
||||
Height = 23, ;
|
||||
Left = 328, ;
|
||||
MaxLength = 20, ;
|
||||
Name = "txtIdenc", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 6, ;
|
||||
Top = 192, ;
|
||||
Width = 149, ;
|
||||
ZOrderSet = 7
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P2" Timestamp="2013/12/15 18:50:25" ZOrder="800" />
|
||||
|
||||
ADD OBJECT 'txtPromotor' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
ControlSource = "encuestas.promotor", ;
|
||||
DisabledForeColor = 0,0,160, ;
|
||||
ForeColor = 0,0,255, ;
|
||||
Height = 23, ;
|
||||
Left = 328, ;
|
||||
MaxLength = 20, ;
|
||||
Name = "txtPromotor", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 4, ;
|
||||
Top = 164, ;
|
||||
Width = 149, ;
|
||||
ZOrderSet = 5
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P0" Timestamp="2013/12/15 18:50:25" ZOrder="600" />
|
||||
|
||||
ADD OBJECT 'txtResultado' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
ControlSource = "encuestas.resultado", ;
|
||||
DisabledForeColor = 0,0,160, ;
|
||||
ForeColor = 0,0,255, ;
|
||||
Height = 23, ;
|
||||
Left = 532, ;
|
||||
MaxLength = 10, ;
|
||||
Name = "txtResultado", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F., ;
|
||||
TabIndex = 12, ;
|
||||
Top = 220, ;
|
||||
Width = 81, ;
|
||||
ZOrderSet = 13
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P8" Timestamp="2013/12/15 18:50:25" ZOrder="1400" />
|
||||
|
||||
PROCEDURE grdEncuestas.AfterRowColChange
|
||||
LPARAMETERS nColIndex
|
||||
|
||||
thisform.Refresh()
|
||||
|
||||
ENDPROC
|
||||
|
||||
ENDDEFINE
|
||||
|
||||
DEFINE CLASS Dataenvironment AS dataenvironment
|
||||
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="2013/12/15 18:50:25" Scale="" Uniqueid="_3XW0B1R2N" ClassIcon="1" />
|
||||
AutoCloseTables = .T.
|
||||
AutoOpenTables = .T.
|
||||
Comment = ""
|
||||
DataSource = .NULL.
|
||||
DataSourceType = ""
|
||||
Height = 200
|
||||
InitialSelectedAlias = ""
|
||||
Left = 11
|
||||
Name = "Dataenvironment"
|
||||
OpenViews = 0
|
||||
Tag = ""
|
||||
Top = 404
|
||||
Width = 520
|
||||
|
||||
ADD OBJECT 'Cursor1' AS cursor WITH ;
|
||||
Alias = "encuestas", ;
|
||||
BufferModeOverride = 1, ;
|
||||
Comment = "", ;
|
||||
CursorSource = encuestas.dbf, ;
|
||||
Exclusive = .F., ;
|
||||
Filter = "", ;
|
||||
Height = 98, ;
|
||||
Left = 10, ;
|
||||
Name = "Cursor1", ;
|
||||
NoDataOnLoad = .F., ;
|
||||
Order = "", ;
|
||||
OrderDirection = 0, ;
|
||||
ReadOnly = .F., ;
|
||||
Tag = "", ;
|
||||
Top = 20, ;
|
||||
Width = 102
|
||||
*< END OBJECT: BaseClass="cursor" UniqueID="_3XW0B58OZ" Timestamp="2013/12/15 18:50:25" ZOrder="300" />
|
||||
|
||||
ENDDEFINE
|
||||
Reference in New Issue
Block a user