romfast/foxbin2prg
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Changeset: 246 fdbozzo - 16/05/2014 17:15:04:

Browse Source
This commit is contained in:
fdbozzo
2014-05-16 17:16:46 +02:00
parent 3706048646
commit ef9a53dcd1
18 changed files with 29610 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

BIN
TESTS/DATOS_READONLY/cplgd2sg.frt
View File

Binary file not shown.

BIN
TESTS/DATOS_READONLY/cplgd2sg.frx
View File

Binary file not shown.

119
TESTS/DATOS_READONLY/encuestas.db2 Normal file
View File

@@ -0,0 +1,119 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (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="encuestas.dbf" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
<TABLE>
<MemoFile></MemoFile>
<CodePage>1252</CodePage>
<LastUpdate>2014/01/31</LastUpdate>
<Database></Database>
<FileType>0x00000030</FileType>
<FileType_Descrip>Visual FoxPro</FileType_Descrip>
<FIELDS>
<FIELD>
<Name>PROMOTOR</Name>
<Type>C</Type>
<Width>20</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>IDENC</Name>
<Type>C</Type>
<Width>20</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>CALIFIC</Name>
<Type>C</Type>
<Width>2</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>FECHA</Name>
<Type>D</Type>
<Width>8</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
<FIELD>
<Name>RESULTADO</Name>
<Type>C</Type>
<Width>10</Width>
<Decimals>0</Decimals>
<Null>.F.</Null>
<NoCPTran>.F.</NoCPTran>
<Field_Valid_Exp></Field_Valid_Exp>
<Field_Valid_Text></Field_Valid_Text>
<Field_Default_Value></Field_Default_Value>
<Table_Valid_Exp></Table_Valid_Exp>
<Table_Valid_Text></Table_Valid_Text>
<LongTableName></LongTableName>
<Ins_Trig_Exp></Ins_Trig_Exp>
<Upd_Trig_Exp></Upd_Trig_Exp>
<Del_Trig_Exp></Del_Trig_Exp>
<TableComment></TableComment>
<Autoinc_Nextval>0</Autoinc_Nextval>
<Autoinc_Step>0</Autoinc_Step>
</FIELD>
</FIELDS>
</TABLE>

833
TESTS/DATOS_READONLY/f_checkbox.sc2 Normal file
View File

@@ -0,0 +1,833 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (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="f_checkbox.scx" /> (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 f_base1 AS f_base OF "lib_controles.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Cl_checkbox1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Check1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Cl_checkbox2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Check2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1.Cl_checkbox3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1.Check3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1.Cl_checkbox4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1.Check4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pageframe1.Page1.Check5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pageframe1.Page1.Check6" UniqueID="" Timestamp="" />
DoCreate = .T.
Left = 0
Name = "F_base1"
Top = 0
Command2.Name = "Command2"
Edit1.Name = "Edit1"
Label1.Caption = "CHECKBOX NORMAL"
Label1.Name = "Label1"
Label2.Caption = "CHECKBOX SUBCLASADOS"
Label2.Name = "Label2"
Label3.Name = "Label3"
ADD OBJECT 'Check1' AS checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox normal", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DefHeight = , ;
DefLeft = , ;
DefTop = , ;
DefWidth = , ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
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, ;
Height = (17), ;
HelpContextID = 0, ;
Left = (64), ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Check1", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .F., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 0, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = (72), ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = (152), ;
WordWrap = .F.
*< END OBJECT: BaseClass="checkbox" />
ADD OBJECT 'Check2' AS checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox normal", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
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, ;
Height = 21, ;
HelpContextID = 0, ;
Left = 64, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Check2", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .F., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 1, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 96, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 152, ;
WordWrap = .F.
*< END OBJECT: BaseClass="checkbox" />
ADD OBJECT 'Cl_checkbox1' AS cl_checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox subclasado", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
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, ;
Height = 17, ;
HelpContextID = 0, ;
Left = 340, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_checkbox1", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .F., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 0, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 72, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 156, ;
WordWrap = .F.
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" />
ADD OBJECT 'Cl_checkbox2' AS cl_checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox subclasado", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
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, ;
Height = 21, ;
HelpContextID = 0, ;
Left = 340, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_checkbox2", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .F., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 1, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 96, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 156, ;
WordWrap = .F.
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" />
ADD OBJECT 'Container1' AS container WITH ;
Height = 76, ;
Left = 24, ;
Name = "Container1", ;
Top = 152, ;
Width = 516
*< END OBJECT: BaseClass="container" />
ADD OBJECT 'Container1.Check3' AS checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox normal", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .F., ;
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, ;
Height = 17, ;
HelpContextID = 0, ;
Left = 40, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Check3", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .F., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 0, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 16, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 152, ;
WordWrap = .F.
*< END OBJECT: BaseClass="checkbox" />
ADD OBJECT 'Container1.Check4' AS checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox normal", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .F., ;
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, ;
Height = 21, ;
HelpContextID = 0, ;
Left = 40, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Check4", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .F., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 1, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 40, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 152, ;
WordWrap = .F.
*< END OBJECT: BaseClass="checkbox" />
ADD OBJECT 'Container1.Cl_checkbox3' AS cl_checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox subclasado", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .F., ;
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, ;
Height = 17, ;
HelpContextID = 0, ;
Left = 316, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_checkbox3", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .F., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 0, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 16, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 156, ;
WordWrap = .F.
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" />
ADD OBJECT 'Container1.Cl_checkbox4' AS cl_checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox subclasado", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .F., ;
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, ;
Height = 21, ;
HelpContextID = 0, ;
Left = 316, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_checkbox4", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .F., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 1, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 40, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 156, ;
WordWrap = .F.
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" />
ADD OBJECT 'Pageframe1' AS pageframe WITH ;
ErasePage = .T., ;
Height = 113, ;
Left = 24, ;
Name = "Pageframe1", ;
PageCount = 2, ;
Top = 276, ;
Width = 517, ;
Page1.Caption = "Page1", ;
Page1.Name = "Page1", ;
Page2.Caption = "Page2", ;
Page2.Name = "Page2"
*< END OBJECT: BaseClass="pageframe" />
ADD OBJECT 'Pageframe1.Page1.Check5' AS checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox normal", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
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, ;
Height = 17, ;
HelpContextID = 0, ;
Left = 35, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Check5", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .T., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 0, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 16, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 152, ;
WordWrap = .F.
*< END OBJECT: BaseClass="checkbox" />
ADD OBJECT 'Pageframe1.Page1.Check6' AS checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox normal", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
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, ;
Height = 21, ;
HelpContextID = 0, ;
Left = 35, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Check6", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .T., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 1, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 40, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 152, ;
WordWrap = .F.
*< END OBJECT: BaseClass="checkbox" />
ADD OBJECT 'Pageframe1.Page1.Cl_checkbox5' AS cl_checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox subclasado", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
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, ;
Height = 17, ;
HelpContextID = 0, ;
Left = 311, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_checkbox5", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .T., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 0, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 16, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 156, ;
WordWrap = .F.
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" />
ADD OBJECT 'Pageframe1.Page1.Cl_checkbox6' AS cl_checkbox WITH ;
Alignment = 0, ;
Anchor = 0, ;
AutoSize = .F., ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
Caption = "Checkbox subclasado", ;
Centered = .F., ;
ColorScheme = 1, ;
ColorSource = 4, ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 240,240,240, ;
DisabledForeColor = 109,109,109, ;
DisabledPicture = ..\..\, ;
DownPicture = ..\..\, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
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, ;
Height = 21, ;
HelpContextID = 0, ;
Left = 311, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_checkbox6", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
PictureMargin = 0, ;
PicturePosition = 13, ;
PictureSpacing = 0, ;
ReadOnly = .T., ;
RightToLeft = .F., ;
SpecialEffect = 0, ;
StatusBarText = "", ;
Style = 1, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 40, ;
Value = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 156, ;
WordWrap = .F.
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" />
ENDDEFINE

1247
TESTS/DATOS_READONLY/f_combobox.sc2 Normal file
View File

File diff suppressed because it is too large Load Diff

1409
TESTS/DATOS_READONLY/f_commandgroup.sc2 Normal file
View File

File diff suppressed because it is too large Load Diff

338
TESTS/DATOS_READONLY/f_containers.sc2 Normal file
View File

@@ -0,0 +1,338 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (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="f_containers.scx" /> (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 f_base1 AS f_base OF "lib_controles.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Cl_pageframe1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Cl_container1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Oleboundcontrol1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Cl_olebound1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Cl_control1" UniqueID="" Timestamp="" />
DoCreate = .T.
Name = "F_base1"
Command2.Name = "Command2"
Edit1.Name = "Edit1"
Label1.Caption = "CONTAINER NORMAL"
Label1.Name = "Label1"
Label2.Caption = "CONTAINER SUBCLASADO"
Label2.Name = "Label2"
Label3.Name = "Label3"
ADD OBJECT 'Cl_container1' AS cl_container WITH ;
Anchor = 0, ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
BorderColor = 255,255,0, ;
BorderWidth = 1, ;
ColorSource = 4, ;
Comment = "", ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
ForeColor = 0,0,0, ;
Height = 68, ;
HelpContextID = 0, ;
Left = 296, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_container1", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = bmps\fondogris.bmp, ;
SpecialEffect = 2, ;
StatusBarText = "", ;
Style = 0, ;
TabStop = .T., ;
Tag = "", ;
ToolTipText = "", ;
Top = 36, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 244
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="container" />
ADD OBJECT 'Cl_control1' AS cl_control WITH ;
Anchor = 0, ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
BorderColor = 100,100,100, ;
BorderWidth = 1, ;
ColorSource = 4, ;
Comment = "", ;
DefHeight = , ;
DefLeft = , ;
DefTop = , ;
DefWidth = , ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
ForeColor = 0,0,0, ;
Height = (61), ;
HelpContextID = 0, ;
Left = (296), ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_control1", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = ..\..\, ;
SpecialEffect = 2, ;
Style = 0, ;
TabIndex = 12, ;
TabStop = .T., ;
Tag = "", ;
ToolTipText = "", ;
Top = (196), ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = (242)
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="control" />
ADD OBJECT 'Cl_olebound1' AS cl_olebound WITH ;
Anchor = 0, ;
AutoActivate = 2, ;
AutoSize = .F., ;
AutoVerbMenu = .T., ;
Comment = "", ;
ControlSource = "", ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
Height = 57, ;
HelpContextID = 0, ;
HostName = "", ;
Left = 296, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_olebound1", ;
Sizable = .T., ;
StatusBarText = "", ;
Stretch = 0, ;
TabStop = .T., ;
Tag = "", ;
ToolTipText = "", ;
Top = 120, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 244
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="oleboundcontrol" />
ADD OBJECT 'Cl_pageframe1' AS cl_pageframe WITH ;
ActivePage = 2, ;
Anchor = 0, ;
ColorSource = 4, ;
Comment = "", ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
ErasePage = .T., ;
Height = 116, ;
HelpContextID = 0, ;
Left = 300, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_pageframe1", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
PageCount = 3, ;
RightToLeft = .F., ;
StatusBarText = "", ;
TabOrientation = 0, ;
Tabs = .T., ;
TabStop = .T., ;
TabStretch = 1, ;
TabStyle = 1, ;
Tag = "", ;
Themes = .T., ;
ToolTipText = "", ;
Top = 280, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 256, ;
Page1.Name = "Page1", ;
Page2.Name = "Page2", ;
Page3.Caption = "Page3", ;
Page3.Name = "Page3"
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" />
ADD OBJECT 'Container1' AS container WITH ;
Anchor = 0, ;
BackColor = 240,240,240, ;
BackStyle = 1, ;
BorderColor = 255,255,0, ;
BorderWidth = 1, ;
ColorSource = 4, ;
Comment = "", ;
DefHeight = , ;
DefLeft = , ;
DefTop = , ;
DefWidth = , ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
ForeColor = 0,0,0, ;
Height = (68), ;
HelpContextID = 0, ;
Left = (28), ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Container1", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = bmps\fondogris.bmp, ;
SpecialEffect = 2, ;
StatusBarText = "", ;
Style = 0, ;
TabStop = .T., ;
Tag = "", ;
ToolTipText = "", ;
Top = (36), ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = (244)
*< END OBJECT: BaseClass="container" />
ADD OBJECT 'Oleboundcontrol1' AS oleboundcontrol WITH ;
Anchor = 0, ;
AutoActivate = 2, ;
AutoSize = .F., ;
AutoVerbMenu = .T., ;
Comment = "", ;
ControlSource = "", ;
DefHeight = , ;
DefLeft = , ;
DefTop = , ;
DefWidth = , ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
Height = (57), ;
HelpContextID = 0, ;
HostName = "", ;
Left = (28), ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Oleboundcontrol1", ;
Sizable = .T., ;
StatusBarText = "", ;
Stretch = 0, ;
TabStop = .T., ;
Tag = "", ;
ToolTipText = "", ;
Top = (120), ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = (244)
*< END OBJECT: BaseClass="oleboundcontrol" />
ADD OBJECT 'Pageframe1' AS pageframe WITH ;
ActivePage = 2, ;
Anchor = 0, ;
ColorSource = 4, ;
Comment = "", ;
DefHeight = , ;
DefLeft = , ;
DefTop = , ;
DefWidth = , ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
ErasePage = .T., ;
Height = (117), ;
HelpContextID = 0, ;
Left = (24), ;
MemberClass = "cl_page", ;
MemberClassLibrary = lib_controles.vcx, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Pageframe1", ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
PageCount = 3, ;
RightToLeft = .F., ;
StatusBarText = "", ;
TabOrientation = 0, ;
Tabs = .T., ;
TabStop = .T., ;
TabStretch = 1, ;
TabStyle = 1, ;
Tag = "", ;
Themes = .T., ;
ToolTipText = "", ;
Top = (280), ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = (256), ;
Cl_page1.BackColor = 240,240,240, ;
Cl_page1.Caption = "P<>gina 1", ;
Cl_page1.ColorSource = 4, ;
Cl_page1.Comment = "", ;
Cl_page1.DragIcon = ..\..\, ;
Cl_page1.DragMode = 0, ;
Cl_page1.Enabled = .T., ;
Cl_page1.FontBold = .F., ;
Cl_page1.FontCharSet = 0, ;
Cl_page1.FontCondense = .F., ;
Cl_page1.FontExtend = .F., ;
Cl_page1.FontItalic = .F., ;
Cl_page1.FontName = "Arial", ;
Cl_page1.FontOutline = .F., ;
Cl_page1.FontShadow = .F., ;
Cl_page1.FontSize = 8, ;
Cl_page1.FontStrikethru = .F., ;
Cl_page1.FontUnderline = .F., ;
Cl_page1.ForeColor = 0,0,0, ;
Cl_page1.HelpContextID = 0, ;
Cl_page1.MouseIcon = ..\..\, ;
Cl_page1.MousePointer = 0, ;
Cl_page1.Name = "Cl_page1", ;
Cl_page1.OLEDragMode = 0, ;
Cl_page1.OLEDragPicture = ..\..\, ;
Cl_page1.OLEDropEffects = 3, ;
Cl_page1.OLEDropMode = 0, ;
Cl_page1.PageOrder = 1, ;
Cl_page1.Picture = ..\..\, ;
Cl_page1.StatusBarText = "", ;
Cl_page1.Tag = "", ;
Cl_page1.ToolTipText = "", ;
Cl_page1.WhatsThisHelpID = -1, ;
Cl_page2.Caption = "P<>gina 2", ;
Cl_page2.Name = "Cl_page2", ;
Cl_page2.PageOrder = 2, ;
Cl_page3.Caption = "P<>gina 3", ;
Cl_page3.Name = "Cl_page3", ;
Cl_page3.PageOrder = 3
*< END OBJECT: BaseClass="pageframe" />
ENDDEFINE

2616
TESTS/DATOS_READONLY/f_form_aa.sc2 Normal file
View File

File diff suppressed because it is too large Load Diff

1355
TESTS/DATOS_READONLY/f_form_aa2.sc2 Normal file
View File

File diff suppressed because it is too large Load Diff

3137
TESTS/DATOS_READONLY/f_form_controles.sc2 Normal file
View File

File diff suppressed because it is too large Load Diff

971
TESTS/DATOS_READONLY/f_formset.sc2 Normal file
View File

@@ -0,0 +1,971 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (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="f_formset.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS dataenvironment AS dataenvironment
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="2" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" />
AutoCloseTables = .T.
AutoOpenTables = .T.
Comment = ""
DataSource = .NULL.
DataSourceType = ""
Height = 200
InitialSelectedAlias = ""
Left = 1
Name = "Dataenvironment"
OpenViews = 0
Tag = ""
Top = 220
Width = 520
ADD OBJECT 'Cursor1' AS cursor WITH ;
Alias = "encuestas", ;
BufferModeOverride = 1, ;
Comment = "", ;
CursorSource = encuestas.dbf, ;
Exclusive = .F., ;
Filter = "", ;
Height = 90, ;
Left = 10, ;
Name = "Cursor1", ;
NoDataOnLoad = .F., ;
Order = "", ;
OrderDirection = 0, ;
ReadOnly = .F., ;
Tag = "", ;
Top = 20, ;
Width = 90
*< END OBJECT: BaseClass="cursor" />
ENDDEFINE
DEFINE CLASS formset AS formset
*< CLASSDATA: Baseclass="formset" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="F_base1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column1.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column1.Cl_header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column2.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column2.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column3.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column3.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column4.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column4.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column5.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column5.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Cl_grid1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column1.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column1.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column2.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column2.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column3.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column3.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column4.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column4.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column5.Header1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column5.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.Cl_grid1" UniqueID="" Timestamp="" />
*<DefinedPropArrayMethod>
*p: c_testname
*</DefinedPropArrayMethod>
AutoRelease = .T.
BufferMode = 0
Comment = ""
c_testname = Formset_Test
DataSession = 2
Name = "Formset"
ReadCycle = .T.
ReadLock = .T.
ReadMouse = .T.
ReadSave = .F.
ReadTimeout = 0
Tag = ""
Visible = .T.
WindowList = ""
WindowType = 0
ADD OBJECT 'F_base1' AS f_base WITH ;
AllowOutput = .T., ;
AlwaysOnBottom = .F., ;
AlwaysOnTop = .F., ;
AutoCenter = .F., ;
BackColor = 192,192,192, ;
BindControls = .T., ;
BorderStyle = 3, ;
ClipControls = .T., ;
Closable = .T., ;
ColorSource = 4, ;
Comment = "", ;
ContinuousScroll = .T., ;
ControlBox = .T., ;
c_testname = Formset_Test, ;
DefHeight = , ;
DefLeft = , ;
DefOleLCID = 0, ;
DefTop = , ;
DefWidth = , ;
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 = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
ForeColor = 0,0,0, ;
HalfHeightCaption = .F., ;
Height = (424), ;
HelpContextID = 0, ;
HScrollSmallChange = 10, ;
Icon = ..\..\, ;
KeyPreview = .F., ;
Left = (2), ;
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 = "F_base1", ;
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, ;
Top = (4), ;
Visible = .T., ;
VScrollSmallChange = 10, ;
WhatsThisButton = .F., ;
WhatsThisHelp = .F., ;
WhatsThisHelpID = -1, ;
Width = (819), ;
WindowState = 0, ;
WindowType = 0, ;
ZoomBox = .F., ;
Command2.Name = "Command2", ;
Command2.RightToLeft = .F., ;
Edit1.Name = "Edit1", ;
Edit1.RightToLeft = .F., ;
Label1.Name = "Label1", ;
Label1.RightToLeft = .F., ;
Label2.Name = "Label2", ;
Label2.RightToLeft = .F., ;
Label3.Name = "Label3", ;
Label3.RightToLeft = .F.
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="form" />
ADD OBJECT 'F_base1.Cl_grid1' AS cl_grid WITH ;
AllowAddNew = .F., ;
AllowAutoColumnFit = 0, ;
AllowCellSelection = .T., ;
AllowHeaderSizing = .T., ;
AllowRowSizing = .T., ;
Anchor = 0, ;
BackColor = 255,255,255, ;
ChildOrder = "", ;
ColumnCount = 5, ;
Comment = "", ;
DeleteMark = .T., ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
FontBold = .F., ;
FontCharSet = 0, ;
FontCondense = .F., ;
FontExtend = .F., ;
FontItalic = .F., ;
FontName = "Arial", ;
FontOutline = .F., ;
FontShadow = .F., ;
FontSize = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
ForeColor = 0,0,0, ;
GridLineColor = 0,0,0, ;
GridLines = 3, ;
GridLineWidth = 1, ;
HeaderHeight = 17, ;
Height = 160, ;
HelpContextID = 0, ;
Highlight = .T., ;
HighlightBackColor = 51,153,255, ;
HighlightForeColor = 255,255,255, ;
HighlightRow = .T., ;
HighlightRowLineWidth = 1, ;
HighlightStyle = 0, ;
Left = 308, ;
LinkMaster = "", ;
LockColumns = 0, ;
LockColumnsLeft = 0, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_grid1", ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Optimize = .F., ;
Panel = 1, ;
PanelLink = .T., ;
Partition = 0, ;
ReadOnly = .F., ;
RecordMark = .T., ;
RecordSource = "encuestas", ;
RecordSourceType = 1, ;
RelationalExpr = "", ;
RightToLeft = .F., ;
RowHeight = 17, ;
ScrollBars = 3, ;
SelectedItemBackColor = 51,153,255, ;
SelectedItemForeColor = 255,255,255, ;
SplitBar = .T., ;
StatusBarText = "", ;
TabStop = .T., ;
Tag = "", ;
Themes = .T., ;
ToolTipText = "", ;
Top = 32, ;
Value = 0, ;
View = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 228, ;
Column1.BackColor = 255,255,255, ;
Column1.ControlSource = "", ;
Column1.Enabled = .T., ;
Column1.FontBold = .F., ;
Column1.FontCharSet = 0, ;
Column1.FontCondense = .F., ;
Column1.FontExtend = .F., ;
Column1.FontItalic = .F., ;
Column1.FontName = "Arial", ;
Column1.FontOutline = .F., ;
Column1.FontShadow = .F., ;
Column1.FontSize = 8, ;
Column1.FontStrikethru = .F., ;
Column1.FontUnderline = .F., ;
Column1.ForeColor = 0,0,0, ;
Column1.Header1.FontBold = .F., ;
Column1.Header1.FontCharSet = 0, ;
Column1.Header1.FontCondense = .F., ;
Column1.Header1.FontExtend = .F., ;
Column1.Header1.FontItalic = .F., ;
Column1.Header1.FontName = "Arial", ;
Column1.Header1.FontOutline = .F., ;
Column1.Header1.FontShadow = .F., ;
Column1.Header1.FontSize = 8, ;
Column1.Header1.FontStrikethru = .F., ;
Column1.Header1.FontUnderline = .F., ;
Column1.Header1.Name = "Header1", ;
Column1.Name = "Column1", ;
Column1.ReadOnly = .F., ;
Column1.Text1.BackColor = 255,255,255, ;
Column1.Text1.Enabled = .T., ;
Column1.Text1.FontBold = .F., ;
Column1.Text1.FontCharSet = 0, ;
Column1.Text1.FontCondense = .F., ;
Column1.Text1.FontExtend = .F., ;
Column1.Text1.FontItalic = .F., ;
Column1.Text1.FontName = "Arial", ;
Column1.Text1.FontOutline = .F., ;
Column1.Text1.FontShadow = .F., ;
Column1.Text1.FontSize = 8, ;
Column1.Text1.FontStrikethru = .F., ;
Column1.Text1.FontUnderline = .F., ;
Column1.Text1.ForeColor = 0,0,0, ;
Column1.Text1.Name = "Text1", ;
Column1.Text1.ReadOnly = .F., ;
Column1.Text1.Visible = .T., ;
Column1.Visible = .T., ;
Column2.BackColor = 255,255,255, ;
Column2.ControlSource = "", ;
Column2.Enabled = .T., ;
Column2.FontBold = .F., ;
Column2.FontCharSet = 0, ;
Column2.FontCondense = .F., ;
Column2.FontExtend = .F., ;
Column2.FontItalic = .F., ;
Column2.FontName = "Arial", ;
Column2.FontOutline = .F., ;
Column2.FontShadow = .F., ;
Column2.FontSize = 8, ;
Column2.FontStrikethru = .F., ;
Column2.FontUnderline = .F., ;
Column2.ForeColor = 0,0,0, ;
Column2.Header1.FontBold = .F., ;
Column2.Header1.FontCharSet = 0, ;
Column2.Header1.FontCondense = .F., ;
Column2.Header1.FontExtend = .F., ;
Column2.Header1.FontItalic = .F., ;
Column2.Header1.FontName = "Arial", ;
Column2.Header1.FontOutline = .F., ;
Column2.Header1.FontShadow = .F., ;
Column2.Header1.FontSize = 8, ;
Column2.Header1.FontStrikethru = .F., ;
Column2.Header1.FontUnderline = .F., ;
Column2.Header1.Name = "Header1", ;
Column2.Name = "Column2", ;
Column2.ReadOnly = .F., ;
Column2.Text1.BackColor = 255,255,255, ;
Column2.Text1.Enabled = .T., ;
Column2.Text1.FontBold = .F., ;
Column2.Text1.FontCharSet = 0, ;
Column2.Text1.FontCondense = .F., ;
Column2.Text1.FontExtend = .F., ;
Column2.Text1.FontItalic = .F., ;
Column2.Text1.FontName = "Arial", ;
Column2.Text1.FontOutline = .F., ;
Column2.Text1.FontShadow = .F., ;
Column2.Text1.FontSize = 8, ;
Column2.Text1.FontStrikethru = .F., ;
Column2.Text1.FontUnderline = .F., ;
Column2.Text1.ForeColor = 0,0,0, ;
Column2.Text1.Name = "Text1", ;
Column2.Text1.ReadOnly = .F., ;
Column2.Text1.Visible = .T., ;
Column2.Visible = .T., ;
Column3.BackColor = 255,255,255, ;
Column3.ControlSource = "", ;
Column3.Enabled = .T., ;
Column3.FontBold = .F., ;
Column3.FontCharSet = 0, ;
Column3.FontCondense = .F., ;
Column3.FontExtend = .F., ;
Column3.FontItalic = .F., ;
Column3.FontName = "Arial", ;
Column3.FontOutline = .F., ;
Column3.FontShadow = .F., ;
Column3.FontSize = 8, ;
Column3.FontStrikethru = .F., ;
Column3.FontUnderline = .F., ;
Column3.ForeColor = 0,0,0, ;
Column3.Header1.FontBold = .F., ;
Column3.Header1.FontCharSet = 0, ;
Column3.Header1.FontCondense = .F., ;
Column3.Header1.FontExtend = .F., ;
Column3.Header1.FontItalic = .F., ;
Column3.Header1.FontName = "Arial", ;
Column3.Header1.FontOutline = .F., ;
Column3.Header1.FontShadow = .F., ;
Column3.Header1.FontSize = 8, ;
Column3.Header1.FontStrikethru = .F., ;
Column3.Header1.FontUnderline = .F., ;
Column3.Header1.Name = "Header1", ;
Column3.Name = "Column3", ;
Column3.ReadOnly = .F., ;
Column3.Text1.BackColor = 255,255,255, ;
Column3.Text1.Enabled = .T., ;
Column3.Text1.FontBold = .F., ;
Column3.Text1.FontCharSet = 0, ;
Column3.Text1.FontCondense = .F., ;
Column3.Text1.FontExtend = .F., ;
Column3.Text1.FontItalic = .F., ;
Column3.Text1.FontName = "Arial", ;
Column3.Text1.FontOutline = .F., ;
Column3.Text1.FontShadow = .F., ;
Column3.Text1.FontSize = 8, ;
Column3.Text1.FontStrikethru = .F., ;
Column3.Text1.FontUnderline = .F., ;
Column3.Text1.ForeColor = 0,0,0, ;
Column3.Text1.Name = "Text1", ;
Column3.Text1.ReadOnly = .F., ;
Column3.Text1.Visible = .T., ;
Column3.Visible = .T., ;
Column4.BackColor = 255,255,255, ;
Column4.ControlSource = "", ;
Column4.Enabled = .T., ;
Column4.FontBold = .F., ;
Column4.FontCharSet = 0, ;
Column4.FontCondense = .F., ;
Column4.FontExtend = .F., ;
Column4.FontItalic = .F., ;
Column4.FontName = "Arial", ;
Column4.FontOutline = .F., ;
Column4.FontShadow = .F., ;
Column4.FontSize = 8, ;
Column4.FontStrikethru = .F., ;
Column4.FontUnderline = .F., ;
Column4.ForeColor = 0,0,0, ;
Column4.Header1.FontBold = .F., ;
Column4.Header1.FontCharSet = 0, ;
Column4.Header1.FontCondense = .F., ;
Column4.Header1.FontExtend = .F., ;
Column4.Header1.FontItalic = .F., ;
Column4.Header1.FontName = "Arial", ;
Column4.Header1.FontOutline = .F., ;
Column4.Header1.FontShadow = .F., ;
Column4.Header1.FontSize = 8, ;
Column4.Header1.FontStrikethru = .F., ;
Column4.Header1.FontUnderline = .F., ;
Column4.Header1.Name = "Header1", ;
Column4.Name = "Column4", ;
Column4.ReadOnly = .F., ;
Column4.Text1.BackColor = 255,255,255, ;
Column4.Text1.Enabled = .T., ;
Column4.Text1.FontBold = .F., ;
Column4.Text1.FontCharSet = 0, ;
Column4.Text1.FontCondense = .F., ;
Column4.Text1.FontExtend = .F., ;
Column4.Text1.FontItalic = .F., ;
Column4.Text1.FontName = "Arial", ;
Column4.Text1.FontOutline = .F., ;
Column4.Text1.FontShadow = .F., ;
Column4.Text1.FontSize = 8, ;
Column4.Text1.FontStrikethru = .F., ;
Column4.Text1.FontUnderline = .F., ;
Column4.Text1.ForeColor = 0,0,0, ;
Column4.Text1.Name = "Text1", ;
Column4.Text1.ReadOnly = .F., ;
Column4.Text1.Visible = .T., ;
Column4.Visible = .T., ;
Column5.BackColor = 255,255,255, ;
Column5.ControlSource = "", ;
Column5.Enabled = .T., ;
Column5.FontBold = .F., ;
Column5.FontCharSet = 0, ;
Column5.FontCondense = .F., ;
Column5.FontExtend = .F., ;
Column5.FontItalic = .F., ;
Column5.FontName = "Arial", ;
Column5.FontOutline = .F., ;
Column5.FontShadow = .F., ;
Column5.FontSize = 8, ;
Column5.FontStrikethru = .F., ;
Column5.FontUnderline = .F., ;
Column5.ForeColor = 0,0,0, ;
Column5.Header1.FontBold = .F., ;
Column5.Header1.FontCharSet = 0, ;
Column5.Header1.FontCondense = .F., ;
Column5.Header1.FontExtend = .F., ;
Column5.Header1.FontItalic = .F., ;
Column5.Header1.FontName = "Arial", ;
Column5.Header1.FontOutline = .F., ;
Column5.Header1.FontShadow = .F., ;
Column5.Header1.FontSize = 8, ;
Column5.Header1.FontStrikethru = .F., ;
Column5.Header1.FontUnderline = .F., ;
Column5.Header1.Name = "Header1", ;
Column5.Name = "Column5", ;
Column5.ReadOnly = .F., ;
Column5.Text1.BackColor = 255,255,255, ;
Column5.Text1.Enabled = .T., ;
Column5.Text1.FontBold = .F., ;
Column5.Text1.FontCharSet = 0, ;
Column5.Text1.FontCondense = .F., ;
Column5.Text1.FontExtend = .F., ;
Column5.Text1.FontItalic = .F., ;
Column5.Text1.FontName = "Arial", ;
Column5.Text1.FontOutline = .F., ;
Column5.Text1.FontShadow = .F., ;
Column5.Text1.FontSize = 8, ;
Column5.Text1.FontStrikethru = .F., ;
Column5.Text1.FontUnderline = .F., ;
Column5.Text1.ForeColor = 0,0,0, ;
Column5.Text1.Name = "Text1", ;
Column5.Text1.ReadOnly = .F., ;
Column5.Text1.Visible = .T., ;
Column5.Visible = .T.
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" />
ADD OBJECT 'F_base1.grdEncuestas' AS grid WITH ;
AllowAddNew = .F., ;
AllowAutoColumnFit = 0, ;
AllowCellSelection = .T., ;
AllowHeaderSizing = .T., ;
AllowRowSizing = .T., ;
Anchor = 0, ;
BackColor = 255,255,255, ;
ChildOrder = "", ;
ColumnCount = 5, ;
Comment = "", ;
DefHeight = , ;
DefLeft = , ;
DefTop = , ;
DefWidth = , ;
DeleteMark = .T., ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
FontBold = .F., ;
FontCharSet = 0, ;
FontCondense = .F., ;
FontExtend = .F., ;
FontItalic = .F., ;
FontName = "Arial", ;
FontOutline = .F., ;
FontShadow = .F., ;
FontSize = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
ForeColor = 0,0,0, ;
GridLineColor = 0,0,0, ;
GridLines = 3, ;
GridLineWidth = 1, ;
HeaderHeight = 17, ;
Height = (160), ;
HelpContextID = 0, ;
Highlight = .T., ;
HighlightBackColor = 51,153,255, ;
HighlightForeColor = 255,255,255, ;
HighlightRow = .T., ;
HighlightRowLineWidth = 1, ;
HighlightStyle = 0, ;
Left = (40), ;
LinkMaster = "", ;
LockColumns = 0, ;
LockColumnsLeft = 0, ;
MemberClass = "cl_Column", ;
MemberClassLibrary = ..\fxu_lib_objetos_y_funciones_de_soporte.prg, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "grdEncuestas", ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Optimize = .F., ;
Panel = 1, ;
PanelLink = .T., ;
Partition = 0, ;
ReadOnly = .F., ;
RecordMark = .T., ;
RecordSource = "encuestas", ;
RecordSourceType = 1, ;
RelationalExpr = "", ;
RightToLeft = .F., ;
RowHeight = 17, ;
ScrollBars = 3, ;
SelectedItemBackColor = 51,153,255, ;
SelectedItemForeColor = 255,255,255, ;
SplitBar = .T., ;
StatusBarText = "", ;
TabIndex = 6, ;
TabStop = .T., ;
Tag = "", ;
Themes = .T., ;
ToolTipText = "", ;
Top = (32), ;
Value = 0, ;
View = 0, ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = (228), ;
Cl_column1.Alignment = 3, ;
Cl_column1.BackColor = 255,255,255, ;
Cl_column1.Bound = .T., ;
Cl_column1.ColumnOrder = 1, ;
Cl_column1.Comment = "Ver este Column", ;
Cl_column1.ControlSource = "promotor", ;
Cl_column1.CurrentControl = "Text1", ;
Cl_column1.DynamicAlignment = "", ;
Cl_column1.DynamicBackColor = "", ;
Cl_column1.DynamicCurrentControl = "", ;
Cl_column1.DynamicFontBold = "", ;
Cl_column1.DynamicFontItalic = "", ;
Cl_column1.DynamicFontName = "", ;
Cl_column1.DynamicFontOutline = "", ;
Cl_column1.DynamicFontShadow = "", ;
Cl_column1.DynamicFontSize = "", ;
Cl_column1.DynamicFontStrikethru = "", ;
Cl_column1.DynamicFontUnderline = "", ;
Cl_column1.DynamicForeColor = "", ;
Cl_column1.DynamicInputMask = "", ;
Cl_column1.Enabled = .T., ;
Cl_column1.FontBold = .F., ;
Cl_column1.FontCharSet = 0, ;
Cl_column1.FontCondense = .F., ;
Cl_column1.FontExtend = .F., ;
Cl_column1.FontItalic = .F., ;
Cl_column1.FontName = "Arial", ;
Cl_column1.FontOutline = .F., ;
Cl_column1.FontShadow = .F., ;
Cl_column1.FontSize = 8, ;
Cl_column1.FontStrikethru = .F., ;
Cl_column1.FontUnderline = .F., ;
Cl_column1.ForeColor = 0,0,0, ;
Cl_column1.Format = "", ;
Cl_column1.HeaderClass = "cl_Header", ;
Cl_column1.HeaderClassLibrary = ..\fxu_lib_objetos_y_funciones_de_soporte.prg, ;
Cl_column1.InputMask = "", ;
Cl_column1.MouseIcon = ..\..\, ;
Cl_column1.MousePointer = 0, ;
Cl_column1.Movable = .T., ;
Cl_column1.Name = "Cl_column1", ;
Cl_column1.ReadOnly = .F., ;
Cl_column1.Resizable = .T., ;
Cl_column1.SelectOnEntry = .T., ;
Cl_column1.Sparse = .T., ;
Cl_column1.StatusBarText = "", ;
Cl_column1.Tag = "", ;
Cl_column1.ToolTipText = "", ;
Cl_column1.Visible = .T., ;
Cl_column1.Width = 75, ;
Cl_column2.BackColor = 255,255,255, ;
Cl_column2.Enabled = .T., ;
Cl_column2.FontBold = .F., ;
Cl_column2.FontCharSet = 0, ;
Cl_column2.FontCondense = .F., ;
Cl_column2.FontExtend = .F., ;
Cl_column2.FontItalic = .F., ;
Cl_column2.FontName = "Arial", ;
Cl_column2.FontOutline = .F., ;
Cl_column2.FontShadow = .F., ;
Cl_column2.FontSize = 8, ;
Cl_column2.FontStrikethru = .F., ;
Cl_column2.FontUnderline = .F., ;
Cl_column2.ForeColor = 0,0,0, ;
Cl_column2.Name = "Cl_column2", ;
Cl_column2.ReadOnly = .F., ;
Cl_column2.Visible = .T., ;
Cl_column3.BackColor = 255,255,255, ;
Cl_column3.Enabled = .T., ;
Cl_column3.FontBold = .F., ;
Cl_column3.FontCharSet = 0, ;
Cl_column3.FontCondense = .F., ;
Cl_column3.FontExtend = .F., ;
Cl_column3.FontItalic = .F., ;
Cl_column3.FontName = "Arial", ;
Cl_column3.FontOutline = .F., ;
Cl_column3.FontShadow = .F., ;
Cl_column3.FontSize = 8, ;
Cl_column3.FontStrikethru = .F., ;
Cl_column3.FontUnderline = .F., ;
Cl_column3.ForeColor = 0,0,0, ;
Cl_column3.Name = "Cl_column3", ;
Cl_column3.ReadOnly = .F., ;
Cl_column3.Visible = .T., ;
Cl_column4.BackColor = 255,255,255, ;
Cl_column4.Enabled = .T., ;
Cl_column4.FontBold = .F., ;
Cl_column4.FontCharSet = 0, ;
Cl_column4.FontCondense = .F., ;
Cl_column4.FontExtend = .F., ;
Cl_column4.FontItalic = .F., ;
Cl_column4.FontName = "Arial", ;
Cl_column4.FontOutline = .F., ;
Cl_column4.FontShadow = .F., ;
Cl_column4.FontSize = 8, ;
Cl_column4.FontStrikethru = .F., ;
Cl_column4.FontUnderline = .F., ;
Cl_column4.ForeColor = 0,0,0, ;
Cl_column4.Name = "Cl_column4", ;
Cl_column4.ReadOnly = .F., ;
Cl_column4.Visible = .T., ;
Cl_column5.BackColor = 255,255,255, ;
Cl_column5.Enabled = .T., ;
Cl_column5.FontBold = .F., ;
Cl_column5.FontCharSet = 0, ;
Cl_column5.FontCondense = .F., ;
Cl_column5.FontExtend = .F., ;
Cl_column5.FontItalic = .F., ;
Cl_column5.FontName = "Arial", ;
Cl_column5.FontOutline = .F., ;
Cl_column5.FontShadow = .F., ;
Cl_column5.FontSize = 8, ;
Cl_column5.FontStrikethru = .F., ;
Cl_column5.FontUnderline = .F., ;
Cl_column5.ForeColor = 0,0,0, ;
Cl_column5.Name = "Cl_column5", ;
Cl_column5.ReadOnly = .F., ;
Cl_column5.Visible = .T.
*< END OBJECT: BaseClass="grid" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column1.Cl_header1' AS cl_header WITH ;
Alignment = 0, ;
BackColor = 240,240,240, ;
Caption = "promotor", ;
Comment = "", ;
FontBold = .F., ;
FontCharSet = 0, ;
FontCondense = .F., ;
FontExtend = .F., ;
FontItalic = .F., ;
FontName = "Arial", ;
FontOutline = .F., ;
FontShadow = .F., ;
FontSize = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
ForeColor = 0,0,0, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
Name = "Cl_header1", ;
Picture = ..\..\, ;
StatusBarText = "", ;
Tag = "", ;
ToolTipText = "", ;
WordWrap = .F.
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column1.Text1' AS textbox WITH ;
Alignment = 3, ;
Anchor = 0, ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
FontName = "Arial", ;
FontSize = 8, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1", ;
SelectedBackColor = 51,153,255, ;
SelectedForeColor = 255,255,255
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column2.Header1' AS header WITH ;
Caption = "idenc", ;
FontName = "Arial", ;
FontSize = 8, ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column2.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
FontName = "Arial", ;
FontSize = 8, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1", ;
SelectedBackColor = 51,153,255, ;
SelectedForeColor = 255,255,255
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column3.Header1' AS header WITH ;
Caption = "calific", ;
FontName = "Arial", ;
FontSize = 8, ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column3.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
FontName = "Arial", ;
FontSize = 8, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1", ;
SelectedBackColor = 51,153,255, ;
SelectedForeColor = 255,255,255
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column4.Header1' AS header WITH ;
Caption = "fecha", ;
FontName = "Arial", ;
FontSize = 8, ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column4.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
FontName = "Arial", ;
FontSize = 8, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1", ;
SelectedBackColor = 51,153,255, ;
SelectedForeColor = 255,255,255
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column5.Header1' AS header WITH ;
Caption = "resultado", ;
FontName = "Arial", ;
FontSize = 8, ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.grdEncuestas.Cl_column5.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
FontName = "Arial", ;
FontSize = 8, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1", ;
SelectedBackColor = 51,153,255, ;
SelectedForeColor = 255,255,255
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'F_base1.Pageframe1' AS pageframe WITH ;
ErasePage = .T., ;
Height = 213, ;
Left = 28, ;
Name = "Pageframe1", ;
PageCount = 2, ;
Top = 200, ;
Width = 517, ;
Page1.Caption = "Page1", ;
Page1.Name = "Page1", ;
Page2.Caption = "Page2", ;
Page2.Name = "Page2"
*< END OBJECT: BaseClass="pageframe" />
ADD OBJECT 'F_base1.Pageframe1.Page1.Cl_grid1' AS cl_grid WITH ;
Left = 279, ;
Name = "Cl_grid1", ;
Top = 8, ;
Column1.Header1.Name = "Header1", ;
Column1.Name = "Column1", ;
Column1.Text1.Name = "Text1", ;
Column2.Header1.Name = "Header1", ;
Column2.Name = "Column2", ;
Column2.Text1.Name = "Text1", ;
Column3.Header1.Name = "Header1", ;
Column3.Name = "Column3", ;
Column3.Text1.Name = "Text1", ;
Column4.Header1.Name = "Header1", ;
Column4.Name = "Column4", ;
Column4.Text1.Name = "Text1", ;
Column5.Header1.Name = "Header1", ;
Column5.Name = "Column5", ;
Column5.Text1.Name = "Text1"
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas' AS grid WITH ;
ColumnCount = 5, ;
Height = 160, ;
Left = 11, ;
Name = "grdEncuestas", ;
RecordSource = "encuestas", ;
RecordSourceType = 1, ;
Top = 8, ;
Width = 228, ;
Column1.ControlSource = "encuestas.promotor", ;
Column1.Name = "Column1", ;
Column2.ControlSource = "encuestas.idenc", ;
Column2.Name = "Column2", ;
Column3.ControlSource = "encuestas.calific", ;
Column3.Name = "Column3", ;
Column4.ControlSource = "encuestas.fecha", ;
Column4.Name = "Column4", ;
Column5.ControlSource = "encuestas.resultado", ;
Column5.Name = "Column5"
*< END OBJECT: BaseClass="grid" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column1.Header1' AS header WITH ;
Caption = "promotor", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column1.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1"
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column2.Header1' AS header WITH ;
Caption = "idenc", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column2.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1"
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column3.Header1' AS header WITH ;
Caption = "calific", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column3.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1"
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column4.Header1' AS header WITH ;
Caption = "fecha", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column4.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1"
*< END OBJECT: BaseClass="textbox" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column5.Header1' AS header WITH ;
Caption = "resultado", ;
Name = "Header1"
*< END OBJECT: BaseClass="header" />
ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column5.Text1' AS textbox WITH ;
BackColor = 255,255,255, ;
BorderStyle = 0, ;
ForeColor = 0,0,0, ;
Margin = 0, ;
Name = "Text1"
*< END OBJECT: BaseClass="textbox" />
PROCEDURE Refresh
DOEVENTS FORCE
THISFORMSET.Forms(1).c_testname = THISFORMSET.c_testname
THISFORMSET.Forms(1).REFRESH()
ENDPROC
PROCEDURE F_base1.Cl_grid1.Init
this.AutoFit()
ENDPROC
PROCEDURE F_base1.grdEncuestas.Init
this.AutoFit()
ENDPROC
ENDDEFINE

578
TESTS/DATOS_READONLY/f_listbox.sc2 Normal file
View File

@@ -0,0 +1,578 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (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="f_listbox.scx" /> (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 f_listbox_test AS f_base OF "lib_controles.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Cl_ListBox1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1.Cl_ListBox1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1.ListBox1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ListBox1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pageframe1.Page1.ListBox1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="ListBox1" UniqueID="" Timestamp="" />
c_testname = Listbox_Test
DoCreate = .T.
Left = 0
Name = "F_Listbox_Test"
Top = 0
Command2.Name = "Command2"
Edit1.Name = "Edit1"
Label1.Caption = "LISTBOX NORMAL"
Label1.Name = "Label1"
Label2.Caption = "LISTBOX SUBCLASADOS"
Label2.Name = "Label2"
Label3.Name = "Label3"
ADD OBJECT 'Cl_ListBox1' AS cl_listbox WITH ;
Anchor = 0, ;
AutoHideScrollbar = 0, ;
BorderColor = 255,255,0, ;
BoundColumn = 2, ;
BoundTo = .F., ;
ColorScheme = 2, ;
ColorSource = 4, ;
ColumnCount = 2, ;
ColumnLines = .T., ;
ColumnWidths = "150,150", ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 0,128,192, ;
DisabledForeColor = 128,0,255, ;
DisabledItemBackColor = 255,255,255, ;
DisabledItemForeColor = 109,109,109, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
FirstElement = 1, ;
FontBold = .F., ;
FontCharSet = 0, ;
FontCondense = .F., ;
FontExtend = .F., ;
FontItalic = .F., ;
FontName = "Arial", ;
FontOutline = .F., ;
FontShadow = .F., ;
FontSize = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
Height = 60, ;
HelpContextID = 0, ;
IncrementalSearch = .T., ;
IntegralHeight = .F., ;
ItemBackColor = 255,255,255, ;
ItemForeColor = 0,0,0, ;
ItemTips = .F., ;
Left = 308, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
MoverBars = .F., ;
MultiSelect = .F., ;
Name = "Cl_ListBox1", ;
NullDisplay = "", ;
NumberOfElements = 0, ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = bmps\sobrepostal.bmp, ;
RightToLeft = .F., ;
RowSource = "", ;
RowSourceType = 0, ;
SelectedItemBackColor = 51,153,255, ;
SelectedItemForeColor = 255,255,255, ;
Sorted = .F., ;
SpecialEffect = 1, ;
StatusBarText = "", ;
TabIndex = 6, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 44, ;
Value = , ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 224
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" />
ADD OBJECT 'Container1' AS container WITH ;
Height = 97, ;
Left = 28, ;
Name = "Container1", ;
TabIndex = 9, ;
Top = 128, ;
Width = 512
*< END OBJECT: BaseClass="container" />
ADD OBJECT 'Container1.Cl_ListBox1' AS cl_listbox WITH ;
Anchor = 0, ;
AutoHideScrollbar = 0, ;
BorderColor = 255,255,0, ;
BoundColumn = 2, ;
BoundTo = .F., ;
ColorScheme = 2, ;
ColorSource = 4, ;
ColumnCount = 2, ;
ColumnLines = .T., ;
ColumnWidths = "150,150", ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 0,128,192, ;
DisabledForeColor = 128,0,255, ;
DisabledItemBackColor = 255,255,255, ;
DisabledItemForeColor = 109,109,109, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
FirstElement = 1, ;
FontBold = .F., ;
FontCharSet = 0, ;
FontCondense = .F., ;
FontExtend = .F., ;
FontItalic = .F., ;
FontName = "Arial", ;
FontOutline = .F., ;
FontShadow = .F., ;
FontSize = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
Height = 60, ;
HelpContextID = 0, ;
IncrementalSearch = .T., ;
IntegralHeight = .F., ;
ItemBackColor = 255,255,255, ;
ItemForeColor = 0,0,0, ;
ItemTips = .F., ;
Left = 280, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
MoverBars = .F., ;
MultiSelect = .F., ;
Name = "Cl_ListBox1", ;
NullDisplay = "", ;
NumberOfElements = 0, ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = bmps\sobrepostal.bmp, ;
RightToLeft = .F., ;
RowSource = "", ;
RowSourceType = 0, ;
SelectedItemBackColor = 51,153,255, ;
SelectedItemForeColor = 255,255,255, ;
Sorted = .F., ;
SpecialEffect = 1, ;
StatusBarText = "", ;
TabIndex = 6, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 12, ;
Value = , ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 224
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" />
ADD OBJECT 'Container1.ListBox1' AS listbox WITH ;
Anchor = 0, ;
AutoHideScrollbar = 0, ;
BorderColor = 255,255,0, ;
BoundColumn = 2, ;
BoundTo = .F., ;
ColorScheme = 2, ;
ColorSource = 4, ;
ColumnCount = 2, ;
ColumnLines = .T., ;
ColumnWidths = "150,150", ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 0,128,192, ;
DisabledForeColor = 128,0,255, ;
DisabledItemBackColor = 255,255,255, ;
DisabledItemForeColor = 109,109,109, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
FirstElement = 1, ;
FontBold = .F., ;
FontCharSet = 0, ;
FontCondense = .F., ;
FontExtend = .F., ;
FontItalic = .F., ;
FontName = "Arial", ;
FontOutline = .F., ;
FontShadow = .F., ;
FontSize = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
Height = 60, ;
HelpContextID = 0, ;
IncrementalSearch = .T., ;
IntegralHeight = .F., ;
ItemBackColor = 255,255,255, ;
ItemForeColor = 0,0,0, ;
ItemTips = .F., ;
Left = 8, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
MoverBars = .F., ;
MultiSelect = .F., ;
Name = "ListBox1", ;
NullDisplay = "", ;
NumberOfElements = 0, ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = bmps\sobrepostal.bmp, ;
RightToLeft = .F., ;
RowSource = "", ;
RowSourceType = 0, ;
SelectedItemBackColor = 51,153,255, ;
SelectedItemForeColor = 255,255,255, ;
Sorted = .F., ;
SpecialEffect = 1, ;
StatusBarText = "", ;
TabIndex = 11, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 12, ;
Value = , ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 224
*< END OBJECT: BaseClass="listbox" />
ADD OBJECT 'ListBox1' AS listbox WITH ;
Anchor = 0, ;
AutoHideScrollbar = 0, ;
BorderColor = 255,255,0, ;
BoundColumn = 2, ;
BoundTo = .F., ;
ColorScheme = 2, ;
ColorSource = 4, ;
ColumnCount = 2, ;
ColumnLines = .T., ;
ColumnWidths = "150,150", ;
Comment = "", ;
ControlSource = "", ;
DefHeight = , ;
DefLeft = , ;
DefTop = , ;
DefWidth = , ;
DisabledBackColor = 0,128,192, ;
DisabledForeColor = 128,0,255, ;
DisabledItemBackColor = 255,255,255, ;
DisabledItemForeColor = 109,109,109, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
FirstElement = 1, ;
FontBold = .F., ;
FontCharSet = 0, ;
FontCondense = .F., ;
FontExtend = .F., ;
FontItalic = .F., ;
FontName = "Arial", ;
FontOutline = .F., ;
FontShadow = .F., ;
FontSize = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
Height = (60), ;
HelpContextID = 0, ;
IncrementalSearch = .T., ;
IntegralHeight = .F., ;
ItemBackColor = 255,255,255, ;
ItemForeColor = 0,0,0, ;
ItemTips = .F., ;
Left = (36), ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
MoverBars = .F., ;
MultiSelect = .F., ;
Name = "ListBox1", ;
NullDisplay = "", ;
NumberOfElements = 0, ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = bmps\sobrepostal.bmp, ;
RightToLeft = .F., ;
RowSource = "", ;
RowSourceType = 0, ;
SelectedItemBackColor = 51,153,255, ;
SelectedItemForeColor = 255,255,255, ;
Sorted = .F., ;
SpecialEffect = 1, ;
StatusBarText = "", ;
TabIndex = 11, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = (44), ;
Value = , ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = (224)
*< END OBJECT: BaseClass="listbox" />
ADD OBJECT 'Pageframe1' AS pageframe WITH ;
ErasePage = .T., ;
Height = 137, ;
Left = 28, ;
Name = "Pageframe1", ;
PageCount = 2, ;
TabIndex = 10, ;
Top = 252, ;
Width = 513, ;
Page1.Caption = "Page1", ;
Page1.Name = "Page1", ;
Page2.Caption = "Page2", ;
Page2.Name = "Page2"
*< END OBJECT: BaseClass="pageframe" />
ADD OBJECT 'Pageframe1.Page1.Cl_ListBox1' AS cl_listbox WITH ;
Anchor = 0, ;
AutoHideScrollbar = 0, ;
BorderColor = 255,255,0, ;
BoundColumn = 2, ;
BoundTo = .F., ;
ColorScheme = 2, ;
ColorSource = 4, ;
ColumnCount = 2, ;
ColumnLines = .T., ;
ColumnWidths = "150,150", ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 0,128,192, ;
DisabledForeColor = 128,0,255, ;
DisabledItemBackColor = 255,255,255, ;
DisabledItemForeColor = 109,109,109, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
FirstElement = 1, ;
FontBold = .F., ;
FontCharSet = 0, ;
FontCondense = .F., ;
FontExtend = .F., ;
FontItalic = .F., ;
FontName = "Arial", ;
FontOutline = .F., ;
FontShadow = .F., ;
FontSize = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
Height = 60, ;
HelpContextID = 0, ;
IncrementalSearch = .T., ;
IntegralHeight = .F., ;
ItemBackColor = 255,255,255, ;
ItemForeColor = 0,0,0, ;
ItemTips = .F., ;
Left = 279, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
MoverBars = .F., ;
MultiSelect = .F., ;
Name = "Cl_ListBox1", ;
NullDisplay = "", ;
NumberOfElements = 0, ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = bmps\sobrepostal.bmp, ;
RightToLeft = .F., ;
RowSource = "", ;
RowSourceType = 0, ;
SelectedItemBackColor = 51,153,255, ;
SelectedItemForeColor = 255,255,255, ;
Sorted = .F., ;
SpecialEffect = 1, ;
StatusBarText = "", ;
TabIndex = 6, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 8, ;
Value = , ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 224
*< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" />
ADD OBJECT 'Pageframe1.Page1.ListBox1' AS listbox WITH ;
Anchor = 0, ;
AutoHideScrollbar = 0, ;
BorderColor = 255,255,0, ;
BoundColumn = 2, ;
BoundTo = .F., ;
ColorScheme = 2, ;
ColorSource = 4, ;
ColumnCount = 2, ;
ColumnLines = .T., ;
ColumnWidths = "150,150", ;
Comment = "", ;
ControlSource = "", ;
DisabledBackColor = 0,128,192, ;
DisabledForeColor = 128,0,255, ;
DisabledItemBackColor = 255,255,255, ;
DisabledItemForeColor = 109,109,109, ;
DragIcon = ..\..\, ;
DragMode = 0, ;
Enabled = .T., ;
FirstElement = 1, ;
FontBold = .F., ;
FontCharSet = 0, ;
FontCondense = .F., ;
FontExtend = .F., ;
FontItalic = .F., ;
FontName = "Arial", ;
FontOutline = .F., ;
FontShadow = .F., ;
FontSize = 8, ;
FontStrikethru = .F., ;
FontUnderline = .F., ;
Height = 60, ;
HelpContextID = 0, ;
IncrementalSearch = .T., ;
IntegralHeight = .F., ;
ItemBackColor = 255,255,255, ;
ItemForeColor = 0,0,0, ;
ItemTips = .F., ;
Left = 7, ;
MouseIcon = ..\..\, ;
MousePointer = 0, ;
MoverBars = .F., ;
MultiSelect = .F., ;
Name = "ListBox1", ;
NullDisplay = "", ;
NumberOfElements = 0, ;
OLEDragMode = 0, ;
OLEDragPicture = ..\..\, ;
OLEDropEffects = 3, ;
OLEDropMode = 0, ;
Picture = bmps\sobrepostal.bmp, ;
RightToLeft = .F., ;
RowSource = "", ;
RowSourceType = 0, ;
SelectedItemBackColor = 51,153,255, ;
SelectedItemForeColor = 255,255,255, ;
Sorted = .F., ;
SpecialEffect = 1, ;
StatusBarText = "", ;
TabIndex = 11, ;
TabStop = .T., ;
Tag = "", ;
TerminateRead = .F., ;
Themes = .T., ;
ToolTipText = "", ;
Top = 8, ;
Value = , ;
Visible = .T., ;
WhatsThisHelpID = -1, ;
Width = 224
*< END OBJECT: BaseClass="listbox" />
PROCEDURE Cl_ListBox1.Init
this.AddListItem('Este es el valor.A1')
this.AddListItem('Este es el valor.A2', this.NewItemId, 2)
this.AddListItem('Este es el valor.B1')
this.AddListItem('Este es el valor.B2', this.NewItemId, 2)
this.AddListItem('Este es el valor.C1')
this.AddListItem('Este es el valor.C2', this.NewItemId, 2)
this.ListIndex = 2
ENDPROC
PROCEDURE Container1.Cl_ListBox1.Init
this.AddListItem('Este es el valor.A1')
this.AddListItem('Este es el valor.A2', this.NewItemId, 2)
this.AddListItem('Este es el valor.B1')
this.AddListItem('Este es el valor.B2', this.NewItemId, 2)
this.AddListItem('Este es el valor.C1')
this.AddListItem('Este es el valor.C2', this.NewItemId, 2)
this.ListIndex = 2
ENDPROC
PROCEDURE Container1.ListBox1.Init
this.AddListItem('Este es el valor.A1')
this.AddListItem('Este es el valor.A2', this.NewItemId, 2)
this.AddListItem('Este es el valor.B1')
this.AddListItem('Este es el valor.B2', this.NewItemId, 2)
this.AddListItem('Este es el valor.C1')
this.AddListItem('Este es el valor.C2', this.NewItemId, 2)
this.ListIndex = 2
ENDPROC
PROCEDURE ListBox1.Init
this.AddListItem('Este es el valor.A1')
this.AddListItem('Este es el valor.A2', this.NewItemId, 2)
this.AddListItem('Este es el valor.B1')
this.AddListItem('Este es el valor.B2', this.NewItemId, 2)
this.AddListItem('Este es el valor.C1')
this.AddListItem('Este es el valor.C2', this.NewItemId, 2)
this.ListIndex = 2
ENDPROC
PROCEDURE Pageframe1.Page1.Cl_ListBox1.Init
this.AddListItem('Este es el valor.A1')
this.AddListItem('Este es el valor.A2', this.NewItemId, 2)
this.AddListItem('Este es el valor.B1')
this.AddListItem('Este es el valor.B2', this.NewItemId, 2)
this.AddListItem('Este es el valor.C1')
this.AddListItem('Este es el valor.C2', this.NewItemId, 2)
this.ListIndex = 2
ENDPROC
PROCEDURE Pageframe1.Page1.ListBox1.Init
this.AddListItem('Este es el valor.A1')
this.AddListItem('Este es el valor.A2', this.NewItemId, 2)
this.AddListItem('Este es el valor.B1')
this.AddListItem('Este es el valor.B2', this.NewItemId, 2)
this.AddListItem('Este es el valor.C1')
this.AddListItem('Este es el valor.C2', this.NewItemId, 2)
this.ListIndex = 2
ENDPROC
ENDDEFINE

1438
TESTS/DATOS_READONLY/f_optiongroup.sc2 Normal file
View File

File diff suppressed because it is too large Load Diff

215
TESTS/DATOS_READONLY/f_optiongroup2.sc2 Normal file
View File

@@ -0,0 +1,215 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (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="f_optiongroup2.scx" /> (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 f_optiongroup1 AS f_optiongroup OF "lib_controles.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
DoCreate = .T.
Name = "F_optiongroup1"
Cl_optiongroup1.Name = "Cl_optiongroup1"
Cl_optiongroup1.Option1.Left = 8
Cl_optiongroup1.Option1.Name = "Option1"
Cl_optiongroup1.Option1.Top = 4
Cl_optiongroup1.Option2.Left = 8
Cl_optiongroup1.Option2.Name = "Option2"
Cl_optiongroup1.Option2.Top = 28
Cl_optiongroup1.Option3.Left = 8
Cl_optiongroup1.Option3.Name = "Option3"
Cl_optiongroup1.Option3.Top = 52
Cl_optiongroup2.Name = "Cl_optiongroup2"
Cl_optiongroup2.Option1.Left = 8
Cl_optiongroup2.Option1.Name = "Option1"
Cl_optiongroup2.Option1.Top = 4
Cl_optiongroup2.Option2.Left = 8
Cl_optiongroup2.Option2.Name = "Option2"
Cl_optiongroup2.Option2.Top = 28
Cl_optiongroup2.Option3.Left = 8
Cl_optiongroup2.Option3.Name = "Option3"
Cl_optiongroup2.Option3.Top = 52
Command2.Name = "Command2"
Edit1.Name = "Edit1"
Label1.Name = "Label1"
Label2.Name = "Label2"
Label3.Name = "Label3"
Optiongroup1.Anchor = 0
Optiongroup1.AutoSize = .F.
Optiongroup1.BackColor = 240,240,240
Optiongroup1.BackStyle = 0
Optiongroup1.BorderColor = 100,100,100
Optiongroup1.BorderStyle = 1
Optiongroup1.ButtonCount = 3
Optiongroup1.Cl_option1.Alignment = 0
Optiongroup1.Cl_option1.Anchor = 0
Optiongroup1.Cl_option1.AutoSize = .F.
Optiongroup1.Cl_option1.BackColor = 240,240,240
Optiongroup1.Cl_option1.BackStyle = 1
Optiongroup1.Cl_option1.Caption = "La opci<63>n 1"
Optiongroup1.Cl_option1.ColorScheme = 1
Optiongroup1.Cl_option1.ColorSource = 4
Optiongroup1.Cl_option1.Comment = ""
Optiongroup1.Cl_option1.ControlSource = ""
Optiongroup1.Cl_option1.DefHeight =
Optiongroup1.Cl_option1.DefLeft =
Optiongroup1.Cl_option1.DefTop =
Optiongroup1.Cl_option1.DefWidth =
Optiongroup1.Cl_option1.DisabledBackColor = 0,128,192
Optiongroup1.Cl_option1.DisabledForeColor = 128,0,255
Optiongroup1.Cl_option1.DisabledPicture = bmps\treeview.bmp
Optiongroup1.Cl_option1.DownPicture = ..\..\
Optiongroup1.Cl_option1.DragIcon = ..\..\
Optiongroup1.Cl_option1.DragMode = 0
Optiongroup1.Cl_option1.Enabled = .T.
Optiongroup1.Cl_option1.FontBold = .F.
Optiongroup1.Cl_option1.FontCondense = .F.
Optiongroup1.Cl_option1.FontExtend = .F.
Optiongroup1.Cl_option1.FontItalic = .F.
Optiongroup1.Cl_option1.FontName = "Arial"
Optiongroup1.Cl_option1.FontOutline = .F.
Optiongroup1.Cl_option1.FontShadow = .F.
Optiongroup1.Cl_option1.FontSize = 8
Optiongroup1.Cl_option1.FontStrikethru = .F.
Optiongroup1.Cl_option1.FontUnderline = .F.
Optiongroup1.Cl_option1.ForeColor = 0,0,0
Optiongroup1.Cl_option1.Height = (16)
Optiongroup1.Cl_option1.HelpContextID = 0
Optiongroup1.Cl_option1.Left = (16)
Optiongroup1.Cl_option1.MouseIcon = ..\..\
Optiongroup1.Cl_option1.MousePointer = 0
Optiongroup1.Cl_option1.Name = "Cl_option1"
Optiongroup1.Cl_option1.OLEDragMode = 0
Optiongroup1.Cl_option1.OLEDragPicture = ..\..\
Optiongroup1.Cl_option1.OLEDropEffects = 3
Optiongroup1.Cl_option1.OLEDropMode = 0
Optiongroup1.Cl_option1.Picture = bmps\sobrepostal.bmp
Optiongroup1.Cl_option1.PictureMargin = 0
Optiongroup1.Cl_option1.PicturePosition = 4
Optiongroup1.Cl_option1.PictureSpacing = 0
Optiongroup1.Cl_option1.RightToLeft = .F.
Optiongroup1.Cl_option1.SpecialEffect = 0
Optiongroup1.Cl_option1.StatusBarText = ""
Optiongroup1.Cl_option1.Style = 0
Optiongroup1.Cl_option1.TabIndex = 1
Optiongroup1.Cl_option1.TabStop = .T.
Optiongroup1.Cl_option1.Tag = ""
Optiongroup1.Cl_option1.TerminateRead = .F.
Optiongroup1.Cl_option1.test_aa = .F.
Optiongroup1.Cl_option1.Themes = .T.
Optiongroup1.Cl_option1.ToolTipText = ""
Optiongroup1.Cl_option1.Top = (4)
Optiongroup1.Cl_option1.Value = 0
Optiongroup1.Cl_option1.Visible = .T.
Optiongroup1.Cl_option1.WhatsThisHelpID = -1
Optiongroup1.Cl_option1.Width = (74)
Optiongroup1.Cl_option1.WordWrap = .F.
Optiongroup1.Cl_option2.Left = 16
Optiongroup1.Cl_option2.Name = "Cl_option2"
Optiongroup1.Cl_option2.Top = 28
Optiongroup1.Cl_option3.Left = 16
Optiongroup1.Cl_option3.Name = "Cl_option3"
Optiongroup1.Cl_option3.Top = 52
Optiongroup1.ColorSource = 4
Optiongroup1.Comment = ""
Optiongroup1.ControlSource = ""
Optiongroup1.DefHeight =
Optiongroup1.DefLeft =
Optiongroup1.DefTop =
Optiongroup1.DefWidth =
Optiongroup1.DragIcon = ..\..\
Optiongroup1.DragMode = 0
Optiongroup1.Enabled = .T.
Optiongroup1.Height = (76)
Optiongroup1.HelpContextID = 0
Optiongroup1.Left = (24)
Optiongroup1.MemberClassLibrary = lib_controles.vcx
Optiongroup1.MouseIcon = ..\..\
Optiongroup1.MousePointer = 0
Optiongroup1.Name = "Optiongroup1"
Optiongroup1.OLEDragMode = 0
Optiongroup1.OLEDragPicture = ..\..\
Optiongroup1.OLEDropEffects = 3
Optiongroup1.OLEDropMode = 0
Optiongroup1.SpecialEffect = 0
Optiongroup1.StatusBarText = ""
Optiongroup1.TabIndex = 1
Optiongroup1.Tag = ""
Optiongroup1.TerminateRead = .F.
Optiongroup1.Themes = .T.
Optiongroup1.ToolTipText = ""
Optiongroup1.Top = (24)
Optiongroup1.Value = 2
Optiongroup1.Visible = .T.
Optiongroup1.WhatsThisHelpID = -1
Optiongroup1.Width = (248)
Optiongroup2.Cl_option1.Left = 16
Optiongroup2.Cl_option1.Name = "Cl_option1"
Optiongroup2.Cl_option1.Top = 4
Optiongroup2.Cl_option2.Left = 16
Optiongroup2.Cl_option2.Name = "Cl_option2"
Optiongroup2.Cl_option2.Top = 28
Optiongroup2.Cl_option3.Left = 16
Optiongroup2.Cl_option3.Name = "Cl_option3"
Optiongroup2.Cl_option3.Top = 52
Optiongroup2.Name = "Optiongroup2"
Pageframe1.ErasePage = .T.
Pageframe1.Name = "Pageframe1"
Pageframe1.Page1.Cl_optiongroup1.Name = "Cl_optiongroup1"
Pageframe1.Page1.Cl_optiongroup1.Option1.Left = 8
Pageframe1.Page1.Cl_optiongroup1.Option1.Name = "Option1"
Pageframe1.Page1.Cl_optiongroup1.Option1.Top = 8
Pageframe1.Page1.Cl_optiongroup1.Option2.Left = 8
Pageframe1.Page1.Cl_optiongroup1.Option2.Name = "Option2"
Pageframe1.Page1.Cl_optiongroup1.Option2.Top = 32
Pageframe1.Page1.Cl_optiongroup1.Option3.Left = 8
Pageframe1.Page1.Cl_optiongroup1.Option3.Name = "Option3"
Pageframe1.Page1.Cl_optiongroup1.Option3.Top = 56
Pageframe1.Page1.Cl_optiongroup2.Name = "Cl_optiongroup2"
Pageframe1.Page1.Cl_optiongroup2.Option1.Left = 8
Pageframe1.Page1.Cl_optiongroup2.Option1.Name = "Option1"
Pageframe1.Page1.Cl_optiongroup2.Option1.Top = 4
Pageframe1.Page1.Cl_optiongroup2.Option2.Left = 8
Pageframe1.Page1.Cl_optiongroup2.Option2.Name = "Option2"
Pageframe1.Page1.Cl_optiongroup2.Option2.Top = 28
Pageframe1.Page1.Cl_optiongroup2.Option3.Left = 8
Pageframe1.Page1.Cl_optiongroup2.Option3.Name = "Option3"
Pageframe1.Page1.Cl_optiongroup2.Option3.Top = 52
Pageframe1.Page1.Label2.Name = "Label2"
Pageframe1.Page1.Name = "Page1"
Pageframe1.Page1.Optiongroup1.Cl_option1.Left = 16
Pageframe1.Page1.Optiongroup1.Cl_option1.Name = "Cl_option1"
Pageframe1.Page1.Optiongroup1.Cl_option1.Top = 4
Pageframe1.Page1.Optiongroup1.Cl_option2.Left = 16
Pageframe1.Page1.Optiongroup1.Cl_option2.Name = "Cl_option2"
Pageframe1.Page1.Optiongroup1.Cl_option2.Top = 28
Pageframe1.Page1.Optiongroup1.Cl_option3.Left = 16
Pageframe1.Page1.Optiongroup1.Cl_option3.Name = "Cl_option3"
Pageframe1.Page1.Optiongroup1.Cl_option3.Top = 52
Pageframe1.Page1.Optiongroup1.Name = "Optiongroup1"
Pageframe1.Page1.Optiongroup2.Cl_option1.Left = 16
Pageframe1.Page1.Optiongroup2.Cl_option1.Name = "Cl_option1"
Pageframe1.Page1.Optiongroup2.Cl_option1.Top = 4
Pageframe1.Page1.Optiongroup2.Cl_option2.Left = 16
Pageframe1.Page1.Optiongroup2.Cl_option2.Name = "Cl_option2"
Pageframe1.Page1.Optiongroup2.Cl_option2.Top = 28
Pageframe1.Page1.Optiongroup2.Cl_option3.Left = 16
Pageframe1.Page1.Optiongroup2.Cl_option3.Name = "Cl_option3"
Pageframe1.Page1.Optiongroup2.Cl_option3.Top = 52
Pageframe1.Page1.Optiongroup2.Name = "Optiongroup2"
Pageframe1.Page2.Name = "Page2"
ENDDEFINE

461
TESTS/DATOS_READONLY/f_test.sc2 Normal file
View File

@@ -0,0 +1,461 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (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="f_test.scx" /> (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.
Name = "Dataenvironment"
TabStop = .F.
Visible = .F.
ENDDEFINE
DEFINE CLASS f_form_controles1 AS f_form_controles OF "lib_controles.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
DoCreate = .T.
Name = "F_form_controles1"
Cl_image1.Height = 16
Cl_image1.Name = "Cl_image1"
Cl_image1.Width = 17
Cl_image10.Height = 16
Cl_image10.Name = "Cl_image10"
Cl_image10.Width = 17
Cl_image2.Name = "Cl_image2"
Cl_image3.Height = 16
Cl_image3.Name = "Cl_image3"
Cl_image3.Width = 17
Cl_image4.Name = "Cl_image4"
Cl_image5.Height = 16
Cl_image5.Name = "Cl_image5"
Cl_image5.Width = 17
Cl_image6.Height = 16
Cl_image6.Name = "Cl_image6"
Cl_image6.Width = 17
Cl_image7.Name = "Cl_image7"
Cl_image8.Height = 16
Cl_image8.Name = "Cl_image8"
Cl_image8.Width = 17
Cl_image9.Name = "Cl_image9"
Cl_label1.Name = "Cl_label1"
Cl_label2.Name = "Cl_label2"
Cl_line1.Name = "Cl_line1"
Cl_line2.Name = "Cl_line2"
Cl_pageframe1.ErasePage = .T.
Cl_pageframe1.Name = "Cl_pageframe1"
Cl_pageframe1.Page1.Name = "Page1"
Cl_pageframe1.Page2.Image1.Height = 16
Cl_pageframe1.Page2.Image1.Name = "Image1"
Cl_pageframe1.Page2.Image1.Width = 17
Cl_pageframe1.Page2.Image10.Height = 16
Cl_pageframe1.Page2.Image10.Name = "Image10"
Cl_pageframe1.Page2.Image10.Width = 17
Cl_pageframe1.Page2.Image2.Name = "Image2"
Cl_pageframe1.Page2.Image3.Height = 16
Cl_pageframe1.Page2.Image3.Name = "Image3"
Cl_pageframe1.Page2.Image3.Width = 17
Cl_pageframe1.Page2.Image4.Name = "Image4"
Cl_pageframe1.Page2.Image5.Height = 16
Cl_pageframe1.Page2.Image5.Name = "Image5"
Cl_pageframe1.Page2.Image5.Width = 17
Cl_pageframe1.Page2.Image6.Height = 16
Cl_pageframe1.Page2.Image6.Name = "Image6"
Cl_pageframe1.Page2.Image6.Width = 17
Cl_pageframe1.Page2.Image7.Name = "Image7"
Cl_pageframe1.Page2.Image8.Height = 16
Cl_pageframe1.Page2.Image8.Name = "Image8"
Cl_pageframe1.Page2.Image8.Width = 17
Cl_pageframe1.Page2.Image9.Name = "Image9"
Cl_pageframe1.Page2.Label4.Name = "Label4"
Cl_pageframe1.Page2.Label5.Name = "Label5"
Cl_pageframe1.Page2.Line1.Name = "Line1"
Cl_pageframe1.Page2.Line2.Name = "Line2"
Cl_pageframe1.Page2.Name = "Page2"
Cl_pageframe1.Page2.Shape1.Name = "Shape1"
Cl_pageframe1.Page2.Shape2.Name = "Shape2"
Cl_pageframe1.Page2.Spinner1.Name = "Spinner1"
Cl_pageframe1.Page2.Spinner2.Name = "Spinner2"
Cl_pageframe1.Page3.Name = "Page3"
Cl_shape1.Name = "Cl_shape1"
Cl_shape2.Name = "Cl_shape2"
Cl_spinner1.Name = "Cl_spinner1"
Cl_spinner2.Name = "Cl_spinner2"
Command2.Name = "Command2"
Edit1.Name = "Edit1"
Image1.Anchor = 0
Image1.BackStyle = 1
Image1.BorderColor = 100,100,100
Image1.BorderStyle = 0
Image1.ColorSource = 4
Image1.Comment = ""
Image1.DefHeight =
Image1.DefLeft =
Image1.DefTop =
Image1.DefWidth =
Image1.DragIcon = ..\..\
Image1.DragMode = 0
Image1.Enabled = .T.
Image1.Height = (16)
Image1.HelpContextID = 0
Image1.Left = (44)
Image1.MouseIcon = ..\..\
Image1.MousePointer = 0
Image1.Name = "Image1"
Image1.OLEDragMode = 0
Image1.OLEDragPicture = ..\..\
Image1.OLEDropEffects = 3
Image1.OLEDropMode = 0
Image1.Picture = bmps\sobrepostal.bmp
Image1.RotateFlip = 0
Image1.StatusBarText = ""
Image1.Stretch = 0
Image1.Tag = ""
Image1.Themes = .T.
Image1.ToolTipText = ""
Image1.Top = (100)
Image1.Visible = .T.
Image1.WhatsThisHelpID = -1
Image1.Width = (17)
Image10.Height = 16
Image10.Name = "Image10"
Image10.Width = 17
Image2.Name = "Image2"
Image3.Height = 16
Image3.Name = "Image3"
Image3.Width = 17
Image4.Name = "Image4"
Image5.Height = 16
Image5.Name = "Image5"
Image5.Width = 17
Image6.Height = 16
Image6.Name = "Image6"
Image6.Width = 17
Image7.Name = "Image7"
Image8.Height = 16
Image8.Name = "Image8"
Image8.Width = 17
Image9.Name = "Image9"
Label1.Name = "Label1"
Label2.Name = "Label2"
Label3.Name = "Label3"
Label4.Alignment = 0
Label4.Anchor = 0
Label4.AutoSize = .F.
Label4.BackColor = 240,240,240
Label4.BackStyle = 1
Label4.BorderStyle = 0
Label4.Caption = "Label4"
Label4.ColorScheme = 1
Label4.ColorSource = 4
Label4.Comment = ""
Label4.DefHeight =
Label4.DefLeft =
Label4.DefTop =
Label4.DefWidth =
Label4.DisabledBackColor = 240,240,240
Label4.DisabledForeColor = 109,109,109
Label4.DragIcon = ..\..\
Label4.DragMode = 0
Label4.Enabled = .T.
Label4.FontBold = .F.
Label4.FontCondense = .F.
Label4.FontExtend = .F.
Label4.FontItalic = .F.
Label4.FontName = "Arial"
Label4.FontOutline = .F.
Label4.FontShadow = .F.
Label4.FontSize = 8
Label4.FontStrikethru = .F.
Label4.FontUnderline = .F.
Label4.ForeColor = 0,0,0
Label4.Height = (17)
Label4.HelpContextID = 0
Label4.Left = (44)
Label4.MouseIcon = ..\..\
Label4.MousePointer = 0
Label4.Name = "Label4"
Label4.OLEDragMode = 0
Label4.OLEDragPicture = ..\..\
Label4.OLEDropEffects = 3
Label4.OLEDropMode = 0
Label4.RightToLeft = .F.
Label4.Rotation = 0
Label4.Style = 0
Label4.TabIndex = 6
Label4.Tag = ""
Label4.ToolTipText = ""
Label4.Top = (40)
Label4.WhatsThisHelpID = -1
Label4.Width = (104)
Label4.WordWrap = .F.
Label5.Name = "Label5"
Line1.Anchor = 0
Line1.BorderColor = 100,100,100
Line1.BorderStyle = 1
Line1.BorderWidth = 1
Line1.ColorSource = 4
Line1.Comment = ""
Line1.DefHeight =
Line1.DefLeft =
Line1.DefTop =
Line1.DefWidth =
Line1.DragIcon = ..\..\
Line1.DragMode = 0
Line1.DrawMode = 13
Line1.Enabled = .T.
Line1.Height = (8)
Line1.HelpContextID = 0
Line1.Left = (44)
Line1.LineSlant = "\"
Line1.MouseIcon = ..\..\
Line1.MousePointer = 0
Line1.Name = "Line1"
Line1.OLEDragMode = 0
Line1.OLEDragPicture = ..\..\
Line1.OLEDropEffects = 3
Line1.OLEDropMode = 0
Line1.PolyPoints = ""
Line1.Rotation = 0
Line1.StatusBarText = ""
Line1.Tag = ""
Line1.ToolTipText = ""
Line1.Top = (80)
Line1.Visible = .T.
Line1.WhatsThisHelpID = -1
Line1.Width = (104)
Line2.Name = "Line2"
Pageframe1.ActivePage = 2
Pageframe1.Anchor = 0
Pageframe1.cl_page1.BackColor = 240,240,240
Pageframe1.cl_page1.Caption = "Page1"
Pageframe1.cl_page1.ColorSource = 4
Pageframe1.cl_page1.Comment = ""
Pageframe1.cl_page1.DragIcon = ..\..\
Pageframe1.cl_page1.DragMode = 0
Pageframe1.cl_page1.Enabled = .T.
Pageframe1.cl_page1.FontBold = .F.
Pageframe1.cl_page1.FontCharSet = 0
Pageframe1.cl_page1.FontCondense = .F.
Pageframe1.cl_page1.FontExtend = .F.
Pageframe1.cl_page1.FontItalic = .F.
Pageframe1.cl_page1.FontName = "Arial"
Pageframe1.cl_page1.FontOutline = .F.
Pageframe1.cl_page1.FontShadow = .F.
Pageframe1.cl_page1.FontSize = 8
Pageframe1.cl_page1.FontStrikethru = .F.
Pageframe1.cl_page1.FontUnderline = .F.
Pageframe1.cl_page1.ForeColor = 0,0,0
Pageframe1.cl_page1.HelpContextID = 0
Pageframe1.cl_page1.MouseIcon = ..\..\
Pageframe1.cl_page1.MousePointer = 0
Pageframe1.cl_page1.Name = "cl_page1"
Pageframe1.cl_page1.OLEDragMode = 0
Pageframe1.cl_page1.OLEDragPicture = ..\..\
Pageframe1.cl_page1.OLEDropEffects = 3
Pageframe1.cl_page1.OLEDropMode = 0
Pageframe1.cl_page1.PageOrder = 1
Pageframe1.cl_page1.StatusBarText = ""
Pageframe1.cl_page1.Tag = ""
Pageframe1.cl_page1.ToolTipText = ""
Pageframe1.cl_page1.WhatsThisHelpID = -1
Pageframe1.cl_page2.Image1.Height = 16
Pageframe1.cl_page2.Image1.Name = "Image1"
Pageframe1.cl_page2.Image1.Width = 17
Pageframe1.cl_page2.Image10.Height = 16
Pageframe1.cl_page2.Image10.Name = "Image10"
Pageframe1.cl_page2.Image10.Width = 17
Pageframe1.cl_page2.Image2.Name = "Image2"
Pageframe1.cl_page2.Image3.Height = 16
Pageframe1.cl_page2.Image3.Name = "Image3"
Pageframe1.cl_page2.Image3.Width = 17
Pageframe1.cl_page2.Image4.Name = "Image4"
Pageframe1.cl_page2.Image5.Height = 16
Pageframe1.cl_page2.Image5.Name = "Image5"
Pageframe1.cl_page2.Image5.Width = 17
Pageframe1.cl_page2.Image6.Height = 16
Pageframe1.cl_page2.Image6.Name = "Image6"
Pageframe1.cl_page2.Image6.Width = 17
Pageframe1.cl_page2.Image7.Name = "Image7"
Pageframe1.cl_page2.Image8.Height = 16
Pageframe1.cl_page2.Image8.Name = "Image8"
Pageframe1.cl_page2.Image8.Width = 17
Pageframe1.cl_page2.Image9.Name = "Image9"
Pageframe1.cl_page2.Label4.Alignment = 0
Pageframe1.cl_page2.Label4.Anchor = 0
Pageframe1.cl_page2.Label4.AutoSize = .F.
Pageframe1.cl_page2.Label4.BackColor = 240,240,240
Pageframe1.cl_page2.Label4.BackStyle = 1
Pageframe1.cl_page2.Label4.BorderStyle = 0
Pageframe1.cl_page2.Label4.Caption = "Label4"
Pageframe1.cl_page2.Label4.ColorScheme = 1
Pageframe1.cl_page2.Label4.ColorSource = 4
Pageframe1.cl_page2.Label4.Comment = ""
Pageframe1.cl_page2.Label4.DisabledBackColor = 240,240,240
Pageframe1.cl_page2.Label4.DisabledForeColor = 109,109,109
Pageframe1.cl_page2.Label4.DragIcon = ..\..\
Pageframe1.cl_page2.Label4.DragMode = 0
Pageframe1.cl_page2.Label4.Enabled = .T.
Pageframe1.cl_page2.Label4.FontBold = .F.
Pageframe1.cl_page2.Label4.Name = "Label4"
Pageframe1.cl_page2.Label5.Name = "Label5"
Pageframe1.cl_page2.Line1.Name = "Line1"
Pageframe1.cl_page2.Line2.Name = "Line2"
Pageframe1.cl_page2.Name = "cl_page2"
Pageframe1.cl_page2.PageOrder = 2
Pageframe1.cl_page2.Shape1.Name = "Shape1"
Pageframe1.cl_page2.Shape2.Name = "Shape2"
Pageframe1.cl_page2.Spinner1.Name = "Spinner1"
Pageframe1.cl_page2.Spinner2.Name = "Spinner2"
Pageframe1.cl_page3.Name = "cl_page3"
Pageframe1.cl_page3.PageOrder = 3
Pageframe1.ColorSource = 4
Pageframe1.Comment = ""
Pageframe1.DefHeight =
Pageframe1.DefLeft =
Pageframe1.DefTop =
Pageframe1.DefWidth =
Pageframe1.DragIcon = ..\..\
Pageframe1.DragMode = 0
Pageframe1.Enabled = .T.
Pageframe1.ErasePage = .T.
Pageframe1.Height = (193)
Pageframe1.HelpContextID = 0
Pageframe1.Left = (20)
Pageframe1.MouseIcon = ..\..\
Pageframe1.MousePointer = 0
Pageframe1.Name = "Pageframe1"
Pageframe1.OLEDragMode = 0
Pageframe1.OLEDragPicture = ..\..\
Pageframe1.OLEDropEffects = 3
Pageframe1.OLEDropMode = 0
Pageframe1.RightToLeft = .F.
Pageframe1.StatusBarText = ""
Pageframe1.TabIndex = 7
Pageframe1.TabOrientation = 0
Pageframe1.Tabs = .T.
Pageframe1.TabStop = .T.
Pageframe1.TabStretch = 1
Pageframe1.TabStyle = 1
Pageframe1.Tag = ""
Pageframe1.Themes = .T.
Pageframe1.ToolTipText = ""
Pageframe1.Top = (200)
Pageframe1.Visible = .T.
Pageframe1.WhatsThisHelpID = -1
Pageframe1.Width = (256)
Shape1.Anchor = 0
Shape1.BackColor = 240,240,240
Shape1.BackStyle = 1
Shape1.BorderColor = 100,100,100
Shape1.BorderStyle = 1
Shape1.BorderWidth = 1
Shape1.ColorScheme = 1
Shape1.ColorSource = 4
Shape1.Comment = ""
Shape1.Curvature = 0
Shape1.DefHeight =
Shape1.DefLeft =
Shape1.DefTop =
Shape1.DefWidth =
Shape1.DragIcon = ..\..\
Shape1.DragMode = 0
Shape1.DrawMode = 13
Shape1.Enabled = .T.
Shape1.FillColor = 0,0,0
Shape1.FillStyle = 1
Shape1.Height = (17)
Shape1.HelpContextID = 0
Shape1.Left = (44)
Shape1.MouseIcon = ..\..\
Shape1.MousePointer = 0
Shape1.Name = "Shape1"
Shape1.OLEDragMode = 0
Shape1.OLEDragPicture = ..\..\
Shape1.OLEDropEffects = 3
Shape1.OLEDropMode = 0
Shape1.PolyPoints = ""
Shape1.Rotation = 0
Shape1.SpecialEffect = 0
Shape1.StatusBarText = ""
Shape1.Style = 0
Shape1.Tag = ""
Shape1.ToolTipText = ""
Shape1.Top = (60)
Shape1.Visible = .T.
Shape1.WhatsThisHelpID = -1
Shape1.Width = (105)
Shape2.Name = "Shape2"
Spinner1.Alignment = 1
Spinner1.Anchor = 0
Spinner1.BackColor = 255,255,255
Spinner1.BorderColor = 100,100,100
Spinner1.BorderStyle = 1
Spinner1.ColorScheme = 1
Spinner1.ColorSource = 4
Spinner1.Comment = ""
Spinner1.ControlSource = ""
Spinner1.DefHeight =
Spinner1.DefLeft =
Spinner1.DefTop =
Spinner1.DefWidth =
Spinner1.DisabledBackColor = 240,240,240
Spinner1.DisabledForeColor = 109,109,109
Spinner1.DragIcon = ..\..\
Spinner1.DragMode = 0
Spinner1.Enabled = .T.
Spinner1.FontBold = .F.
Spinner1.FontCondense = .F.
Spinner1.FontExtend = .F.
Spinner1.FontItalic = .F.
Spinner1.FontName = "Arial"
Spinner1.FontOutline = .F.
Spinner1.FontShadow = .F.
Spinner1.FontSize = 8
Spinner1.FontStrikethru = .F.
Spinner1.FontUnderline = .F.
Spinner1.ForeColor = 0,0,0
Spinner1.Format = ""
Spinner1.Height = (24)
Spinner1.HelpContextID = 0
Spinner1.HideSelection = .T.
Spinner1.Increment = 1.00
Spinner1.InputMask = ""
Spinner1.KeyboardHighValue = 2147483647
Spinner1.KeyboardLowValue = -2147483647
Spinner1.Left = (44)
Spinner1.Margin = 2
Spinner1.MouseIcon = ..\..\
Spinner1.MousePointer = 0
Spinner1.Name = "Spinner1"
Spinner1.NullDisplay = ""
Spinner1.OLEDragMode = 0
Spinner1.OLEDragPicture = ..\..\
Spinner1.OLEDropEffects = 3
Spinner1.OLEDropMode = 0
Spinner1.OLEDropTextInsertion = 0
Spinner1.ReadOnly = .F.
Spinner1.RightToLeft = .F.
Spinner1.SelectedBackColor = 51,153,255
Spinner1.SelectedForeColor = 255,255,255
Spinner1.SelectOnEntry = .F.
Spinner1.SpecialEffect = 0
Spinner1.StatusBarText = ""
Spinner1.TabIndex = 8
Spinner1.TabStop = .T.
Spinner1.Tag = ""
Spinner1.TerminateRead = .F.
Spinner1.Themes = .T.
Spinner1.ToolTipText = ""
Spinner1.Top = (160)
Spinner1.Value = 0
Spinner1.Visible = .T.
Spinner1.WhatsThisHelpID = -1
Spinner1.Width = (104)
Spinner2.Name = "Spinner2"
ENDDEFINE

1458
TESTS/DATOS_READONLY/f_textbox.sc2 Normal file
View File

File diff suppressed because it is too large Load Diff

13323
TESTS/DATOS_READONLY/lib_controles.vc2 Normal file
View File

File diff suppressed because it is too large Load Diff

112
TESTS/DATOS_READONLY/lib_controles2.vc2 Normal file
View File

@@ -0,0 +1,112 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (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="lib_controles2.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS f_optiongroup2 AS cl_optiongroup OF "lib_controles.vcx"
*< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" />
Anchor = 0
AutoSize = .F.
BackColor = 240,240,240
BackStyle = 1
BorderColor = 100,100,100
BorderStyle = 1
ButtonCount = 2
ColorSource = 4
Comment = ""
ControlSource = ""
DragIcon = ..\..\
DragMode = 0
Enabled = .T.
Height = 46
HelpContextID = 0
MemberClassLibrary = ..\..\
MouseIcon = ..\..\
MousePointer = 0
Name = "f_optiongroup2"
OLEDragMode = 0
OLEDragPicture = ..\..\
OLEDropEffects = 3
OLEDropMode = 0
SpecialEffect = 0
StatusBarText = ""
TabIndex = 1
Tag = ""
TerminateRead = .F.
test_aa = .F.
Themes = .T.
ToolTipText = ""
Value = 0
Visible = .T.
WhatsThisHelpID = -1
Width = 71
Option1.Alignment = 0
Option1.Anchor = 0
Option1.AutoSize = .T.
Option1.BackColor = 240,240,240
Option1.BackStyle = 1
Option1.Caption = "Opt1"
Option1.ColorScheme = 1
Option1.ColorSource = 4
Option1.Comment = ""
Option1.ControlSource = ""
Option1.DefHeight =
Option1.DefLeft =
Option1.DefTop =
Option1.DefWidth =
Option1.DisabledBackColor = 240,240,240
Option1.DisabledForeColor = 109,109,109
Option1.DisabledPicture = ..\..\
Option1.DownPicture = ..\..\
Option1.DragIcon = ..\..\
Option1.DragMode = 0
Option1.Enabled = .T.
Option1.FontBold = .F.
Option1.FontCondense = .F.
Option1.FontExtend = .F.
Option1.FontItalic = .F.
Option1.FontName = "Arial"
Option1.FontOutline = .F.
Option1.FontShadow = .F.
Option1.FontSize = 9
Option1.FontStrikethru = .F.
Option1.FontUnderline = .F.
Option1.ForeColor = 0,0,0
Option1.Height = (16)
Option1.HelpContextID = 0
Option1.Left = (5)
Option1.MouseIcon = ..\..\
Option1.MousePointer = 0
Option1.Name = "Option1"
Option1.OLEDragMode = 0
Option1.OLEDragPicture = ..\..\
Option1.OLEDropEffects = 3
Option1.OLEDropMode = 0
Option1.Picture = ..\..\
Option1.PictureMargin = 0
Option1.PicturePosition = 13
Option1.PictureSpacing = 0
Option1.RightToLeft = .F.
Option1.SpecialEffect = 0
Option1.StatusBarText = ""
Option1.Style = 0
Option1.TabIndex = 1
Option1.TabStop = .T.
Option1.Tag = ""
Option1.TerminateRead = .F.
Option1.Themes = .T.
Option1.ToolTipText = ""
Option1.Top = (5)
Option1.Value = 0
Option1.Visible = .T.
Option1.WhatsThisHelpID = -1
Option1.Width = (47)
Option1.WordWrap = .F.
Option2.Left = 5
Option2.Name = "Option2"
Option2.Top = 24
ENDDEFINE