Changeset: 257 v1.19.22
- Bug Fix scx/vcx: La prop.Picture de un form se pierde y no muestra la imagen (Fidel Charny) - Bug Fix scx/vcx: Algunas opciones del optiongroup pierden el width cuando se subclasan de una clase con autosize=.T. (Miguel Duran) - Bug Fix scx/vcx: La detección de PROCEDURE/ENDPROC/TEXT/ENDTEXT puede causar pérdida de algunos métodos en determinadas circunstancias (Andres Mendoza) - Agregado soporte de evaluación de propiedades desde archivo externo (props_*.txt) - Nuevos UT de comparación de bitmap de pantallas antes/después (se compara contra regenerado de regenerado) - Optimización en garbage collect en todo el código - Agregado UT de la configuración por archivo y por parámetros - Agregado UT para comprobar generación de clases, forms, reportes y menús - Agregado nuevo switch OptimizeByFilestamp (activo por defecto) que permite desactivar la optimización de regeneración de archivos según el timestamp, en el caso de querer regenarar siempre
This commit is contained in:
fdbozzo
@@ -2,7 +2,7 @@
|
||||
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
|
||||
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
|
||||
<DATABASE>
|
||||
|
||||
@@ -117,7 +117,7 @@
|
||||
</FIELDS>
|
||||
|
||||
|
||||
<indexFile>C:\DESA\FOXBIN2PRG\TESTS\DATOS_READONLY\FB2P_DBF.CDX</indexFile>
|
||||
<indexFile>FB2P_DBF.CDX</indexFile>
|
||||
|
||||
<INDEXES>
|
||||
<INDEX>
|
||||
|
||||
@@ -2,13 +2,13 @@
|
||||
* (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.18" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\fb2p_free.dbf" Generated="2014/01/08 00:49:45" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_free.dbf" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
|
||||
<TABLE>
|
||||
<MemoFile></MemoFile>
|
||||
<CodePage>1252</CodePage>
|
||||
<LastUpdate>2013/12/11</LastUpdate>
|
||||
<LastUpdate>2013/12/12</LastUpdate>
|
||||
<Database></Database>
|
||||
<FileType>0x00000032</FileType>
|
||||
<FileType_Descrip>Visual FoxPro, Varchar, Varbinary, or Blob-enabled</FileType_Descrip>
|
||||
@@ -377,7 +377,7 @@
|
||||
</FIELDS>
|
||||
|
||||
|
||||
<indexFile>C:\DESA\FOXBIN2PRG\TESTS\DATOS_READONLY\FB2P_FREE.CDX</indexFile>
|
||||
<indexFile>FB2P_FREE.CDX</indexFile>
|
||||
|
||||
<INDEXES>
|
||||
<INDEX>
|
||||
|
||||
33
TESTS/DATOS_READONLY/Menu_Comments_Procedure.mn2
Normal file
33
TESTS/DATOS_READONLY/Menu_Comments_Procedure.mn2
Normal file
@@ -0,0 +1,33 @@
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
* (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="menu_comments_procedure.mnx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
*<MenuType>1</MenuType>
|
||||
*<MenuLocation>REPLACE</MenuLocation>
|
||||
|
||||
*<MenuCode>
|
||||
DEFINE MENU _MSYSMENU BAR
|
||||
DEFINE PAD _40O0YW62F OF _MSYSMENU PROMPT "A first Entry" COLOR SCHEME 3
|
||||
|
||||
ON PAD _40O0YW62F OF _MSYSMENU ACTIVATE POPUP AfirstEntr
|
||||
|
||||
*----------------------------------
|
||||
DEFINE POPUP AfirstEntr MARGIN RELATIVE SHADOW COLOR SCHEME 4
|
||||
DEFINE BAR 1 OF AfirstEntr PROMPT "Item 1" ;
|
||||
KEY ALT+1, "ALT+1" && Do something depending on App version
|
||||
ON SELECTION BAR 1 OF AfirstEntr iif(oApp.Version()=="v1.0",oApp.Run(1), oApp.Run(2))
|
||||
|
||||
DEFINE BAR 2 OF AfirstEntr PROMPT "Hide Errors" && Setup some very effective error handling
|
||||
ON SELECTION BAR 2 OF AfirstEntr DO BAR_2_OF_AfirstEntr_FB2P
|
||||
|
||||
DEFINE PAD _40O0YW62G OF _MSYSMENU PROMPT "E\<dit" COLOR SCHEME 3 ;
|
||||
KEY ALT+D, "ALT+D" ;
|
||||
SKIP FOR oApp.Database() == "Production" && Don't show this option when rendering menu item on production
|
||||
|
||||
ON PAD _40O0YW62G OF _MSYSMENU ACTIVATE POPUP Edit
|
||||
|
||||
*----------------------------------
|
||||
DEFINE POPUP Edit MARGIN RELATIVE SHADOW COLOR SCHEME 4
|
||||
*</MenuCode>
|
||||
BIN
TESTS/DATOS_READONLY/Menu_Comments_Procedure.mnt
Normal file
BIN
TESTS/DATOS_READONLY/Menu_Comments_Procedure.mnt
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/Menu_Comments_Procedure.mnx
Normal file
BIN
TESTS/DATOS_READONLY/Menu_Comments_Procedure.mnx
Normal file
Binary file not shown.
38
TESTS/DATOS_READONLY/Menu_LineBreak.mn2
Normal file
38
TESTS/DATOS_READONLY/Menu_LineBreak.mn2
Normal file
@@ -0,0 +1,38 @@
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
* (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="menu_linebreak.mnx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
*<MenuType>1</MenuType>
|
||||
*<MenuLocation>REPLACE</MenuLocation>
|
||||
|
||||
*<MenuCode>
|
||||
DEFINE MENU _MSYSMENU BAR
|
||||
DEFINE PAD _40O0YW62F OF _MSYSMENU PROMPT "A first Entry" COLOR SCHEME 3
|
||||
|
||||
ON PAD _40O0YW62F OF _MSYSMENU ACTIVATE POPUP AfirstEntr
|
||||
|
||||
*----------------------------------
|
||||
DEFINE POPUP AfirstEntr MARGIN RELATIVE SHADOW COLOR SCHEME 4
|
||||
DEFINE BAR 1 OF AfirstEntr PROMPT "Item 1" ;
|
||||
KEY ALT+1, "ALT+1" && Do something depending on App version
|
||||
ON SELECTION BAR 1 OF AfirstEntr iif(oApp.Version()=="v1.0",oApp.Run(1), oApp.Run(2))
|
||||
|
||||
DEFINE BAR 2 OF AfirstEntr PROMPT "Hide Errors"
|
||||
ON SELECTION BAR 2 OF AfirstEntr DO BAR_2_OF_AfirstEntr_FB2P
|
||||
|
||||
DEFINE PAD _40O0YW62G OF _MSYSMENU PROMPT "E\<dit" COLOR SCHEME 3 ;
|
||||
KEY ALT+D, "ALT+D" ;
|
||||
SKIP FOR oApp.Database() == "Production" && Don't show this option when rendering menu item on production
|
||||
|
||||
ON PAD _40O0YW62G OF _MSYSMENU ACTIVATE POPUP Edit
|
||||
|
||||
*----------------------------------
|
||||
DEFINE POPUP Edit MARGIN RELATIVE SHADOW COLOR SCHEME 4
|
||||
DEFINE PAD _40O101BHZ OF _MSYSMENU PROMPT "Skip For" COLOR SCHEME 3 ;
|
||||
SKIP FOR iif(type("oMenu")=="O",oMenu.GetAccess(),.t.) && This comment line has<CR>a line break in it
|
||||
|
||||
ON SELECTION PAD _40O101BHZ OF _MSYSMENU messageb("Hello!")
|
||||
|
||||
*</MenuCode>
|
||||
BIN
TESTS/DATOS_READONLY/Menu_LineBreak.mnt
Normal file
BIN
TESTS/DATOS_READONLY/Menu_LineBreak.mnt
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/Menu_LineBreak.mnx
Normal file
BIN
TESTS/DATOS_READONLY/Menu_LineBreak.mnx
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/bmps/fondogris.bmp
Normal file
BIN
TESTS/DATOS_READONLY/bmps/fondogris.bmp
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 13 KiB |
2
TESTS/DATOS_READONLY/config/config.fpw
Normal file
2
TESTS/DATOS_READONLY/config/config.fpw
Normal file
@@ -0,0 +1,2 @@
|
||||
SCREEN=OFF
|
||||
RESOURCE=OFF
|
||||
119
TESTS/DATOS_READONLY/encuestas.db2
Normal file
119
TESTS/DATOS_READONLY/encuestas.db2
Normal 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
833
TESTS/DATOS_READONLY/f_checkbox.sc2
Normal 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
|
||||
BIN
TESTS/DATOS_READONLY/f_checkbox.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_checkbox.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_checkbox.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_checkbox.scx
Normal file
Binary file not shown.
1247
TESTS/DATOS_READONLY/f_combobox.sc2
Normal file
1247
TESTS/DATOS_READONLY/f_combobox.sc2
Normal file
File diff suppressed because it is too large
Load Diff
BIN
TESTS/DATOS_READONLY/f_combobox.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_combobox.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_combobox.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_combobox.scx
Normal file
Binary file not shown.
1409
TESTS/DATOS_READONLY/f_commandgroup.sc2
Normal file
1409
TESTS/DATOS_READONLY/f_commandgroup.sc2
Normal file
File diff suppressed because it is too large
Load Diff
BIN
TESTS/DATOS_READONLY/f_commandgroup.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_commandgroup.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_commandgroup.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_commandgroup.scx
Normal file
Binary file not shown.
338
TESTS/DATOS_READONLY/f_containers.sc2
Normal file
338
TESTS/DATOS_READONLY/f_containers.sc2
Normal 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
|
||||
BIN
TESTS/DATOS_READONLY/f_containers.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_containers.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_containers.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_containers.scx
Normal file
Binary file not shown.
2769
TESTS/DATOS_READONLY/f_form_aa.sc2
Normal file
2769
TESTS/DATOS_READONLY/f_form_aa.sc2
Normal file
File diff suppressed because it is too large
Load Diff
BIN
TESTS/DATOS_READONLY/f_form_aa.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_form_aa.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_form_aa.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_form_aa.scx
Normal file
Binary file not shown.
1355
TESTS/DATOS_READONLY/f_form_aa2.sc2
Normal file
1355
TESTS/DATOS_READONLY/f_form_aa2.sc2
Normal file
File diff suppressed because it is too large
Load Diff
BIN
TESTS/DATOS_READONLY/f_form_aa2.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_form_aa2.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_form_aa2.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_form_aa2.scx
Normal file
Binary file not shown.
3137
TESTS/DATOS_READONLY/f_form_controles.sc2
Normal file
3137
TESTS/DATOS_READONLY/f_form_controles.sc2
Normal file
File diff suppressed because it is too large
Load Diff
BIN
TESTS/DATOS_READONLY/f_form_controles.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_form_controles.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_form_controles.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_form_controles.scx
Normal file
Binary file not shown.
971
TESTS/DATOS_READONLY/f_formset.sc2
Normal file
971
TESTS/DATOS_READONLY/f_formset.sc2
Normal 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
|
||||
BIN
TESTS/DATOS_READONLY/f_formset.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_formset.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_formset.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_formset.scx
Normal file
Binary file not shown.
578
TESTS/DATOS_READONLY/f_listbox.sc2
Normal file
578
TESTS/DATOS_READONLY/f_listbox.sc2
Normal 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
|
||||
BIN
TESTS/DATOS_READONLY/f_listbox.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_listbox.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_listbox.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_listbox.scx
Normal file
Binary file not shown.
1438
TESTS/DATOS_READONLY/f_optiongroup.sc2
Normal file
1438
TESTS/DATOS_READONLY/f_optiongroup.sc2
Normal file
File diff suppressed because it is too large
Load Diff
BIN
TESTS/DATOS_READONLY/f_optiongroup.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_optiongroup.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_optiongroup.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_optiongroup.scx
Normal file
Binary file not shown.
215
TESTS/DATOS_READONLY/f_optiongroup2.sc2
Normal file
215
TESTS/DATOS_READONLY/f_optiongroup2.sc2
Normal 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
|
||||
BIN
TESTS/DATOS_READONLY/f_optiongroup2.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_optiongroup2.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_optiongroup2.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_optiongroup2.scx
Normal file
Binary file not shown.
461
TESTS/DATOS_READONLY/f_test.sc2
Normal file
461
TESTS/DATOS_READONLY/f_test.sc2
Normal 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
|
||||
BIN
TESTS/DATOS_READONLY/f_test.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_test.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_test.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_test.scx
Normal file
Binary file not shown.
1458
TESTS/DATOS_READONLY/f_textbox.sc2
Normal file
1458
TESTS/DATOS_READONLY/f_textbox.sc2
Normal file
File diff suppressed because it is too large
Load Diff
BIN
TESTS/DATOS_READONLY/f_textbox.sct
Normal file
BIN
TESTS/DATOS_READONLY/f_textbox.sct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/f_textbox.scx
Normal file
BIN
TESTS/DATOS_READONLY/f_textbox.scx
Normal file
Binary file not shown.
224
TESTS/DATOS_READONLY/fb2p_dbc.prg
Normal file
224
TESTS/DATOS_READONLY/fb2p_dbc.prg
Normal file
@@ -0,0 +1,224 @@
|
||||
* *********************************************************************
|
||||
* *
|
||||
* * 2013/12/09 FB2P_DBC.DBC 22:32:26
|
||||
* *
|
||||
* *********************************************************************
|
||||
* *
|
||||
* * Description:
|
||||
* * This program was automatically generated by GenDBCX Version 1.1,
|
||||
* * a modified version of Microsoft's utility GenDBC Version 2.26.67.
|
||||
* *
|
||||
* *********************************************************************
|
||||
|
||||
|
||||
LPARAMETERS tcMethod
|
||||
LOCAL oDBC
|
||||
oDBC = CreateObject('GenDBCX')
|
||||
IF TYPE('oDBC') != 'O'
|
||||
RETURN
|
||||
ENDIF
|
||||
cExactSet = SET('EXACT')
|
||||
SET EXACT ON
|
||||
IF EMPTY(tcMethod)
|
||||
=oDBC.GenerateAll()
|
||||
ELSE
|
||||
=EVALUATE('oDBC.' + tcMethod)
|
||||
ENDIF
|
||||
IF cExactSet = 'OFF'
|
||||
SET EXACT OFF
|
||||
ENDIF
|
||||
|
||||
|
||||
DEFINE CLASS GenDBCX AS Custom
|
||||
PROTECTED aTables[1]
|
||||
PROTECTED nTables
|
||||
|
||||
PROCEDURE CustomProcess
|
||||
*-- Your code goes here
|
||||
ENDPROC
|
||||
|
||||
PROCEDURE Init
|
||||
IF FILE('FB2P_DBC.DBC')
|
||||
OPEN DATABASE FB2P_DBC.DBC
|
||||
this.nTables = ADBOBJECTS(this.aTables, 'Table')
|
||||
ENDIF
|
||||
LOCAL ARRAY xx[1]
|
||||
IF ADIR(xx,'*.DBC') > 0 OR ADIR(xx,'*.DBF') > 0
|
||||
IF MessageBox('Warning! This program will overwrite your existing database and tables! Continue?', 308, 'GenDBCX Warning...') != 6
|
||||
RETURN .F.
|
||||
ENDIF
|
||||
ENDIF
|
||||
ENDPROC
|
||||
|
||||
PROCEDURE CreateDBC
|
||||
*-- Create the Database Container
|
||||
CLOSE DATA ALL
|
||||
CREATE DATABASE 'FB2P_DBC.DBC'
|
||||
|
||||
********* Procedure Re-Creation *********
|
||||
IF !FILE([FB2P_DBC.krt])
|
||||
? [Warning! No Procedure File Found!]
|
||||
ELSE
|
||||
CLOSE DATABASE
|
||||
USE 'FB2P_DBC.DBC'
|
||||
g_SetSafety = SET('SAFETY')
|
||||
SET SAFETY OFF
|
||||
LOCATE FOR Objectname = 'StoredProceduresSource'
|
||||
IF FOUND()
|
||||
APPEND MEMO Code FROM [FB2P_DBC.krt] OVERWRITE
|
||||
REPLACE Code WITH SUBSTR(Code, 70, 13140)
|
||||
ENDIF
|
||||
LOCATE FOR Objectname = 'StoredProceduresObject'
|
||||
IF FOUND()
|
||||
APPEND MEMO Code FROM [FB2P_DBC.krt] OVERWRITE
|
||||
REPLACE Code WITH SUBSTR(Code, 13210)
|
||||
ENDIF
|
||||
IF UPPER(g_SetSafety) = 'ON'
|
||||
SET SAFETY ON
|
||||
ENDIF
|
||||
USE
|
||||
OPEN DATABASE [FB2P_DBC.DBC]
|
||||
ENDIF
|
||||
|
||||
ENDPROC
|
||||
|
||||
|
||||
**************************************************
|
||||
** Table setup for NOMBRELARGODELDBF
|
||||
**************************************************
|
||||
PROCEDURE tbNOMBRELARGODELDBF
|
||||
LPARAMETERS tnPassNumber
|
||||
|
||||
DO CASE
|
||||
CASE tnPassNumber = 1
|
||||
=this.RemoveTable('NOMBRELARGODELDBF', 'C:\DESA\FOXBIN2PRG\TESTS\DATOS_READONLY\FB2P_DBF.DBF')
|
||||
|
||||
CREATE TABLE 'FB2P_DBF.DBF' NAME 'NOMBRELARGODELDBF' ( ;
|
||||
NOMBRE C(30) NOT NULL CHECK .NOT.EMPTY(nombre) ERROR "El nombre est<73> vac<61>o" DEFAULT ".", ;
|
||||
EDAD N(3, 0) NOT NULL, ;
|
||||
ID I NOT NULL, ;
|
||||
BIGTEXT M NOT NULL, ;
|
||||
DEPTO C(10) NOT NULL ;
|
||||
)
|
||||
***** Create each index for NOMBRELARGODELDBF *****
|
||||
SET COLLATE TO 'MACHINE'
|
||||
ALTER TABLE 'NOMBRELARGODELDBF' ADD PRIMARY KEY ID TAG ID
|
||||
SET COLLATE TO 'GENERAL'
|
||||
INDEX ON NOMBRE TAG I_NOMBRE
|
||||
SET COLLATE TO 'MACHINE'
|
||||
INDEX ON DEPTO TAG DEPTO
|
||||
|
||||
CASE tnPassNumber = 2
|
||||
***** Change properties for NOMBRELARGODELDBF *****
|
||||
DBSetProp('NOMBRELARGODELDBF.NOMBRE', 'Field', 'Caption', "'Nombre:'")
|
||||
DBSetProp('NOMBRELARGODELDBF.NOMBRE', 'Field', 'Comment', "Comentario de 'Nombre'")
|
||||
DBSetProp('NOMBRELARGODELDBF.NOMBRE', 'Field', 'InputMask', "!XXXXXXXXXXXXXXXXXXXXXXXXXXXXX")
|
||||
DBSetProp('NOMBRELARGODELDBF.NOMBRE', 'Field', 'Format', "A")
|
||||
DBSetProp('NOMBRELARGODELDBF', 'Table', 'Comment', "Comentario de la tabla 'fb2p_dbf'")
|
||||
CREATE TRIGGER ON 'NOMBRELARGODELDBF' FOR DELETE AS del_trg()
|
||||
CREATE TRIGGER ON 'NOMBRELARGODELDBF' FOR INSERT AS __ri_insert_nombrelargodeldbf().AND.(ins_trg())
|
||||
CREATE TRIGGER ON 'NOMBRELARGODELDBF' FOR UPDATE AS __ri_update_nombrelargodeldbf().AND.(upd_trg())
|
||||
ALTER TABLE 'NOMBRELARGODELDBF' SET CHECK edad>10 ERROR "Mensaje de error de la regla edad > 10"
|
||||
ENDCASE
|
||||
ENDPROC
|
||||
|
||||
|
||||
**************************************************
|
||||
** Table setup for FB2P_DEPTO
|
||||
**************************************************
|
||||
PROCEDURE tbFB2P_DEPTO
|
||||
LPARAMETERS tnPassNumber
|
||||
|
||||
DO CASE
|
||||
CASE tnPassNumber = 1
|
||||
=this.RemoveTable('FB2P_DEPTO', 'C:\DESA\FOXBIN2PRG\TESTS\DATOS_READONLY\FB2P_DEPTO.DBF')
|
||||
|
||||
CREATE TABLE 'FB2P_DEPTO.DBF' NAME 'FB2P_DEPTO' ( ;
|
||||
DEPTO C(10) NOT NULL, ;
|
||||
DESCRIP C(50) NOT NULL ;
|
||||
)
|
||||
***** Create each index for FB2P_DEPTO *****
|
||||
SET COLLATE TO 'MACHINE'
|
||||
ALTER TABLE 'FB2P_DEPTO' ADD PRIMARY KEY DEPTO TAG DEPTO
|
||||
|
||||
CASE tnPassNumber = 2
|
||||
***** Change properties for FB2P_DEPTO *****
|
||||
DBSetProp('FB2P_DEPTO', 'Table', 'Comment', "Comentario de 'fb2p_depto'")
|
||||
CREATE TRIGGER ON 'FB2P_DEPTO' FOR DELETE AS __ri_delete_fb2p_depto()
|
||||
ENDCASE
|
||||
ENDPROC
|
||||
|
||||
|
||||
***** Relations Setup *****
|
||||
PROCEDURE SetRelations
|
||||
ALTER TABLE 'NOMBRELARGODELDBF' ADD FOREIGN KEY TAG DEPTO REFERENCES FB2P_DEPTO TAG DEPTO
|
||||
ENDPROC
|
||||
|
||||
***** Referential Integrity Setup *****
|
||||
PROCEDURE SetRI
|
||||
CLOSE DATABASE
|
||||
USE 'FB2P_DBC.DBC'
|
||||
LOCATE FOR ObjectType = 'Table' AND UPPER(ALLTRIM(ObjectName)) == 'NOMBRELARGODELDBF'
|
||||
IF FOUND()
|
||||
nObjectID = ObjectID
|
||||
LOCATE FOR ObjectType = 'Relation' AND 'depto'$Property AND 'fb2p_depto'$Property AND 'depto'$Property AND ParentID = nObjectID
|
||||
IF FOUND()
|
||||
REPLACE RiInfo WITH 'ICR '
|
||||
ELSE
|
||||
? "Could not set RI Information, line " + ltrim(str(lineno()))
|
||||
ENDIF
|
||||
ENDIF
|
||||
USE
|
||||
ENDPROC
|
||||
|
||||
FUNCTION RemoveTable(tcTable, tcFile)
|
||||
LOCAL ARRAY laTables[1]
|
||||
=ADBOBJECTS(laTables,'Table')
|
||||
IF ASCAN(laTables,tcTable) = 0
|
||||
*-- No such table in the current dbc, nothing to do!
|
||||
RETURN .t.
|
||||
ENDIF
|
||||
IF !FILE(tcFile)
|
||||
*-- If the file has been erased, REMOVE TABLE fails with a 'File does not
|
||||
*-- exist' error, because it can't find the file to either remove its
|
||||
*-- database reference or delete the file .
|
||||
*-- We'll work around this problem by creating a phony file with the same
|
||||
*-- name, and use REMOVE TABLE DELETE to both remove the table reference
|
||||
*-- in the dbc, and erase the phony file.
|
||||
LOCAL lhFile
|
||||
lhFile = FCREATE(tcFile)
|
||||
IF lhFile = -1
|
||||
RETURN .f.
|
||||
ENDIF
|
||||
=FCLOSE(lhFile)
|
||||
ENDIF
|
||||
REMOVE TABLE (tcTable) DELETE
|
||||
=ADBOBJECTS(laTables,'Table')
|
||||
RETURN ASCAN(laTables,tcTable) = 0
|
||||
ENDFUNC
|
||||
|
||||
|
||||
PROCEDURE GenerateAll
|
||||
=this.CreateDBC()
|
||||
=this.CreateTables()
|
||||
|
||||
*-- Call custom method
|
||||
=this.CustomProcess()
|
||||
|
||||
=this.RulesTriggersProperties()
|
||||
=this.SetRelations()
|
||||
=this.SetRI()
|
||||
ENDPROC
|
||||
|
||||
PROCEDURE CreateTables
|
||||
*-- Create Tables
|
||||
=this.tbNOMBRELARGODELDBF(1)
|
||||
=this.tbFB2P_DEPTO(1)
|
||||
ENDPROC
|
||||
|
||||
PROCEDURE RulesTriggersProperties
|
||||
*-- Finish Tables (add rules/triggers/properties)
|
||||
=this.tbNOMBRELARGODELDBF(2)
|
||||
=this.tbFB2P_DEPTO(2)
|
||||
ENDPROC
|
||||
ENDDEFINE
|
||||
@@ -2,100 +2,118 @@
|
||||
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
|
||||
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\fb2p_foxuser.lbx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_foxuser.lbx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11C8XLX" timestamp="1133012625" objtype="1" objcode="53" name="" vpos="2.000" hpos="2750.000" height="1000.000" width="40000.000" order="" unique=".F." comment="" environ=".T." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Courier New" fontstyle="0" fontsize="10" mode="0" ruler="1" rulerlines="1" grid=".T." gridv="12" gridh="12" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".T." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".T." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr="" >
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="1" objcode="53" name="" vpos="2.000" hpos="2750.000" height="1000.000" width="40000.000" order="" unique=".F." environ=".T." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Courier New" fontstyle="0" fontsize="10" mode="0" ruler="1" rulerlines="1" grid=".T." gridv="12" gridh="12" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".T." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".T." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11C8XLY" timestamp="1133012625" objtype="9" objcode="1" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="1" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11C8XLZ" timestamp="1133012625" objtype="9" objcode="2" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="2" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11C8XM0" timestamp="1133012625" objtype="9" objcode="4" name="" vpos="0.000" hpos="0.000" height="10000.000" width="0.000" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="4" name="" vpos="0.000" hpos="0.000" height="10000.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11C8XM1" timestamp="1133012625" objtype="9" objcode="6" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="6" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11C8XM2" timestamp="1133012625" objtype="9" objcode="7" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="7" name="" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11CBDHY" timestamp="0" objtype="23" objcode="0" name="" vpos="14.000" hpos="5.000" height="11.000" width="30.000" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial" fontstyle="0" fontsize="8" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="14.000" hpos="5.000" height="11.000" width="30.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Arial" fontstyle="0" fontsize="8" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[3]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11CBDHX" timestamp="0" objtype="23" objcode="0" name="" vpos="16.000" hpos="8.000" height="12.000" width="9.000" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Courier New" fontstyle="0" fontsize="10" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="16.000" hpos="8.000" height="12.000" width="9.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Courier New" fontstyle="0" fontsize="10" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[4]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11C8XM3" timestamp="1133012625" objtype="8" objcode="0" name="" vpos="8333.333" hpos="2604.168" height="1666.667" width="34791.665" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar="C" pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="0" penpat="0" fillpat="0" fontface="Arial" fontstyle="0" fontsize="8" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="2" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="8" objcode="0" name="" vpos="8333.333" hpos="2604.168" height="1666.667" width="34791.665" order="" unique=".F." environ=".F." boxchar=" " fillchar="C" pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="0" penpat="0" fillpat="0" fontface="Arial" fontstyle="0" fontsize="8" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="2" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="1" resoid="0" curpos=".F." supalways=".T." supovflow=".F." suprpcol="3" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[-1]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[ALLT(Type)+ALLT(Id)+IIF(Readonly,'Y','N')+LTRIM(STR(Ckval,6,0))+DTOC(Updated)]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11CBDHZ" timestamp="0" objtype="25" objcode="0" name="dataenvironment" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="25" objcode="0" name="dataenvironment" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[
|
||||
]]>
|
||||
@@ -104,10 +122,12 @@
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[Name = "Dataenvironment"
|
||||
]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="_3Y11CBDI0" timestamp="0" objtype="26" objcode="0" name="cursor" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." comment="" environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F." supexpr=""
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="26" objcode="0" name="cursor" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
@@ -118,5 +138,7 @@ Alias = "foxuser_fdbozzo"
|
||||
CursorSource = foxuser_fdbozzo.dbf
|
||||
Name = "cursor1"
|
||||
]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
@@ -2,12 +2,42 @@
|
||||
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
|
||||
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\fb2p_frm_1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_frm_1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
*< OLE: Nombre="Cl_form1.Cl_olecontrol1" Parent="Cl_form1" ObjName="Cl_olecontrol1" OLEObject="C:\Windows\system32\richtx32.ocx" Checksum="617849590" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFBjW5n1Hc8BAwAAAIACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAOAAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAAIAAAABwAAAP7///8JAAAA/v////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP////8AAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACACwAAAEFwcGVhcmFuY2UACQAAAEkKAAAAAAAAAAwAAABCb3JkZXJTdHlsZQAJAAAASQoAAAABAAAADQAAAAAAAAUAAIAAAAAAAAABAAAAAAABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dABCdWxsZXRJbmRlbnQAEQAAAE4NAAAABwAAAAAAAAAAAAAAEAAAAERpc2FibGVOb1Njcm9sbAAFAAAATAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAABSaWdodE1hcmdpbgARAAAATg0AAAAHAAAAAAAAAAAAAAAFAAAAVGV4dAAUAAAASAAAAAALAAAAT2xlY29udHJvbDENAAAAQXV0b1ZlcmJNZW51AAUAAABMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA" />
|
||||
|
||||
*
|
||||
DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="2014/01/30 20:58:05" Scale="" Uniqueid="_3XW0B1R2O" />
|
||||
#INCLUDE "..\..\include\principal.h"
|
||||
|
||||
DEFINE CLASS cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
|
||||
|
||||
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
||||
*< OBJECTDATA: ObjPath="Shape1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="txtPromotor" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="lblPromotor" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="txtIdenc" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="lblIdenc" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="txtCalific" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="lblCalific" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="txtFecha" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="lblFecha" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="txtResultado" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="lblResultado" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column1.Header1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column1.Text1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column2.Header1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column2.Text1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column3.Header1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column3.Text1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column4.Header1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column4.Text1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column5.Header1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="grdEncuestas.Column5.Text1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Cl_olecontrol1" UniqueID="" Timestamp="" />
|
||||
|
||||
AllowOutput = .T.
|
||||
AlwaysOnBottom = .F.
|
||||
AlwaysOnTop = .F.
|
||||
@@ -66,12 +96,12 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
MouseIcon = ..\..\
|
||||
MousePointer = 0
|
||||
Movable = .T.
|
||||
Name = "Cl_form1"
|
||||
Name = "cl_form1"
|
||||
OLEDragMode = 0
|
||||
OLEDragPicture = ..\..\
|
||||
OLEDropEffects = 3
|
||||
OLEDropMode = 0
|
||||
Picture = ..\..\
|
||||
Picture = bmps\fondogris.bmp
|
||||
RightToLeft = .F.
|
||||
ScaleMode = 3
|
||||
ScrollBars = 0
|
||||
@@ -133,7 +163,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Name = "Cl_olecontrol1", ;
|
||||
Top = 256, ;
|
||||
Width = 131
|
||||
*< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="olecontrol" UniqueID="_3XW0BXGCR" Timestamp="2013/12/03 20:18:24" ZOrder="2900" OLEObject="C:\Windows\system32\richtx32.ocx" CheckSum="617849590" />
|
||||
*< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="olecontrol" Nombre="cl_form1.Cl_olecontrol1" Parent="cl_form1" ObjName="Cl_olecontrol1" OLEObject="C:\Windows\system32\richtx32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADDFeaPwcc8BAwAAAIACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAOAAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAAIAAAABwAAAP7///8JAAAA/v////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP////8AAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACACwAAAEFwcGVhcmFuY2UACQAAAEkKAAAAAAAAAAwAAABCb3JkZXJTdHlsZQAJAAAASQoAAAABAAAADQAAAAAAAAUAAIAAAAAAAAABAAAAAAABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dABCdWxsZXRJbmRlbnQAEQAAAE4NAAAABwAAAAAAAAAAAAAAEAAAAERpc2FibGVOb1Njcm9sbAAFAAAATAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAABSaWdodE1hcmdpbgARAAAATg0AAAAHAAAAAAAAAAAAAAAFAAAAVGV4dAAUAAAASAAAAAALAAAAT2xlY29udHJvbDENAAAAQXV0b1ZlcmJNZW51AAUAAABMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA" />
|
||||
|
||||
ADD OBJECT 'Commandgroup1' AS commandgroup WITH ;
|
||||
BackColor = 255,128,255, ;
|
||||
@@ -161,7 +191,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Command2.RightToLeft = .F., ;
|
||||
Command2.Top = 8, ;
|
||||
Command2.Width = 96
|
||||
*< END OBJECT: BaseClass="commandgroup" UniqueID="_3XW0BCM76" Timestamp="2013/12/03 20:18:24" ZOrder="2700" />
|
||||
*< END OBJECT: BaseClass="commandgroup" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas' AS grid WITH ;
|
||||
ColumnCount = 5, ;
|
||||
@@ -197,12 +227,12 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Column5.Name = "Column5", ;
|
||||
Column5.ReadOnly = .T., ;
|
||||
Column5.Width = 58
|
||||
*< END OBJECT: BaseClass="grid" UniqueID="_3XW0B58PA" Timestamp="2013/12/15 18:50:25" ZOrder="1600" />
|
||||
*< END OBJECT: BaseClass="grid" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column1.Header1' AS header WITH ;
|
||||
Caption = "promotor", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PB" Timestamp="2013/12/03 19:56:18" ZOrder="1700" />
|
||||
*< END OBJECT: BaseClass="header" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column1.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
@@ -212,12 +242,12 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PC" Timestamp="2013/12/15 18:50:25" ZOrder="1800" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column2.Header1' AS header WITH ;
|
||||
Caption = "idenc", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PD" Timestamp="2013/12/03 19:56:18" ZOrder="1900" />
|
||||
*< END OBJECT: BaseClass="header" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column2.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
@@ -227,12 +257,12 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PE" Timestamp="2013/12/15 18:50:25" ZOrder="2000" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column3.Header1' AS header WITH ;
|
||||
Caption = "calific", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PF" Timestamp="2013/12/03 19:56:18" ZOrder="2100" />
|
||||
*< END OBJECT: BaseClass="header" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column3.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
@@ -242,12 +272,12 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PG" Timestamp="2013/12/15 18:50:25" ZOrder="2200" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column4.Header1' AS header WITH ;
|
||||
Caption = "fecha", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PH" Timestamp="2013/12/03 19:56:18" ZOrder="2300" />
|
||||
*< END OBJECT: BaseClass="header" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column4.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
@@ -257,12 +287,12 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PI" Timestamp="2013/12/15 18:50:25" ZOrder="2400" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column5.Header1' AS header WITH ;
|
||||
Caption = "resultado", ;
|
||||
Name = "Header1"
|
||||
*< END OBJECT: BaseClass="header" UniqueID="_3XW0B58PJ" Timestamp="2013/12/03 19:56:18" ZOrder="2500" />
|
||||
*< END OBJECT: BaseClass="header" />
|
||||
|
||||
ADD OBJECT 'grdEncuestas.Column5.Text1' AS textbox WITH ;
|
||||
BackColor = 255,255,255, ;
|
||||
@@ -272,7 +302,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Name = "Text1", ;
|
||||
ReadOnly = .T., ;
|
||||
RightToLeft = .F.
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58PK" Timestamp="2013/12/15 18:50:25" ZOrder="2600" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
ADD OBJECT 'lblCalific' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
@@ -286,7 +316,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Width = 34, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 10
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P5" Timestamp="2013/12/15 18:50:25" ZOrder="1100" />
|
||||
*< END OBJECT: BaseClass="label" />
|
||||
|
||||
ADD OBJECT 'lblFecha' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
@@ -300,7 +330,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Width = 34, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 12
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P7" Timestamp="2013/12/15 18:50:25" ZOrder="1300" />
|
||||
*< END OBJECT: BaseClass="label" />
|
||||
|
||||
ADD OBJECT 'lblIdenc' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
@@ -314,7 +344,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Width = 30, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 8
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P3" Timestamp="2013/12/15 18:50:25" ZOrder="900" />
|
||||
*< END OBJECT: BaseClass="label" />
|
||||
|
||||
ADD OBJECT 'lblPromotor' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
@@ -328,7 +358,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Width = 51, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 6
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P1" Timestamp="2013/12/15 18:50:25" ZOrder="700" />
|
||||
*< END OBJECT: BaseClass="label" />
|
||||
|
||||
ADD OBJECT 'lblResultado' AS label WITH ;
|
||||
AutoSize = .T., ;
|
||||
@@ -342,7 +372,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Width = 57, ;
|
||||
WordWrap = .T., ;
|
||||
ZOrderSet = 14
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XW0B58P9" Timestamp="2013/12/15 18:50:25" ZOrder="1500" />
|
||||
*< END OBJECT: BaseClass="label" />
|
||||
|
||||
ADD OBJECT 'Optiongroup1' AS optiongroup WITH ;
|
||||
BackColor = 0,128,255, ;
|
||||
@@ -374,7 +404,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Option2.Top = 12, ;
|
||||
Option2.Value = 1, ;
|
||||
Option2.Width = 88
|
||||
*< END OBJECT: BaseClass="optiongroup" UniqueID="_3XW0BCM77" Timestamp="2013/12/03 20:18:24" ZOrder="2800" />
|
||||
*< END OBJECT: BaseClass="optiongroup" />
|
||||
|
||||
ADD OBJECT 'Shape1' AS shape WITH ;
|
||||
BorderStyle = 2, ;
|
||||
@@ -387,7 +417,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Top = 284, ;
|
||||
Width = 101, ;
|
||||
ZOrderSet = 0
|
||||
*< END OBJECT: BaseClass="shape" UniqueID="_3XW0BQM70" Timestamp="2013/12/03 20:18:24" ZOrder="500" />
|
||||
*< END OBJECT: BaseClass="shape" />
|
||||
|
||||
ADD OBJECT 'txtCalific' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
@@ -404,7 +434,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Top = 164, ;
|
||||
Width = 38, ;
|
||||
ZOrderSet = 9
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P4" Timestamp="2013/12/15 18:50:25" ZOrder="1000" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
ADD OBJECT 'txtFecha' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
@@ -420,7 +450,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Top = 192, ;
|
||||
Width = 73, ;
|
||||
ZOrderSet = 11
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P6" Timestamp="2013/12/15 18:50:25" ZOrder="1200" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
ADD OBJECT 'txtIdenc' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
@@ -437,7 +467,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Top = 192, ;
|
||||
Width = 149, ;
|
||||
ZOrderSet = 7
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P2" Timestamp="2013/12/15 18:50:25" ZOrder="800" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
ADD OBJECT 'txtPromotor' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
@@ -454,7 +484,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Top = 164, ;
|
||||
Width = 149, ;
|
||||
ZOrderSet = 5
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P0" Timestamp="2013/12/15 18:50:25" ZOrder="600" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
ADD OBJECT 'txtResultado' AS textbox WITH ;
|
||||
Comment = "", ;
|
||||
@@ -471,7 +501,7 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
Top = 220, ;
|
||||
Width = 81, ;
|
||||
ZOrderSet = 13
|
||||
*< END OBJECT: BaseClass="textbox" UniqueID="_3XW0B58P8" Timestamp="2013/12/15 18:50:25" ZOrder="1400" />
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
PROCEDURE grdEncuestas.AfterRowColChange
|
||||
LPARAMETERS nColIndex
|
||||
@@ -482,8 +512,12 @@ DEFINE CLASS Cl_form1 AS cl_form OF "fb2p_test.vcx"
|
||||
|
||||
ENDDEFINE
|
||||
|
||||
DEFINE CLASS Dataenvironment AS dataenvironment
|
||||
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="2014/01/30 20:58:05" Scale="" Uniqueid="_3XW0B1R2N" ClassIcon="1" />
|
||||
DEFINE CLASS dataenvironment AS dataenvironment
|
||||
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" />
|
||||
|
||||
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
||||
*< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" />
|
||||
|
||||
AutoCloseTables = .T.
|
||||
AutoOpenTables = .T.
|
||||
Comment = ""
|
||||
@@ -515,7 +549,7 @@ DEFINE CLASS Dataenvironment AS dataenvironment
|
||||
Tag = "", ;
|
||||
Top = 20, ;
|
||||
Width = 102
|
||||
*< END OBJECT: BaseClass="cursor" UniqueID="_3XW0B58OZ" Timestamp="2014/01/30 20:58:05" ZOrder="300" />
|
||||
*< END OBJECT: BaseClass="cursor" />
|
||||
|
||||
PROCEDURE BeforeOpenTables
|
||||
*-- Comentario en m<>todo [Dataenvironment.BeforeOpenTables]
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@@ -2,11 +2,12 @@
|
||||
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
|
||||
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\FB2P_FRM_2.SCX" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_frm_2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
*
|
||||
DEFINE CLASS Dataenvironment AS dataenvironment
|
||||
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="2013/12/03 19:54:07" Scale="" Uniqueid="_3XW0B26O0" ClassIcon="1" />
|
||||
DEFINE CLASS dataenvironment AS dataenvironment
|
||||
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" />
|
||||
|
||||
DataSource = .NULL.
|
||||
Height = 0
|
||||
Left = 0
|
||||
@@ -16,13 +17,20 @@ DEFINE CLASS Dataenvironment AS dataenvironment
|
||||
|
||||
ENDDEFINE
|
||||
|
||||
DEFINE CLASS Form1 AS form
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="2014/02/03 19:55:29" Scale="" Uniqueid="_3XW0B26O1" />
|
||||
DEFINE CLASS form1 AS form
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
|
||||
|
||||
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
||||
*< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" />
|
||||
|
||||
*<DefinedPropArrayMethod>
|
||||
*p: a_otra
|
||||
*a: ^a_prop[1,0] && array
|
||||
*a: a_prop[1,0] && array
|
||||
*p: _prop
|
||||
*</DefinedPropArrayMethod>
|
||||
|
||||
AllowOutput = .T.
|
||||
AlwaysOnBottom = .F.
|
||||
AlwaysOnTop = .F.
|
||||
@@ -65,7 +73,7 @@ DEFINE CLASS Form1 AS form
|
||||
HScrollSmallChange = 10
|
||||
Icon = ..\..\
|
||||
KeyPreview = .F.
|
||||
Left = 0
|
||||
Left = 2
|
||||
LockScreen = .F.
|
||||
MacDesktop = 0
|
||||
MaxButton = .T.
|
||||
@@ -96,7 +104,7 @@ DEFINE CLASS Form1 AS form
|
||||
Tag = ""
|
||||
Themes = .T.
|
||||
TitleBar = 1
|
||||
Top = 0
|
||||
Top = 1
|
||||
Visible = .T.
|
||||
VScrollSmallChange = 10
|
||||
WhatsThisButton = .F.
|
||||
@@ -177,7 +185,7 @@ DEFINE CLASS Form1 AS form
|
||||
Command3.Name = "Command3", ;
|
||||
Command3.Top = 63, ;
|
||||
Command3.Width = 84
|
||||
*< END OBJECT: BaseClass="commandgroup" UniqueID="_3Y813WLQU" Timestamp="2014/02/03 19:55:29" ZOrder="400" />
|
||||
*< END OBJECT: BaseClass="commandgroup" />
|
||||
|
||||
ADD OBJECT 'Optiongroup1' AS optiongroup WITH ;
|
||||
ButtonCount = 3, ;
|
||||
@@ -207,7 +215,7 @@ DEFINE CLASS Form1 AS form
|
||||
Option3.Name = "Option3", ;
|
||||
Option3.Top = 43, ;
|
||||
Option3.Width = 61
|
||||
*< END OBJECT: BaseClass="optiongroup" UniqueID="_3ZO00KYM8" Timestamp="2014/02/03 19:55:29" ZOrder="600" />
|
||||
*< END OBJECT: BaseClass="optiongroup" />
|
||||
|
||||
ADD OBJECT 'Pageframe1' AS pageframe WITH ;
|
||||
ActivePage = 2, ;
|
||||
@@ -224,6 +232,6 @@ DEFINE CLASS Form1 AS form
|
||||
Page2.Name = "Page2", ;
|
||||
Page3.Caption = "Page3", ;
|
||||
Page3.Name = "Page3"
|
||||
*< END OBJECT: BaseClass="pageframe" UniqueID="_3ZO00KYM7" Timestamp="2014/02/03 19:55:29" ZOrder="500" />
|
||||
*< END OBJECT: BaseClass="pageframe" />
|
||||
|
||||
ENDDEFINE
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@@ -2,7 +2,7 @@
|
||||
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
|
||||
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\fb2p_test.pjx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.pjx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
LPARAMETERS tcDir
|
||||
|
||||
@@ -81,20 +81,52 @@ MODIFY PROJECT 'fb2p_test.pjx' NOWAIT NOSHOW NOPROJECTHOOK
|
||||
loProject = _VFP.Projects('fb2p_test.pjx')
|
||||
|
||||
WITH loProject.FILES
|
||||
.ADD('bmps\carpetaabierta.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="1132700438" ObjRev="0" />
|
||||
.ADD('bmps\carpetacerrada.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="1132700438" ObjRev="0" />
|
||||
.ADD('bmps\scccheckout.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="1132700438" ObjRev="0" />
|
||||
.ADD('bmps\sobrepostal.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="1132700438" ObjRev="0" />
|
||||
.ADD('bmps\treeview.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="1132700438" ObjRev="0" />
|
||||
.ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="1132700450" ObjRev="0" />
|
||||
.ADD('fb2p_frm_1.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="1132700357" ObjRev="0" />
|
||||
.ADD('fb2p_frm_2.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="1132700358" ObjRev="0" />
|
||||
.ADD('fb2p_test.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="1132700355" ObjRev="0" />
|
||||
.ADD('..\ft__foxbin2prg__c_conversor_prg_a_dbc.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ft__foxbin2prg__c_conversor_prg_a_dbf.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ft__foxbin2prg__c_conversor_prg_a_mnx.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\fxu_lib_objetos_y_funciones_de_soporte.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_base__dobackup.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_base__get_separatedpropandvalue.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_base__gettimestamp.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_base__identificarbloquesdecodigo.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_base__identificarbloquesdeexclusion.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_base__normalizarvalorpropiedad.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_base__rowtimestamp.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_bin_a_prg__get_propsandvaluesfrom_properties.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_bin_a_prg__indentarmemo.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_prg_a_bin__analizarasignacion_tag_indicado.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_conversor_prg_a_bin__insert_allobjects.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('..\ut__foxbin2prg__c_foxbin2prg__evaluarconfiguracion.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('bmps\carpetaabierta.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('bmps\carpetacerrada.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('bmps\scccheckout.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('bmps\sobrepostal.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('bmps\treeview.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_checkbox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_combobox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_commandgroup.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_containers.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_form_aa.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_form_aa2.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_form_controles.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_formset.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_listbox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_optiongroup.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('f_textbox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('fb2p_frm_1.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('fb2p_frm_2.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('fb2p_test.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('lib_controles.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('lib_controles2.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
*</BuildProj>
|
||||
|
||||
.ITEM('__newproject.f2b').Remove()
|
||||
|
||||
*<FileComments>
|
||||
.ITEM(lcCurdir + 'f_form_aa.scx').Description = 'Form con todos los controles'
|
||||
.ITEM(lcCurdir + 'f_form_aa2.scx').Description = 'Instancia del form con todos los controles'
|
||||
.ITEM(lcCurdir + 'fb2p_test.vcx').Description = 'clase descrip'
|
||||
*</FileComments>
|
||||
|
||||
@@ -109,7 +141,7 @@ ENDWITH
|
||||
|
||||
WITH loProject
|
||||
*<ProjectProperties>
|
||||
.SetMain(lcCurdir + 'fb2p_test.vcx')
|
||||
.SetMain(lcCurdir + '..\fxu_lib_objetos_y_funciones_de_soporte.prg')
|
||||
.Icon = lcCurdir + 'bmps\container.ico'
|
||||
.Debug = .T.
|
||||
.Encrypted = .T.
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@@ -5,10 +5,13 @@
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
|
||||
*
|
||||
*< LIBCOMMENT: Comentario principal de "fb2p_test.vcx" />
|
||||
*
|
||||
DEFINE CLASS cl_commandgroup AS commandgroup && Descripci<63>n de cl_CommandGroup
|
||||
*< CLASSDATA: Baseclass="commandgroup" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
#INCLUDE "..\..\include\principal.h"
|
||||
*<DefinedPropArrayMethod>
|
||||
*p: una_prop_cmgroup && Con comentario, pero sin valor
|
||||
*</DefinedPropArrayMethod>
|
||||
@@ -46,13 +49,13 @@ DEFINE CLASS cl_form AS form OLEPUBLIC && mi OLE server DLL
|
||||
*<DefinedPropArrayMethod>
|
||||
*p: chidden && Prop.Hidden
|
||||
*p: cprotected && Prop.Protegida
|
||||
*a: ^ahidden[1,0] && Array Oculto
|
||||
*a: ^aprotected[1,0] && Array Protegido
|
||||
*a: ahidden[1,0] && Array Oculto
|
||||
*a: aprotected[1,0] && Array Protegido
|
||||
*p: _memberdata && XML Metadata for customizable properties
|
||||
*</DefinedPropArrayMethod>
|
||||
|
||||
HIDDEN chidden
|
||||
PROTECTED cprotected
|
||||
HIDDEN chidden,ahidden
|
||||
PROTECTED cprotected,aprotected
|
||||
Caption = "Form"
|
||||
chidden = && Prop.Hidden
|
||||
cprotected = && Prop.Protegida
|
||||
@@ -60,6 +63,7 @@ DEFINE CLASS cl_form AS form OLEPUBLIC && mi OLE server DLL
|
||||
Height = 345
|
||||
Left = 0
|
||||
Name = "cl_form"
|
||||
Picture = bmps\scccheckout.bmp
|
||||
Top = 0
|
||||
Width = 570
|
||||
_memberdata = <VFPData>
|
||||
@@ -153,7 +157,7 @@ DEFINE CLASS cl_imagen AS image OLEPUBLIC && otro ole
|
||||
*< CLASSDATA: Baseclass="image" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
*<DefinedPropArrayMethod>
|
||||
*m: *un_metodo_de_clase && Para testear si el c<>digo se va a la clase cl_form
|
||||
*m: un_metodo_de_clase && Para testear si el c<>digo se va a la clase cl_form
|
||||
*</DefinedPropArrayMethod>
|
||||
|
||||
Height = 16
|
||||
@@ -180,8 +184,8 @@ DEFINE CLASS cl_optiongroup AS optiongroup && descripcion
|
||||
*< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
*<DefinedPropArrayMethod>
|
||||
*m: *propiedad_de_clase_con_valor_access
|
||||
*m: *propiedad_de_clase_con_valor_assign
|
||||
*m: propiedad_de_clase_con_valor_access
|
||||
*m: propiedad_de_clase_con_valor_assign
|
||||
*p: propiedad_de_clase_con_valor && Tiene un valor por defecto
|
||||
*p: propiedad_de_clase_sin_valor && Una propiedad sin valor para heredar
|
||||
*</DefinedPropArrayMethod>
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@@ -2,11 +2,15 @@
|
||||
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
|
||||
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\fb2p_test_bug_estructural.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test_bug_estructural.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
*
|
||||
DEFINE CLASS cl_form AS form
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="2013/12/07 13:49:13" Scale="Pixels" Uniqueid="_3Y01DDRR1" />
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
||||
*< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" />
|
||||
|
||||
Caption = "Form"
|
||||
DoCreate = .T.
|
||||
Name = "cl_form"
|
||||
@@ -18,7 +22,7 @@ DEFINE CLASS cl_form AS form
|
||||
Name = "Command1", ;
|
||||
Top = 32, ;
|
||||
Width = 84
|
||||
*< END OBJECT: BaseClass="commandbutton" UniqueID="_3Y01DE207" Timestamp="2013/12/07 13:33:15" ZOrder="300" />
|
||||
*< END OBJECT: BaseClass="commandbutton" />
|
||||
|
||||
PROCEDURE Load
|
||||
TEXT && COMPROBACI<43>N DE CIERRE DE ESTRUCTURA "ENDPROC"
|
||||
|
||||
@@ -2,11 +2,12 @@
|
||||
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
|
||||
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\foxbin2prg\TESTS\DATOS_READONLY\fb2p_test_bug_metodo_movido.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test_bug_metodo_movido.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
*
|
||||
DEFINE CLASS cl_commandgroup AS commandgroup
|
||||
*< CLASSDATA: Baseclass="commandgroup" Timestamp="2013/12/07 12:33:09" Scale="Pixels" Uniqueid="_3Y01AZERO" />
|
||||
*< CLASSDATA: Baseclass="commandgroup" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
ButtonCount = 2
|
||||
Height = 66
|
||||
Name = "cl_commandgroup"
|
||||
@@ -35,7 +36,8 @@ DEFINE CLASS cl_commandgroup AS commandgroup
|
||||
ENDDEFINE
|
||||
|
||||
DEFINE CLASS cl_optiongroup AS optiongroup
|
||||
*< CLASSDATA: Baseclass="optiongroup" Timestamp="2013/12/07 12:25:17" Scale="Pixels" Uniqueid="_3Y01AVUO1" />
|
||||
*< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
ButtonCount = 2
|
||||
Height = 46
|
||||
Name = "cl_optiongroup"
|
||||
|
||||
@@ -2,14 +2,18 @@
|
||||
* (ES) AUTOGENERADO - <20><>ATENCI<43>N!! - <20><>NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!!
|
||||
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="C:\DESA\TEST\VARIOS\vcx2xml\form1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*< FOXBIN2PRG: Version="1.19" SourceFile="form1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
*< OLE: Nombre="frm_Form1.Olecontrol1" Parent="frm_Form1" ObjName="Olecontrol1" OLEObject="C:\Windows\system32\richtx32.ocx" Checksum="238423585" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOBWdmE47c4BAwAAAAACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAEoAAAAAAAAABQAAAAIAAAD+////BAAAAP7///8GAAAABwAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAAC/DQAAOhAAACFDNBIBAAYArAAAAAAA//8AAP//AQAAAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACADAAAAFJpZ2h0TWFyZ2luABEAAABODQAAAAcAAAAAAAAAAAAAAAUAAABUZXh0ABQAAABIAAAAAAsAAABPbGVjb250cm9sMQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFAACAAAAAAAAAAQAAAAEAAQACAAgAAAB7XHJ0ZjFcYW5zaVxhbnNpY3BnMTI1MlxkZWZmMHtcZm9udHRibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" />
|
||||
|
||||
*
|
||||
#INCLUDE "include\keycodes.h"
|
||||
|
||||
DEFINE CLASS Dataenvironment AS dataenvironment
|
||||
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="2013/11/19 01:01:01" Scale="" Uniqueid="_3WJ0JJNQE" ClassIcon="1" />
|
||||
DEFINE CLASS dataenvironment AS dataenvironment
|
||||
*< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" />
|
||||
|
||||
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
||||
*< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" />
|
||||
|
||||
DataSource = .NULL.
|
||||
Height = 200
|
||||
Left = 1
|
||||
@@ -25,7 +29,7 @@ DEFINE CLASS Dataenvironment AS dataenvironment
|
||||
Name = "Cursor1", ;
|
||||
Top = 20, ;
|
||||
Width = 90
|
||||
*< END OBJECT: BaseClass="cursor" UniqueID="_3XH1EYNDL" Timestamp="2013/11/29 20:22:23" ZOrder="300" />
|
||||
*< END OBJECT: BaseClass="cursor" />
|
||||
|
||||
PROCEDURE BeforeOpenTables
|
||||
*-- Dataenvironment.BeforeOpenTables()
|
||||
@@ -39,11 +43,20 @@ DEFINE CLASS Dataenvironment AS dataenvironment
|
||||
|
||||
ENDDEFINE
|
||||
|
||||
DEFINE CLASS frm_Form1 AS form
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="2013/11/29 20:22:23" Scale="" Uniqueid="_3WJ0JJNQF" />
|
||||
DEFINE CLASS frm_form1 AS form
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
|
||||
|
||||
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
||||
*< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Command2" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Cnt_controles1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Cnt_controles1.Label1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Olecontrol1" UniqueID="" Timestamp="" />
|
||||
|
||||
*<DefinedPropArrayMethod>
|
||||
*m: *metodo_comun && M<>todo com<6F>n
|
||||
*m: metodo_comun && M<>todo com<6F>n
|
||||
*</DefinedPropArrayMethod>
|
||||
|
||||
Caption = "Form1"
|
||||
DoCreate = .T.
|
||||
Height = 250
|
||||
@@ -81,7 +94,7 @@ DEFINE CLASS frm_Form1 AS form
|
||||
Textbox_h.Name = "Textbox_h", ;
|
||||
Textbox_h.TabIndex = 3, ;
|
||||
Textbox_h.ZOrderSet = 3
|
||||
*< END OBJECT: ClassLib="bca.vcx" BaseClass="container" UniqueID="_3XH0XA3XD" Timestamp="2013/11/19 01:01:01" ZOrder="700" />
|
||||
*< END OBJECT: ClassLib="bca.vcx" BaseClass="container" />
|
||||
|
||||
ADD OBJECT 'Cnt_controles1.Label1' AS label WITH ;
|
||||
Caption = "Label1", ;
|
||||
@@ -91,7 +104,7 @@ DEFINE CLASS frm_Form1 AS form
|
||||
TabIndex = 7, ;
|
||||
Top = 84, ;
|
||||
Width = 64
|
||||
*< END OBJECT: BaseClass="label" UniqueID="_3XH1DGY07" Timestamp="2013/11/19 01:01:01" ZOrder="800" />
|
||||
*< END OBJECT: BaseClass="label" />
|
||||
|
||||
ADD OBJECT 'Command1' AS commandbutton WITH ;
|
||||
Caption = "Command1", ;
|
||||
@@ -101,7 +114,7 @@ DEFINE CLASS frm_Form1 AS form
|
||||
TabIndex = 1, ;
|
||||
Top = 20, ;
|
||||
Width = 84
|
||||
*< END OBJECT: BaseClass="commandbutton" UniqueID="_3WJ0JJNQG" Timestamp="2013/11/23 14:11:05" ZOrder="500" />
|
||||
*< END OBJECT: BaseClass="commandbutton" />
|
||||
|
||||
ADD OBJECT 'Command2' AS commandbutton WITH ;
|
||||
Caption = "Command1", ;
|
||||
@@ -111,7 +124,7 @@ DEFINE CLASS frm_Form1 AS form
|
||||
TabIndex = 2, ;
|
||||
Top = 20, ;
|
||||
Width = 84
|
||||
*< END OBJECT: BaseClass="commandbutton" UniqueID="_3WJ0JJNQH" Timestamp="2013/11/23 13:58:05" ZOrder="600" />
|
||||
*< END OBJECT: BaseClass="commandbutton" />
|
||||
|
||||
ADD OBJECT 'Olecontrol1' AS olecontrol WITH ;
|
||||
Height = 157, ;
|
||||
@@ -119,7 +132,7 @@ DEFINE CLASS frm_Form1 AS form
|
||||
Name = "Olecontrol1", ;
|
||||
Top = 72, ;
|
||||
Width = 133
|
||||
*< END OBJECT: BaseClass="olecontrol" UniqueID="_3XI026DCE" Timestamp="2013/11/19 01:01:01" ZOrder="900" OLEObject="C:\Windows\system32\richtx32.ocx" CheckSum="238423585" />
|
||||
*< END OBJECT: BaseClass="olecontrol" Nombre="frm_Form1.Olecontrol1" Parent="frm_Form1" ObjName="Olecontrol1" OLEObject="C:\Windows\system32\richtx32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOBWdmE47c4BAwAAAAACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAEoAAAAAAAAABQAAAAIAAAD+////BAAAAP7///8GAAAABwAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAAC/DQAAOhAAACFDNBIBAAYArAAAAAAA//8AAP//AQAAAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACADAAAAFJpZ2h0TWFyZ2luABEAAABODQAAAAcAAAAAAAAAAAAAAAUAAABUZXh0ABQAAABIAAAAAAsAAABPbGVjb250cm9sMQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFAACAAAAAAAAAAQAAAAEAAQACAAgAAAB7XHJ0ZjFcYW5zaVxhbnNpY3BnMTI1MlxkZWZmMHtcZm9udHRibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" />
|
||||
|
||||
PROCEDURE Load
|
||||
*-- Form 1 LOAD()
|
||||
|
||||
16086
TESTS/DATOS_READONLY/lib_controles.vc2
Normal file
16086
TESTS/DATOS_READONLY/lib_controles.vc2
Normal file
File diff suppressed because it is too large
Load Diff
BIN
TESTS/DATOS_READONLY/lib_controles.vct
Normal file
BIN
TESTS/DATOS_READONLY/lib_controles.vct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/lib_controles.vcx
Normal file
BIN
TESTS/DATOS_READONLY/lib_controles.vcx
Normal file
Binary file not shown.
112
TESTS/DATOS_READONLY/lib_controles2.vc2
Normal file
112
TESTS/DATOS_READONLY/lib_controles2.vc2
Normal 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
|
||||
BIN
TESTS/DATOS_READONLY/lib_controles2.vct
Normal file
BIN
TESTS/DATOS_READONLY/lib_controles2.vct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/lib_controles2.vcx
Normal file
BIN
TESTS/DATOS_READONLY/lib_controles2.vcx
Normal file
Binary file not shown.
@@ -14,13 +14,13 @@
|
||||
|
||||
*<MenuCode>
|
||||
DEFINE MENU _MSYSMENU BAR
|
||||
DEFINE PAD _3Z80ZOKX5 OF _MSYSMENU PROMPT "Opci<63>n A con submen<65>" COLOR SCHEME 3 ;
|
||||
DEFINE PAD _42I10MLX9 OF _MSYSMENU PROMPT "Opci<63>n A con submen<65>" COLOR SCHEME 3 ;
|
||||
NEGOTIATE NONE, LEFT ;
|
||||
KEY DEL, "Pulsar <DEL>" ;
|
||||
SKIP FOR SKIP_FOR() ;
|
||||
MESSAGE "Mensaje para Opci<63>n A con submen<65>" && Comentario
|
||||
|
||||
ON PAD _3Z80ZOKX5 OF _MSYSMENU ACTIVATE POPUP Opci<63>nA_CS
|
||||
ON PAD _42I10MLX9 OF _MSYSMENU ACTIVATE POPUP Opci<63>nA_CS
|
||||
|
||||
*----------------------------------
|
||||
DEFINE POPUP Opci<63>nA_CS MARGIN RELATIVE SHADOW COLOR SCHEME 4
|
||||
|
||||
@@ -84,9 +84,9 @@ DEFINE PAD opc_b OF _MSYSMENU PROMPT "Opci
|
||||
|
||||
ON SELECTION PAD opc_b OF _MSYSMENU WAIT WINDOW "Opci<63>n B"
|
||||
|
||||
DEFINE PAD _40T0B3WE4 OF _MSYSMENU PROMPT "\<About ] + alltrim(oApp.GetPProp([icAppTitle]))+"..." + [" COLOR SCHEME 3
|
||||
DEFINE PAD _42I10FCOZ OF _MSYSMENU PROMPT "\<About ] + alltrim(oApp.GetPProp([icAppTitle]))+"..." + [" COLOR SCHEME 3
|
||||
|
||||
ON PAD _40T0B3WE4 OF _MSYSMENU ACTIVATE POPUP _40t0aif1j
|
||||
ON PAD _42I10FCOZ OF _MSYSMENU ACTIVATE POPUP _40t0aif1j
|
||||
|
||||
*----------------------------------
|
||||
DEFINE POPUP _40t0aif1j MARGIN RELATIVE SHADOW COLOR SCHEME 4ON SELECTION POPUP ALL DO ALL_FB2P
|
||||
|
||||
@@ -9,13 +9,13 @@
|
||||
|
||||
*<MenuCode>
|
||||
DEFINE MENU _MSYSMENU BAR
|
||||
DEFINE PAD _3Z80ZOKZN OF _MSYSMENU PROMPT "ejemplo" COLOR SCHEME 3
|
||||
DEFINE PAD _42I10MLZH OF _MSYSMENU PROMPT "ejemplo" COLOR SCHEME 3
|
||||
|
||||
ON SELECTION PAD _3Z80ZOKZN OF _MSYSMENU do test
|
||||
ON SELECTION PAD _42I10MLZH OF _MSYSMENU do test
|
||||
|
||||
DEFINE PAD _3Z80ZOKZO OF _MSYSMENU PROMPT "ejemplo2" COLOR SCHEME 3
|
||||
DEFINE PAD _42I10MLZI OF _MSYSMENU PROMPT "ejemplo2" COLOR SCHEME 3
|
||||
|
||||
ON SELECTION PAD _3Z80ZOKZO OF _MSYSMENU DO TEST
|
||||
ON SELECTION PAD _42I10MLZI OF _MSYSMENU DO TEST
|
||||
|
||||
*</MenuCode>
|
||||
|
||||
|
||||
161
TESTS/DATOS_READONLY/test_public_protected.vc2
Normal file
161
TESTS/DATOS_READONLY/test_public_protected.vc2
Normal file
@@ -0,0 +1,161 @@
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
* (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="test_public_protected.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
*
|
||||
DEFINE CLASS cmdbutton1 AS commandbutton
|
||||
*< CLASSDATA: Baseclass="commandbutton" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
*<DefinedPropArrayMethod>
|
||||
*p: invalue
|
||||
*</DefinedPropArrayMethod>
|
||||
|
||||
Caption = "Command1"
|
||||
Height = 27
|
||||
invalue = Default Value
|
||||
Name = "cmdbutton1"
|
||||
Width = 84
|
||||
|
||||
ENDDEFINE
|
||||
|
||||
DEFINE CLASS cmdsubbutton AS cmdbutton1 OF "test_public_protected.vcx"
|
||||
*< CLASSDATA: Baseclass="commandbutton" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
PROTECTED invalue
|
||||
invalue = New Value
|
||||
Name = "cmdsubbutton"
|
||||
|
||||
ENDDEFINE
|
||||
|
||||
DEFINE CLASS frmform1 AS form
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
||||
*< OBJECTDATA: ObjPath="txtAddedThisThird" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" />
|
||||
*< OBJECTDATA: ObjPath="Cmdbutton11" UniqueID="" Timestamp="" />
|
||||
|
||||
*<DefinedPropArrayMethod>
|
||||
*m: canprocess
|
||||
*m: initobjects
|
||||
*m: processaction
|
||||
*m: processactionpart1
|
||||
*m: processactionpart2
|
||||
*</DefinedPropArrayMethod>
|
||||
|
||||
Caption = "Form"
|
||||
DoCreate = .T.
|
||||
Name = "frmform1"
|
||||
|
||||
ADD OBJECT 'Cmdbutton11' AS cmdsubbutton WITH ;
|
||||
Height = 36, ;
|
||||
Left = 60, ;
|
||||
Name = "Cmdbutton11", ;
|
||||
Top = 144, ;
|
||||
Width = 120
|
||||
*< END OBJECT: ClassLib="test_public_protected.vcx" BaseClass="commandbutton" />
|
||||
|
||||
ADD OBJECT 'Command1' AS commandbutton WITH ;
|
||||
Caption = "This button was added second", ;
|
||||
DefHeight = , ;
|
||||
DefLeft = , ;
|
||||
Height = (25), ;
|
||||
Left = (this.Height), ;
|
||||
Name = "Command1", ;
|
||||
Top = 48, ;
|
||||
Width = 192
|
||||
*< END OBJECT: BaseClass="commandbutton" />
|
||||
|
||||
ADD OBJECT 'Label1' AS label WITH ;
|
||||
Caption = "This label was added first", ;
|
||||
Height = 18, ;
|
||||
Left = 24, ;
|
||||
Name = "Label1", ;
|
||||
Top = 12, ;
|
||||
Width = 144
|
||||
*< END OBJECT: BaseClass="label" />
|
||||
|
||||
ADD OBJECT 'txtAddedThisThird' AS textbox WITH ;
|
||||
Height = 25, ;
|
||||
Left = 24, ;
|
||||
Name = "txtAddedThisThird", ;
|
||||
Top = 96, ;
|
||||
Width = 180
|
||||
*< END OBJECT: BaseClass="textbox" />
|
||||
|
||||
PROTECTED PROCEDURE canprocess
|
||||
ENDPROC
|
||||
|
||||
PROCEDURE Init
|
||||
*
|
||||
* Init the form!
|
||||
*
|
||||
thisform.Caption = "Hello world!"
|
||||
ENDPROC
|
||||
|
||||
PROTECTED PROCEDURE initobjects
|
||||
*
|
||||
* Initialize some objects here
|
||||
*
|
||||
ENDPROC
|
||||
|
||||
PROCEDURE processaction
|
||||
*
|
||||
* ProcessActions again, all public
|
||||
*
|
||||
* TODO
|
||||
ENDPROC
|
||||
|
||||
PROTECTED PROCEDURE processactionpart1
|
||||
*
|
||||
* Part 1, do some stuff
|
||||
*
|
||||
SELECT 0
|
||||
ENDPROC
|
||||
|
||||
PROTECTED PROCEDURE processactionpart2
|
||||
ENDPROC
|
||||
|
||||
ENDDEFINE
|
||||
|
||||
DEFINE CLASS frmform2 AS form
|
||||
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
|
||||
|
||||
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
|
||||
*< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" />
|
||||
|
||||
*<DefinedPropArrayMethod>
|
||||
*m: privatemethod && A private method
|
||||
*m: protectedmethod && A protected method
|
||||
*m: publicmethod && Regular public method
|
||||
*</DefinedPropArrayMethod>
|
||||
|
||||
Caption = "Form"
|
||||
DoCreate = .T.
|
||||
Name = "frmform2"
|
||||
|
||||
ADD OBJECT 'Label1' AS label WITH ;
|
||||
Caption = "Added this control first", ;
|
||||
Height = 25, ;
|
||||
Left = 36, ;
|
||||
Name = "Label1", ;
|
||||
Top = 24, ;
|
||||
Width = 205
|
||||
*< END OBJECT: BaseClass="label" />
|
||||
|
||||
HIDDEN PROCEDURE privatemethod && A private method
|
||||
* Private method
|
||||
ENDPROC
|
||||
|
||||
PROTECTED PROCEDURE protectedmethod && A protected method
|
||||
* Protected method
|
||||
ENDPROC
|
||||
|
||||
PROCEDURE publicmethod && Regular public method
|
||||
* Pub method
|
||||
ENDPROC
|
||||
|
||||
ENDDEFINE
|
||||
BIN
TESTS/DATOS_READONLY/test_public_protected.vct
Normal file
BIN
TESTS/DATOS_READONLY/test_public_protected.vct
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/test_public_protected.vcx
Normal file
BIN
TESTS/DATOS_READONLY/test_public_protected.vcx
Normal file
Binary file not shown.
102
TESTS/DATOS_READONLY/test_report.fr2
Normal file
102
TESTS/DATOS_READONLY/test_report.fr2
Normal file
@@ -0,0 +1,102 @@
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
* (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="test_report.frx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
|
||||
*
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="1" objcode="53" name="" vpos="1.000" hpos="0.000" height="0.000" width="-1.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Courier New" fontstyle="0" fontsize="10" mode="0" ruler="1" rulerlines="0" grid=".T." gridv="12" gridh="12" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".T." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="1" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[ORIENTATION=0
|
||||
PAPERSIZE=1
|
||||
COLOR=2
|
||||
]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="1" name="" vpos="0.000" hpos="0.000" height="7500.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="4" name="" vpos="0.000" hpos="0.000" height="5000.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="9" objcode="7" name="" vpos="0.000" hpos="0.000" height="5000.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="23" objcode="0" name="" vpos="16.000" hpos="8.000" height="12.000" width="10.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="Courier New" fontstyle="0" fontsize="10" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[4]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="5" objcode="0" name="" vpos="2500.000" hpos="11250.000" height="3333.333" width="6666.667" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="-1" penblue="-1" fillred="-1" fillgreen="-1" fillblue="-1" pensize="0" penpat="0" fillpat="0" fontface="Courier New" fontstyle="0" fontsize="10" mode="1" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".T." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".T." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="1" curpos=".T." supalways=".T." supovflow=".T." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[-1]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA["A test:
|
||||
Caption!"]]>
|
||||
<supexpr><![CDATA[LEN("This is an example with a CRLF after it") > 0
|
||||
and .t.]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
<Reportes
|
||||
platform="WINDOWS " uniqueid="" timestamp="0" objtype="25" objcode="0" name="dataenvironment" vpos="0.000" hpos="0.000" height="0.000" width="0.000" order="" unique=".F." environ=".F." boxchar=" " fillchar=" " pengreen="0" penblue="0" fillred="0" fillgreen="0" fillblue="0" pensize="0" penpat="0" fillpat="0" fontface="" fontstyle="0" fontsize="0" mode="0" ruler="0" rulerlines="0" grid=".F." gridv="0" gridh="0" float=".F." stretch=".F." stretchtop=".F." top=".F." bottom=".F." suptype="0" suprest="0" norepeat=".F." resetrpt="0" pagebreak=".F." colbreak=".F." resetpage=".F." general="0" spacing="0" double=".F." swapheader=".F." swapfooter=".F." ejectbefor=".F." ejectafter=".F." plain=".F." summary=".F." addalias=".F." offset="0" topmargin="0" botmargin="0" totaltype="0" resettotal="0" resoid="0" curpos=".F." supalways=".F." supovflow=".F." suprpcol="0" supgroup="0" supvalchng=".F."
|
||||
<picture><![CDATA[]]>
|
||||
<tag><![CDATA[
|
||||
]]>
|
||||
<tag2><![CDATA[]]>
|
||||
<penred><![CDATA[0]]>
|
||||
<style><![CDATA[]]>
|
||||
<expr><![CDATA[Top = 0
|
||||
Left = 0
|
||||
Width = 0
|
||||
Height = 0
|
||||
DataSource = .NULL.
|
||||
Name = "Dataenvironment"
|
||||
]]>
|
||||
<supexpr><![CDATA[]]>
|
||||
<comment><![CDATA[]]>
|
||||
<user><![CDATA[]]>
|
||||
</Reportes>
|
||||
BIN
TESTS/DATOS_READONLY/test_report.frt
Normal file
BIN
TESTS/DATOS_READONLY/test_report.frt
Normal file
Binary file not shown.
BIN
TESTS/DATOS_READONLY/test_report.frx
Normal file
BIN
TESTS/DATOS_READONLY/test_report.frx
Normal file
Binary file not shown.
BIN
TESTS/FoxPro9_Order_for_Control_Properties.xlsx
Normal file
BIN
TESTS/FoxPro9_Order_for_Control_Properties.xlsx
Normal file
Binary file not shown.
BIN
TESTS/PCT_DLL.dll
Normal file
BIN
TESTS/PCT_DLL.dll
Normal file
Binary file not shown.
19
TESTS/demo_hook_dbf.prg
Normal file
19
TESTS/demo_hook_dbf.prg
Normal file
@@ -0,0 +1,19 @@
|
||||
*-- DEMO HOOK PARA PREPROCESO DE UN DBF
|
||||
LOCAL oFB AS 'c_foxbin2prg' OF 'c:\desa\foxbin2prg\foxbin2prg.prg'
|
||||
oFB = NEWOBJECT( 'c_foxbin2prg', 'c:\desa\foxbin2prg\foxbin2prg.prg' )
|
||||
oFB.DBF_Conversion_Support = 2
|
||||
oFB.run_AfterCreateTable = 'p_AfterCreateTable'
|
||||
oFB.Ejecutar( 'C:\DESA\foxbin2prg\TESTS\DATOS_TEST\fb2p_dbc.dc2' )
|
||||
oFB.Ejecutar( 'C:\DESA\foxbin2prg\TESTS\DATOS_TEST\fb2p_dbf.db2' )
|
||||
oFB = NULL
|
||||
RETURN
|
||||
|
||||
|
||||
PROCEDURE p_AfterCreateTable
|
||||
LPARAMETERS lnDataSessionID, tc_OutputFile, toTable
|
||||
MESSAGEBOX( 'Datasession actual: ' + TRANSFORM(SET("Datasession")) + CHR(13) ;
|
||||
+ 'lnDataSessionID: ' + TRANSFORM(lnDataSessionID) )
|
||||
*-- Aqu<71> se puede rellenar la tabla.
|
||||
*-- Recordar no cambiar la sesi<73>n de datos, que es privada.
|
||||
INSERT INTO fb2p_dbf (nombre,edad,depto) VALUES ('Fer', 45, 'dpto')
|
||||
ENDPROC
|
||||
@@ -4,6 +4,46 @@
|
||||
*----------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
|
||||
FUNCTION TaskBarHeight
|
||||
DECLARE INTEGER GetWindowRect IN user32;
|
||||
INTEGER HWND, STRING lpRect
|
||||
DECLARE INTEGER FindWindow IN user32;
|
||||
STRING lpClassName,;
|
||||
STRING lpWindowName
|
||||
|
||||
LOCAL cBuffer
|
||||
cBuffer = REPLICATE(CHR(0), 16)
|
||||
hWindow= FindWindow('Shell_TrayWnd', '')
|
||||
cRect = GetWinRect(hWindow)
|
||||
RETURN TRANSFORM( buf2dword( SUBSTR(cRect, 13,4)) - buf2dword( SUBSTR(cRect, 5,4) ) )
|
||||
ENDFUNC
|
||||
|
||||
|
||||
FUNCTION GetWinRect(hWindow)
|
||||
LOCAL cBuffer
|
||||
cBuffer = REPLICATE(CHR(0), 16)
|
||||
= GetWindowRect(hWindow, @cBuffer)
|
||||
RETURN cBuffer
|
||||
ENDFUNC
|
||||
|
||||
|
||||
FUNCTION buf2dword(lcBuffer)
|
||||
RETURN ASC(SUBSTR(lcBuffer, 1,1)) + ;
|
||||
BITLSHIFT(ASC(SUBSTR(lcBuffer, 2,1)), 8) +;
|
||||
BITLSHIFT(ASC(SUBSTR(lcBuffer, 3,1)), 16) +;
|
||||
BITLSHIFT(ASC(SUBSTR(lcBuffer, 4,1)), 24)
|
||||
ENDFUNC
|
||||
|
||||
|
||||
DEFINE CLASS cl_Column AS Column
|
||||
ENDDEFINE
|
||||
|
||||
|
||||
DEFINE CLASS cl_Header AS Header
|
||||
ENDDEFINE
|
||||
|
||||
|
||||
DEFINE CLASS CL_FXU_CONFIG AS CUSTOM
|
||||
#IF .F.
|
||||
LOCAL THIS AS CL_FXU_CONFIG OF 'fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
@@ -27,12 +67,12 @@ DEFINE CLASS CL_FXU_CONFIG AS CUSTOM
|
||||
cPathDatosReadOnly = 'TESTS\DATOS_READONLY'
|
||||
cPathDatosTest = 'TESTS\DATOS_TEST'
|
||||
cSetDate = ''
|
||||
|
||||
|
||||
|
||||
*----------------------------------------------------------------------------------------
|
||||
PROCEDURE INIT
|
||||
THIS.cSetDate = SET("Date")
|
||||
|
||||
|
||||
SET DATE TO YMD
|
||||
SET HOURS TO 24
|
||||
SET SAFETY OFF
|
||||
@@ -66,7 +106,7 @@ DEFINE CLASS CL_FXU_CONFIG AS CUSTOM
|
||||
*----------------------------------------------------------------------------------------
|
||||
PROCEDURE copiarArchivosParaTest
|
||||
LPARAMETERS tcFileSpec
|
||||
|
||||
|
||||
COPY FILE (FORCEPATH( tcFileSpec, THIS.cPathDatosReadOnly )) TO (FORCEPATH( tcFileSpec, THIS.cPathDatosTest ))
|
||||
ENDPROC
|
||||
|
||||
|
||||
22
TESTS/pct_dll.txt
Normal file
22
TESTS/pct_dll.txt
Normal file
@@ -0,0 +1,22 @@
|
||||
* http://www.tek-tips.com/viewthread.cfm?qid=769626
|
||||
* ftp://tek-tips:tek-tips@69.14.191.20/tek-tips/pct_dll/pct_dll.zip
|
||||
|
||||
lcWallpaper="C:\Documents and Settings\brian\My Documents\My Pictures\Img_0011.jpg"
|
||||
|
||||
Declare Integer tobmp IN "PCT_DLL.dll" ;
|
||||
String jpgfilename, String bmpfilename
|
||||
|
||||
retval = tobmp(lcWallpaper,JUSTPATH(lcWallpaper)+"\"+JUSTSTEM(lcWallpaper)+".bmp")
|
||||
|
||||
lcWallpaper=JUSTPATH(lcWallpaper)+"\"+JUSTSTEM(lcWallpaper)+".bmp"
|
||||
|
||||
DO JpgWallPaper WITH lcWallpaper
|
||||
|
||||
PROCEDURE JpgWallPaper
|
||||
PARAMETERS lcWallpaper
|
||||
DECLARE INTEGER SystemParametersInfo IN WIN32API ;
|
||||
INTEGER uiAction, INTEGER uiParam,;
|
||||
STRING @pvParam, INTEGER fWinIni
|
||||
|
||||
SystemParametersInfo (20 , 0, @lcWallpaper, 3)
|
||||
ENDPROC
|
||||
201
TESTS/readme.txt
Normal file
201
TESTS/readme.txt
Normal file
@@ -0,0 +1,201 @@
|
||||
|
||||
Last year, I've spend a lot of time to develop a picture treatment dll, there are 6 functions in this dll,
|
||||
they are:
|
||||
|
||||
1 formtobmp
|
||||
2 formtobmpA
|
||||
3 tojpeg
|
||||
4 tobmp
|
||||
5 getbmpdimension
|
||||
6 getjpgdimension
|
||||
|
||||
In this paper, I'll simply explain their functionality, parameters and how to use them.
|
||||
|
||||
Anybody who need source code of this dll, please email to njjane@21cn.com (they are write by are C++,not vfp).
|
||||
|
||||
James Khan
|
||||
njjane@21cn.com
|
||||
http://www.myf1.net/foxcryptor/
|
||||
====================================================================================================
|
||||
|
||||
Important : To correct use PCT_DLL.dll, you must put it to your system directory or current directory!!!
|
||||
|
||||
|
||||
|
||||
1 formtobmp
|
||||
--------------------------------------------------------------------------------
|
||||
Description:
|
||||
capture window or screen image into a bitmap file
|
||||
|
||||
Declareation:
|
||||
Declare Integer formtobmp IN "PCT_DLL.dll" integer hwnd,String bmpFileName
|
||||
|
||||
Parameters:
|
||||
hwnd
|
||||
Handle to the window to be saves to a bitmap file. if this parameter is zero, then saves desktop to a bitmap file.
|
||||
|
||||
bmpFileName
|
||||
The bitmap filename to be save. must include full path name.
|
||||
|
||||
Note:
|
||||
The function returns a zero result on success,else 1 is returned.
|
||||
|
||||
Example in Visual FoxPro:
|
||||
|
||||
retVal = formtobmp(0,"c:\screen.bmp") && Save screen to file c:\screen.bmp
|
||||
if retval = 0 && if success
|
||||
messagebox("Capture screen ok! bmp file has been saved to file c:\screen.bmp")
|
||||
endif
|
||||
--------------------------------------------------------------------------------
|
||||
|
||||
|
||||
|
||||
2 formtobmpA
|
||||
--------------------------------------------------------------------------------
|
||||
Description:
|
||||
also a function to capture window or screen image into a bitmap file,but in this function,
|
||||
you can specified a area of screen/window to save.
|
||||
|
||||
Declareation:
|
||||
Declare Integer formtobmpA IN "PCT_DLL.dll" string bmpfilename,integer nX,integer nY,integer nX2,integer nY2
|
||||
|
||||
Parameters:
|
||||
bmpFileName
|
||||
The bitmap filename to be save. must include full path name.
|
||||
nX
|
||||
x-coord of upper-left corner of bitmap file
|
||||
nX2
|
||||
x-coord of lower-right corner of bitmap file
|
||||
nY
|
||||
y-coord of upper-left corner of bitmap file
|
||||
nY2
|
||||
y-coord of lower-right corner of bitmap file
|
||||
|
||||
Note:
|
||||
The function returns a zero result on success,else 1 is returned.
|
||||
|
||||
Example in Visual FoxPro:
|
||||
|
||||
retVal = formtobmpA("c:\screen0.bmp",20,20,400,400) && Save screen to file c:\screen.bmp
|
||||
if retval = 0
|
||||
messagebox("Capture screen ok!")
|
||||
endif
|
||||
--------------------------------------------------------------------------------
|
||||
|
||||
|
||||
3 tojpeg
|
||||
--------------------------------------------------------------------------------
|
||||
Description:
|
||||
Convert a bmp file to a jpg file
|
||||
|
||||
Declareation:
|
||||
Declare Integer tojpeg IN "PCT_DLL.dll" String bmpfilename, String jpgfilename
|
||||
|
||||
Parameters:
|
||||
bmpfilename
|
||||
BMP filename to be convert.
|
||||
jpgfilename
|
||||
JPEG filename
|
||||
|
||||
Note:
|
||||
The function returns a zero result on success,else 1 is returned.
|
||||
|
||||
Example in Visual FoxPro:
|
||||
|
||||
retval = tojpeg("c:\screen.bmp","c:\screen.jpg") && Convert c:\screen.bmp to c:\screen.jpg
|
||||
|
||||
if retval = 0
|
||||
messagebox("Convert bitmap to jpeg ok!")
|
||||
endif
|
||||
--------------------------------------------------------------------------------
|
||||
|
||||
4 tobmp
|
||||
--------------------------------------------------------------------------------
|
||||
Description:
|
||||
Convert a jpg file to a bmp file
|
||||
|
||||
Declareation:
|
||||
Declare Integer tobmp IN "PCT_DLL.dll" String jpgfilename, String bmpfilename
|
||||
|
||||
Parameters:
|
||||
jpgfilename
|
||||
JPEG filename to be convert.
|
||||
bmpfilename
|
||||
BMP filename
|
||||
|
||||
Note:
|
||||
The function returns a zero result on success,else 1 is returned.
|
||||
|
||||
Example in Visual FoxPro:
|
||||
|
||||
retval = tobmp("c:\screen.jpg","c:\screen2.bmp") && Convert c:\screen.jpg to c:\screen2.bmp
|
||||
if retval = 0
|
||||
messagebox("Convert jpeg to bitmap success!")
|
||||
endif
|
||||
--------------------------------------------------------------------------------
|
||||
|
||||
|
||||
5 getbmpdimension
|
||||
--------------------------------------------------------------------------------
|
||||
Description:
|
||||
Get a dimensions of a bitmap
|
||||
|
||||
Declareation:
|
||||
Declare Integer getbmpdimension IN "PCT_DLL.dll" string bmpfilename, integer @ nwidth,integer @ nheight
|
||||
|
||||
Parameters:
|
||||
bmpfilename
|
||||
origin bitmap filename.
|
||||
|
||||
nwidth
|
||||
bitmap's width measured in pixels.
|
||||
|
||||
nheight
|
||||
bitmap's height measured in pixels.
|
||||
|
||||
Note:
|
||||
if success, return value 0, else return 1.
|
||||
if success, variable nwidth hold the bitmap's width ,variable nheight hold the bitmap's height.
|
||||
|
||||
Example in Visual FoxPro:
|
||||
|
||||
nwidth=0
|
||||
nheight=0
|
||||
retval = getbmpdimension("c:\screen.bmp",@ nwidth, @ nheight)
|
||||
if retval = 0
|
||||
messagebox("Width:"+str(nwidth)+chr(13)+"Height:"+str(nheight))
|
||||
endif
|
||||
--------------------------------------------------------------------------------
|
||||
|
||||
6 getjpgdimension
|
||||
--------------------------------------------------------------------------------
|
||||
Description:
|
||||
Get a dimensions of a jpeg file
|
||||
|
||||
Declareation:
|
||||
Declare Integer getjpgdimension IN "PCT_DLL.dll" string jpgfilename, integer @ nwidth,integer @ nheight
|
||||
|
||||
Parameters:
|
||||
jpgfilename
|
||||
origin jpeg filename.
|
||||
|
||||
nwidth
|
||||
jpeg's width measured in pixels.
|
||||
|
||||
nheight
|
||||
jpeg's height measured in pixels.
|
||||
|
||||
Note:
|
||||
if success, return value 0, else return 1.
|
||||
if success, variable nwidth hold the jpeg's width ,variable nheight hold the jpeg's height.
|
||||
|
||||
Example in Visual FoxPro:
|
||||
|
||||
nwidth=0
|
||||
nheight=0
|
||||
retval = getjpgdimension("c:\screen.jpg",@ nwidth, @ nheight)
|
||||
if retval = 0
|
||||
messagebox("Width:"+str(nwidth)+chr(13)+"Height:"+str(nheight))
|
||||
endif
|
||||
|
||||
clear dlls
|
||||
@@ -19,12 +19,18 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
#DEFINE C_DEFINE_CLASS 'DEFINE CLASS'
|
||||
#DEFINE C_ENDDEFINE_CLASS 'ENDDEFINE'
|
||||
icObj = NULL
|
||||
nMouseX = 0
|
||||
nMouseY = 0
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION SETUP
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
*LOCAL loObj AS c_conversor_base OF "FOXBIN2PRG.PRG"
|
||||
*DOEVENTS FORCE
|
||||
THIS.nMouseX = MCOL('',3)
|
||||
THIS.nMouseY = MROW('',3)
|
||||
MOUSE AT (_SCREEN.Height), (_SCREEN.Width) PIXELS
|
||||
SET PROCEDURE TO 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
oFXU_LIB = CREATEOBJECT('CL_FXU_CONFIG')
|
||||
oFXU_LIB.setup_comun()
|
||||
@@ -48,6 +54,8 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
oFXU_LIB = NULL
|
||||
ENDIF
|
||||
RELEASE PROCEDURE 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
MOUSE AT (THIS.nMouseY), (THIS.nMouseX) PIXELS
|
||||
SYS(1104)
|
||||
|
||||
ENDFUNC
|
||||
|
||||
@@ -79,8 +87,8 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
THIS.messageout( LOWER(PROGRAM(PROGRAM(-1)-1)) )
|
||||
|
||||
THIS.messageout( 'Recno#' + TRANSFORM(tnRecno) + ' UniqueID="' + toReg_Esperado.UniqueID + '" ObjType=' + TRANSFORM(toReg_Esperado.ObjType) ;
|
||||
+ ' ObjCode=' + TRANSFORM(toReg_Esperado.ObjCode) + ' Expr=[' + LEFT(toReg_Esperado.Expr,20) ;
|
||||
+ IIF(LEN(toReg_Esperado.Expr)>20,'...]',']') ;
|
||||
+ ' ObjCode=' + TRANSFORM(toReg_Esperado.ObjCode) + ' Expr=[' + LEFT(toReg_Esperado.EXPR,20) ;
|
||||
+ IIF(LEN(toReg_Esperado.EXPR)>20,'...]',']') ;
|
||||
+ ' vpos=' + TRANSFORM(toReg_Esperado.VPOS) + ' hpos=' + TRANSFORM(toReg_Esperado.HPOS) ;
|
||||
+ ' height=' + TRANSFORM(toReg_Esperado.HEIGHT) + ' width=' + TRANSFORM(toReg_Esperado.WIDTH) )
|
||||
|
||||
@@ -306,7 +314,7 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
STORE 0 TO lnCodError_Esperado
|
||||
lnRecno = RECNO()
|
||||
SCATTER MEMO NAME loReg_Esperado
|
||||
lcUniqueID = loReg_Esperado.UNIQUEID
|
||||
lcUniqueID = loReg_Esperado.UniqueID
|
||||
|
||||
*-- TEST
|
||||
IF FILE(lc_OutputFile)
|
||||
@@ -316,7 +324,7 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
ERROR 'No se encontr<74> el archivo "' + lc_OutputFile + '"'
|
||||
ENDIF
|
||||
|
||||
LOCATE FOR UNIQUEID==lcUniqueID
|
||||
LOCATE FOR UniqueID==lcUniqueID
|
||||
|
||||
IF NOT FOUND()
|
||||
ERROR 'No se encontr<74> el registro #' + TRANSFORM(RECNO('ARCHIVOBIN_IN')) + ' con UniqueID "' + lcUniqueID + '" en el archivo "' + lc_OutputFile + '"'
|
||||
@@ -355,21 +363,24 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
loEx = NULL
|
||||
loCnv = NEWOBJECT("c_foxbin2prg", "FOXBIN2PRG.PRG")
|
||||
*loCnv.l_Debug = .F.
|
||||
loCnv.l_ShowErrors = .F.
|
||||
*loCnv.l_ShowErrors = .F.
|
||||
*loCnv.l_Test = .T.
|
||||
*loCnv.l_ReportSort_Enabled = .F.
|
||||
*loCnv.l_NoTimestamps = .F.
|
||||
*loCnv.l_ClearUniqueID = .F.
|
||||
|
||||
|
||||
*-- DATOS DE ENTRADA
|
||||
STORE 0 TO lnCodError
|
||||
lc_File = 'FB2P_FOXUSER.LBX'
|
||||
lc_InputFile = FORCEPATH( lc_File, 'TESTS\DATOS_READONLY' )
|
||||
lc_OutputFile = FORCEPATH( lc_File, 'TESTS\DATOS_TEST' )
|
||||
lc_InputFile = FORCEPATH( lc_File, oFXU_LIB.cPathDatosReadOnly )
|
||||
lc_OutputFile = FORCEPATH( lc_File, oFXU_LIB.cPathDatosTest )
|
||||
lcTipoBinario = UPPER( JUSTEXT( lc_OutputFile ) )
|
||||
loCnv.l_NoTimestamps = .F.
|
||||
loCnv.l_ClearUniqueID = .F.
|
||||
loCnv.EvaluarConfiguracion( '1', '1', '0', '0', SYS(5)+CURDIR(), '1', '0', '0' )
|
||||
|
||||
oFXU_LIB.copiarArchivosParaTest( FORCEEXT( lc_File, LEFT( JUSTEXT(lc_File),2 ) + '?' ) )
|
||||
*oFXU_LIB.copiarArchivosParaTest( FORCEEXT( lc_File, LEFT( JUSTEXT(lc_File),2 ) + '?' ) )
|
||||
oFXU_LIB.copiarArchivosParaTest( FORCEEXT( lc_File, 'LBX' ) )
|
||||
oFXU_LIB.copiarArchivosParaTest( FORCEEXT( lc_File, 'LBT' ) )
|
||||
|
||||
loCnv.Convertir( lc_OutputFile, .F., .F., .T. )
|
||||
loCnv.Convertir( FORCEEXT(lc_OutputFile, LEFT( JUSTEXT(lc_File),2 ) + '2' ), .F., .F., .T. )
|
||||
@@ -382,7 +393,7 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
STORE 0 TO lnCodError_Esperado
|
||||
lnRecno = RECNO()
|
||||
SCATTER MEMO NAME loReg_Esperado
|
||||
lcUniqueID = loReg_Esperado.UNIQUEID
|
||||
lcUniqueID = loReg_Esperado.UniqueID
|
||||
|
||||
*-- TEST
|
||||
IF FILE(lc_OutputFile)
|
||||
@@ -392,7 +403,7 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
ERROR 'No se encontr<74> el archivo "' + lc_OutputFile + '"'
|
||||
ENDIF
|
||||
|
||||
LOCATE FOR UNIQUEID==lcUniqueID
|
||||
LOCATE FOR UniqueID==lcUniqueID
|
||||
|
||||
IF NOT FOUND()
|
||||
ERROR 'No se encontr<74> el registro #' + TRANSFORM(RECNO('ARCHIVOBIN_IN')) + ' con UniqueID "' + lcUniqueID + '" en el archivo "' + lc_OutputFile + '"'
|
||||
@@ -451,7 +462,7 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
SELECT 0
|
||||
USE (lc_InputFile) SHARED AGAIN NOUPDATE ALIAS ARCHIVOBIN_IN
|
||||
|
||||
SCAN ALL FOR NOT DELETED() AND ( UNIQUEID==PADR('Form',10) OR PLATFORM==PADR("WINDOWS",8) )
|
||||
SCAN ALL FOR NOT DELETED() AND ( UniqueID==PADR('Form',10) OR PLATFORM==PADR("WINDOWS",8) )
|
||||
*-- DATOS ESPERADOS
|
||||
STORE 0 TO lnCodError_Esperado
|
||||
SCATTER MEMO NAME loReg_Esperado
|
||||
@@ -468,9 +479,9 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
ENDIF
|
||||
|
||||
IF EMPTY(lcParent) AND EMPTY(lcClass) AND EMPTY(lcObjName)
|
||||
LOCATE FOR PLATFORM==PADR("COMMENT",8) AND UNIQUEID==PADR("Screen",10)
|
||||
LOCATE FOR PLATFORM==PADR("COMMENT",8) AND UniqueID==PADR("Screen",10)
|
||||
IF NOT FOUND()
|
||||
ERROR 'No se encontr<74> el registro de cabecera "' + UNIQUEID + '"'
|
||||
ERROR 'No se encontr<74> el registro de cabecera "' + UniqueID + '"'
|
||||
ENDIF
|
||||
ELSE
|
||||
LOCATE FOR LOWER(CLASS)==lcClass AND LOWER(PARENT)==lcParent AND LOWER(objName)==lcObjName
|
||||
@@ -532,13 +543,13 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
SELECT 0
|
||||
USE (lc_OutputFile) SHARED AGAIN NOUPDATE ALIAS TABLABIN
|
||||
|
||||
LOCATE FOR ObjName = 'Pageframe1' AND NOT DELETED() AND PLATFORM==PADR("WINDOWS",8)
|
||||
|
||||
this.assertequals( .T., FOUND(), 'No se ha encontrado el objeto "Pageframe1" que se iba a testear' )
|
||||
LOCATE FOR objName = 'Pageframe1' AND NOT DELETED() AND PLATFORM==PADR("WINDOWS",8)
|
||||
|
||||
THIS.assertequals( .T., FOUND(), 'No se ha encontrado el objeto "Pageframe1" que se iba a testear' )
|
||||
|
||||
*-- DATOS ESPERADOS
|
||||
STORE 0 TO lnCodError_Esperado
|
||||
SCATTER FIELDS Properties MEMO NAME loReg
|
||||
SCATTER FIELDS PROPERTIES MEMO NAME loReg
|
||||
DIMENSION laProps_Esperado(8)
|
||||
laProps_Esperado( 1) = 'ErasePage'
|
||||
laProps_Esperado( 2) = 'PageCount'
|
||||
@@ -548,27 +559,27 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
laProps_Esperado( 6) = 'Height'
|
||||
laProps_Esperado( 7) = 'Width'
|
||||
laProps_Esperado( 8) = 'Name'
|
||||
|
||||
|
||||
*-- TEST
|
||||
=ALINES(laProps, loReg.Properties)
|
||||
|
||||
this.messageout( 'L<>nea : Valor esperado => Valor actual' )
|
||||
this.messageout( REPLICATE('-',50) )
|
||||
=ALINES(laProps, loReg.PROPERTIES)
|
||||
|
||||
THIS.messageout( 'L<>nea : Valor esperado => Valor actual' )
|
||||
THIS.messageout( REPLICATE('-',50) )
|
||||
|
||||
FOR I = 1 TO ALEN(laProps_Esperado)
|
||||
lcProp = GETWORDNUM(laProps(I),1)
|
||||
this.messageout( 'L<>nea ' + TRANSFORM(I) + ': ' + laProps_Esperado(I) + ' => ' + lcProp )
|
||||
THIS.messageout( 'L<>nea ' + TRANSFORM(I) + ': ' + laProps_Esperado(I) + ' => ' + lcProp )
|
||||
ENDFOR
|
||||
|
||||
FOR I = 1 TO ALEN(laProps_Esperado)
|
||||
lcProp = GETWORDNUM(laProps(I),1)
|
||||
this.assertequals( laProps_Esperado(I), lcProp, 'Elemento (' + TRANSFORM(I) + ') del Memo Properties' )
|
||||
THIS.assertequals( laProps_Esperado(I), lcProp, 'Elemento (' + TRANSFORM(I) + ') del Memo Properties' )
|
||||
ENDFOR
|
||||
|
||||
*USE IN (SELECT("TABLABIN"))
|
||||
|
||||
*THIS.Evaluate_results( loEx, lnCodError_Esperado, lc_OutputFile, lcParent, lcClass, lcObjName ;
|
||||
, loReg_Esperado, loReg, lcTipoBinario )
|
||||
, loReg_Esperado, loReg, lcTipoBinario )
|
||||
|
||||
CATCH TO loEx
|
||||
THIS.Evaluate_results( loEx, lnCodError_Esperado, lc_OutputFile, lcParent, lcClass, lcObjName, loReg_Esperado )
|
||||
@@ -615,42 +626,50 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
SELECT 0
|
||||
USE (lc_OutputFile) SHARED AGAIN NOUPDATE ALIAS TABLABIN
|
||||
|
||||
LOCATE FOR ObjName = 'Optiongroup1' AND NOT DELETED() AND PLATFORM==PADR("WINDOWS",8)
|
||||
|
||||
this.assertequals( .T., FOUND(), 'No se ha encontrado el objeto "Optiongroup1" que se iba a testear' )
|
||||
LOCATE FOR objName = 'Optiongroup1' AND NOT DELETED() AND PLATFORM==PADR("WINDOWS",8)
|
||||
|
||||
THIS.assertequals( .T., FOUND(), 'No se ha encontrado el objeto "Optiongroup1" que se iba a testear' )
|
||||
|
||||
*-- DATOS ESPERADOS
|
||||
STORE 0 TO lnCodError_Esperado
|
||||
SCATTER FIELDS Properties MEMO NAME loReg
|
||||
SCATTER FIELDS PROPERTIES MEMO NAME loReg
|
||||
DIMENSION laProps_Esperado(7)
|
||||
*laProps_Esperado( 1) = 'ButtonCount'
|
||||
*laProps_Esperado( 2) = 'Value'
|
||||
*laProps_Esperado( 3) = 'Top'
|
||||
*laProps_Esperado( 4) = 'Left'
|
||||
*laProps_Esperado( 5) = 'Height'
|
||||
*laProps_Esperado( 6) = 'Width'
|
||||
*laProps_Esperado( 7) = 'Name'
|
||||
*-- 13/05/2014. v1.19.22 - Reordenamiento de todas propiedades
|
||||
laProps_Esperado( 1) = 'ButtonCount'
|
||||
laProps_Esperado( 2) = 'Value'
|
||||
laProps_Esperado( 3) = 'Top'
|
||||
laProps_Esperado( 3) = 'Height'
|
||||
laProps_Esperado( 4) = 'Left'
|
||||
laProps_Esperado( 5) = 'Height'
|
||||
laProps_Esperado( 5) = 'Top'
|
||||
laProps_Esperado( 6) = 'Width'
|
||||
laProps_Esperado( 7) = 'Name'
|
||||
|
||||
|
||||
*-- TEST
|
||||
=ALINES(laProps, loReg.Properties)
|
||||
|
||||
this.messageout( 'L<>nea : Valor esperado => Valor actual' )
|
||||
this.messageout( REPLICATE('-',50) )
|
||||
=ALINES(laProps, loReg.PROPERTIES)
|
||||
|
||||
THIS.messageout( 'L<>nea : Valor esperado => Valor actual' )
|
||||
THIS.messageout( REPLICATE('-',50) )
|
||||
|
||||
FOR I = 1 TO ALEN(laProps_Esperado)
|
||||
lcProp = GETWORDNUM(laProps(I),1)
|
||||
this.messageout( 'L<>nea ' + TRANSFORM(I) + ': ' + laProps_Esperado(I) + ' => ' + lcProp )
|
||||
THIS.messageout( 'L<>nea ' + TRANSFORM(I) + ': ' + laProps_Esperado(I) + ' => ' + lcProp )
|
||||
ENDFOR
|
||||
|
||||
FOR I = 1 TO ALEN(laProps_Esperado)
|
||||
lcProp = GETWORDNUM(laProps(I),1)
|
||||
this.assertequals( laProps_Esperado(I), lcProp, 'Elemento (' + TRANSFORM(I) + ') del Memo Properties' )
|
||||
THIS.assertequals( laProps_Esperado(I), lcProp, 'Elemento (' + TRANSFORM(I) + ') del Memo Properties' )
|
||||
ENDFOR
|
||||
|
||||
*USE IN (SELECT("TABLABIN"))
|
||||
|
||||
*THIS.Evaluate_results( loEx, lnCodError_Esperado, lc_OutputFile, lcParent, lcClass, lcObjName ;
|
||||
, loReg_Esperado, loReg, lcTipoBinario )
|
||||
, loReg_Esperado, loReg, lcTipoBinario )
|
||||
|
||||
CATCH TO loEx
|
||||
THIS.Evaluate_results( loEx, lnCodError_Esperado, lc_OutputFile, lcParent, lcClass, lcObjName, loReg_Esperado )
|
||||
@@ -700,7 +719,7 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
SELECT 0
|
||||
USE (lc_InputFile) SHARED AGAIN NOUPDATE ALIAS ARCHIVOBIN_IN
|
||||
|
||||
SCAN ALL FOR NOT DELETED() AND ( UNIQUEID==PADR('Class',10) OR PLATFORM==PADR("WINDOWS",8) )
|
||||
SCAN ALL FOR NOT DELETED() AND ( UniqueID==PADR('Class',10) OR PLATFORM==PADR("WINDOWS",8) )
|
||||
*-- DATOS ESPERADOS
|
||||
STORE 0 TO lnCodError_Esperado
|
||||
SCATTER MEMO NAME loReg_Esperado
|
||||
@@ -717,9 +736,9 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
ENDIF
|
||||
|
||||
IF EMPTY(lcParent) AND EMPTY(lcClass) AND EMPTY(lcObjName)
|
||||
LOCATE FOR PLATFORM==PADR("COMMENT",8) AND UNIQUEID==PADR("Class",10)
|
||||
LOCATE FOR PLATFORM==PADR("COMMENT",8) AND UniqueID==PADR("Class",10)
|
||||
IF NOT FOUND()
|
||||
ERROR 'No se encontr<74> el registro de cabecera "' + UNIQUEID + '"'
|
||||
ERROR 'No se encontr<74> el registro de cabecera "' + UniqueID + '"'
|
||||
ENDIF
|
||||
ELSE
|
||||
LOCATE FOR LOWER(CLASS)==lcClass AND LOWER(PARENT)==lcParent AND LOWER(objName)==lcObjName
|
||||
@@ -782,7 +801,7 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
SELECT 0
|
||||
USE (lc_InputFile) SHARED AGAIN NOUPDATE ALIAS ARCHIVOBIN_IN
|
||||
|
||||
SCAN ALL FOR NOT DELETED() AND ( UNIQUEID==PADR('Class',10) OR PLATFORM==PADR("WINDOWS",8) )
|
||||
SCAN ALL FOR NOT DELETED() AND ( UniqueID==PADR('Class',10) OR PLATFORM==PADR("WINDOWS",8) )
|
||||
*-- DATOS ESPERADOS
|
||||
STORE 0 TO lnCodError_Esperado
|
||||
SCATTER MEMO NAME loReg_Esperado
|
||||
@@ -799,9 +818,9 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
ENDIF
|
||||
|
||||
IF EMPTY(lcParent) AND EMPTY(lcClass) AND EMPTY(lcObjName)
|
||||
LOCATE FOR PLATFORM==PADR("COMMENT",8) AND UNIQUEID==PADR("Class",10)
|
||||
LOCATE FOR PLATFORM==PADR("COMMENT",8) AND UniqueID==PADR("Class",10)
|
||||
IF NOT FOUND()
|
||||
ERROR 'No se encontr<74> el registro de cabecera "' + UNIQUEID + '"'
|
||||
ERROR 'No se encontr<74> el registro de cabecera "' + UniqueID + '"'
|
||||
ENDIF
|
||||
ELSE
|
||||
LOCATE FOR LOWER(CLASS)==lcClass AND LOWER(PARENT)==lcParent AND LOWER(objName)==lcObjName
|
||||
@@ -864,7 +883,7 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
SELECT 0
|
||||
USE (lc_InputFile) SHARED AGAIN NOUPDATE ALIAS ARCHIVOBIN_IN
|
||||
|
||||
SCAN ALL FOR NOT DELETED() AND ( UNIQUEID==PADR('Class',10) OR PLATFORM==PADR("WINDOWS",8) )
|
||||
SCAN ALL FOR NOT DELETED() AND ( UniqueID==PADR('Class',10) OR PLATFORM==PADR("WINDOWS",8) )
|
||||
*-- DATOS ESPERADOS
|
||||
STORE 0 TO lnCodError_Esperado
|
||||
SCATTER MEMO NAME loReg_Esperado
|
||||
@@ -881,9 +900,9 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
ENDIF
|
||||
|
||||
IF EMPTY(lcParent) AND EMPTY(lcClass) AND EMPTY(lcObjName)
|
||||
LOCATE FOR PLATFORM==PADR("COMMENT",8) AND UNIQUEID==PADR("Class",10)
|
||||
LOCATE FOR PLATFORM==PADR("COMMENT",8) AND UniqueID==PADR("Class",10)
|
||||
IF NOT FOUND()
|
||||
ERROR 'No se encontr<74> el registro de cabecera "' + UNIQUEID + '"'
|
||||
ERROR 'No se encontr<74> el registro de cabecera "' + UniqueID + '"'
|
||||
ENDIF
|
||||
ELSE
|
||||
LOCATE FOR LOWER(CLASS)==lcClass AND LOWER(PARENT)==lcParent AND LOWER(objName)==lcObjName
|
||||
@@ -911,4 +930,437 @@ DEFINE CLASS ut__foxbin2prg AS FxuTestCase OF FxuTestCase.prg
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Evaluate_Bitmap_Test
|
||||
LPARAMETERS tcTestName, tcControlName, tcFormName
|
||||
|
||||
IF PCOUNT() = 0
|
||||
THIS.messageout( "* Support method, not a valid test." )
|
||||
RETURN .T.
|
||||
ENDIF
|
||||
|
||||
LOCAL lnCodError, lnCodError_Esperado ;
|
||||
, lc_File, lcFile2, lc_OutputFile, lcTipoBinario, lcLib, lcBMP0, lcBMP1 ;
|
||||
, lcParent, lcClass, lcObjName, loReg_Esperado ;
|
||||
, loCtl AS f_optiongroup OF "TESTS\DATOS_READONLY\LIB_CONTROLES.VCX" ;
|
||||
, loCnv AS c_foxbin2prg OF "FOXBIN2PRG.PRG" ;
|
||||
, loEx AS EXCEPTION
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
TRY
|
||||
loEx = NULL
|
||||
loCnv = NEWOBJECT("c_foxbin2prg", "FOXBIN2PRG.PRG")
|
||||
loCnv.EvaluarConfiguracion( '', '', '', '1', '1', '4' )
|
||||
*loCnv.n_ExtraBackupLevels = 4
|
||||
*loCnv.l_Debug = .T.
|
||||
*loCnv.l_ShowErrors = .F.
|
||||
*loCnv.l_Test = .T.
|
||||
|
||||
|
||||
*-- DATOS DE ENTRADA
|
||||
STORE 0 TO lnCodError, lnCodError_Esperado
|
||||
|
||||
lcTipoBinario = EVL( UPPER(JUSTEXT(EVL(tcFormName,''))), 'VCX' )
|
||||
|
||||
*-- Copio la librer<65>a en DATOS_TEST
|
||||
lcLib = FORCEPATH( "LIB_CONTROLES.VCX", oFXU_LIB.cPathDatosTest )
|
||||
lc_File2 = 'LIB_CONTROLES.VCX'
|
||||
lc_OutputFile = FORCEPATH( lc_File2, oFXU_LIB.cPathDatosTest )
|
||||
|
||||
IF lcTipoBinario = 'SCX'
|
||||
lc_File = UPPER(tcFormName)
|
||||
lc_OutputFile = FORCEPATH( lc_File, oFXU_LIB.cPathDatosTest )
|
||||
ENDIF
|
||||
|
||||
loCnv.l_NoTimestamps = .F.
|
||||
loCnv.l_ClearUniqueID = .F.
|
||||
|
||||
IF lcTipoBinario = 'SCX'
|
||||
oFXU_LIB.copiarArchivosParaTest( FORCEEXT( lc_File, LEFT( JUSTEXT(lc_File),2 ) + 'X' ) )
|
||||
oFXU_LIB.copiarArchivosParaTest( FORCEEXT( lc_File, LEFT( JUSTEXT(lc_File),2 ) + 'T' ) )
|
||||
ENDIF
|
||||
|
||||
oFXU_LIB.copiarArchivosParaTest( FORCEEXT( lc_File2, LEFT( JUSTEXT(lc_File2),2 ) + 'X' ) )
|
||||
oFXU_LIB.copiarArchivosParaTest( FORCEEXT( lc_File2, LEFT( JUSTEXT(lc_File2),2 ) + 'T' ) )
|
||||
|
||||
*-- Genero BMP con libreria ORIGINAL
|
||||
SET CLASSLIB TO (lcLib) ADDITIVE
|
||||
IF lcTipoBinario = 'SCX'
|
||||
DO FORM (lc_OutputFile) NAME loCtl LINKED NOSHOW
|
||||
ELSE
|
||||
loCtl = CREATEOBJECT( tcControlName )
|
||||
ENDIF
|
||||
loCtl.c_testname = tcTestName + '_0'
|
||||
IF loCtl.BaseClass = 'Formset'
|
||||
loCtl.Forms(1).ALWAYSONTOP= .T.
|
||||
loCtl.SHOW()
|
||||
loCtl.REFRESH()
|
||||
ELSE
|
||||
loCtl.ALWAYSONTOP= .T.
|
||||
loCtl.SHOW()
|
||||
ENDIF
|
||||
loCtl.HIDE()
|
||||
loCtl.RELEASE()
|
||||
loCtl = NULL
|
||||
RELEASE CLASSLIB (lcLib)
|
||||
CLEAR CLASSLIB (lcLib)
|
||||
|
||||
*-- Genero TX2
|
||||
loCnv.Ejecutar( lc_OutputFile, .F., .F., .F., '1', '0', '1', '', '', .T., '', SYS(5)+CURDIR(), '1', '0' )
|
||||
|
||||
*-- Genero BIN
|
||||
loCnv.Ejecutar( FORCEEXT(lc_OutputFile, LEFT( JUSTEXT(lc_OutputFile),2 ) + '2' ), .F., .F., .F., '1', '0', '1', '', '', .T., '', SYS(5)+CURDIR(), '1', '0' )
|
||||
|
||||
*-- Genero TX2
|
||||
loCnv.Ejecutar( lc_OutputFile, .F., .F., .F., '1', '0', '1', '', '', .T., '', SYS(5)+CURDIR(), '1', '0' )
|
||||
|
||||
*-- Genero BIN
|
||||
loCnv.Ejecutar( FORCEEXT(lc_OutputFile, LEFT( JUSTEXT(lc_OutputFile),2 ) + '2' ), .F., .F., .F., '1', '0', '1', '', '', .T., '', SYS(5)+CURDIR(), '1', '0' )
|
||||
|
||||
*-- Genero BMP con libreria regenerada
|
||||
SET CLASSLIB TO (lcLib) ADDITIVE
|
||||
IF lcTipoBinario = 'SCX'
|
||||
DO FORM (lc_OutputFile) NAME loCtl LINKED NOSHOW
|
||||
ELSE
|
||||
loCtl = CREATEOBJECT( tcControlName )
|
||||
ENDIF
|
||||
loCtl.c_testname = tcTestName + '_1'
|
||||
IF loCtl.BaseClass = 'Formset'
|
||||
loCtl.Forms(1).ALWAYSONTOP= .T.
|
||||
loCtl.SHOW()
|
||||
loCtl.REFRESH()
|
||||
ELSE
|
||||
loCtl.ALWAYSONTOP= .T.
|
||||
loCtl.SHOW()
|
||||
ENDIF
|
||||
loCtl.HIDE()
|
||||
loCtl.RELEASE()
|
||||
loCtl = NULL
|
||||
RELEASE CLASSLIB (lcLib)
|
||||
CLEAR CLASSLIB (lcLib)
|
||||
|
||||
*-- Comparo resultados
|
||||
lcBMP0 = FORCEPATH( tcTestName + '_0.bmp', oFXU_LIB.cPathDatosTest )
|
||||
lcBMP1 = FORCEPATH( tcTestName + '_1.bmp', oFXU_LIB.cPathDatosTest )
|
||||
|
||||
THIS.messageout( "Se comparan bitmaps de pantalla, para saber si hay cambios est<73>ticos y detectar fallos al ensamblar el binario" )
|
||||
THIS.messageout( "lcBMP0 = " + lcBMP0 )
|
||||
THIS.messageout( "lcBMP1 = " + lcBMP1 )
|
||||
THIS.asserttrue( FILETOSTR( lcBMP0 ) == FILETOSTR( lcBMP1 ), "COMPARACI<43>N DE BITMAPS" )
|
||||
|
||||
|
||||
CATCH TO loEx
|
||||
THIS.Evaluate_results( loEx, lnCodError_Esperado, lc_OutputFile, lcParent, lcClass, lcObjName, loReg_Esperado )
|
||||
|
||||
FINALLY
|
||||
* USE IN (SELECT("ARCHIVOBIN_IN"))
|
||||
* USE IN (SELECT("TABLABIN"))
|
||||
STORE NULL TO loCnv, loCtl
|
||||
ENDTRY
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaLaClase__LIB_CONTROLES__F_OptionGroup__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'OptionGroup_Test', 'f_OptionGroup', '' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_OptionGroup__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'OptionGroup_Test', 'f_OptionGroup', 'F_OPTIONGROUP.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaLaClase__LIB_CONTROLES__F_Checkbox__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Checkbox_Test', 'f_Checkbox', '' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_Checkbox__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Checkbox_Test', 'f_Checkbox', 'F_CHECKBOX.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaLaClase__LIB_CONTROLES__F_Textbox__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Textbox_Test', 'f_Textbox', '' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_Textbox__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Textbox_Test', 'f_Textbox', 'F_TEXTBOX.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaLaClase__LIB_CONTROLES__F_Combobox__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Combobox_Test', 'f_Combobox', '' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_Combobox__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Combobox_Test', 'f_Combobox', 'F_Combobox.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaLaClase__LIB_CONTROLES__F_CommandGroup__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'CommandGroup_Test', 'f_CommandGroup', '' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_CommandGroup__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'CommandGroup_Test', 'f_CommandGroup', 'F_CommandGroup.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaLaClase__LIB_CONTROLES__F_ListBox__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'ListBox_Test', 'f_ListBox', '' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_ListBox__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'ListBox_Test', 'f_ListBox', 'F_ListBox.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaLaClase__LIB_CONTROLES__F_Form_Controles__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Form_Controles_Test', 'f_Form_Controles', '' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_Form_Controles__YValidarLaVisualizacionDePantalla
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Form_Controles_Test', 'f_Form_Controles', 'F_Form_Controles.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_Formset__YValidarLaVisualizacionDePantalla
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
oFXU_LIB.copiarArchivosParaTest( 'encuestas.*' )
|
||||
THIS.evaluate_bitmap_test( 'Formset_Test', 'f_Formset', 'F_Formset.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_Form_AA__YValidarLaVisualizacionDePantalla
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
IF NOT DIRECTORY( ADDBS(oFXU_LIB.cPathDatosTest) + 'bmps' )
|
||||
MKDIR ( ADDBS(oFXU_LIB.cPathDatosTest) + 'bmps' )
|
||||
ENDIF
|
||||
COPY FILE ( ADDBS(oFXU_LIB.cPathDatosReadOnly) + 'bmps\*.*' ) TO ( ADDBS(oFXU_LIB.cPathDatosTest) + 'bmps\*.*' )
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Form_Test_Eventos_y_Controles', 'f_Form_AA', 'F_Form_AA.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_ParaElForm__F_Form_AA2__YValidarLaVisualizacionDePantalla
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
IF NOT DIRECTORY( ADDBS(oFXU_LIB.cPathDatosTest) + 'bmps' )
|
||||
MKDIR ( ADDBS(oFXU_LIB.cPathDatosTest) + 'bmps' )
|
||||
ENDIF
|
||||
COPY FILE ( ADDBS(oFXU_LIB.cPathDatosReadOnly) + 'bmps\*.*' ) TO ( ADDBS(oFXU_LIB.cPathDatosTest) + 'bmps\*.*' )
|
||||
|
||||
THIS.evaluate_bitmap_test( 'Form_Test_Eventos_y_Controles2', 'f_Form_AA2', 'F_Form_AA2.SCX' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Evaluate_TX2_Output_Test
|
||||
LPARAMETERS tcFileName
|
||||
|
||||
IF PCOUNT() = 0
|
||||
THIS.messageout( "* Support method, not a valid test." )
|
||||
RETURN .T.
|
||||
ENDIF
|
||||
|
||||
LOCAL lnCodError, lnCodError_Esperado ;
|
||||
, lc_File, lc_OutputFile, lc_OutputFileTx2, lc_OutputFileBak, lcExt2 ;
|
||||
, lcParent, lcClass, lcObjName, loReg_Esperado ;
|
||||
, loCtl AS f_optiongroup OF "TESTS\DATOS_READONLY\LIB_CONTROLES.VCX" ;
|
||||
, loCnv AS c_foxbin2prg OF "FOXBIN2PRG.PRG" ;
|
||||
, loEx AS EXCEPTION
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
TRY
|
||||
loEx = NULL
|
||||
loCnv = NEWOBJECT("c_foxbin2prg", "FOXBIN2PRG.PRG")
|
||||
loCnv.EvaluarConfiguracion( '', '', '1', '1', '1', '4', '1', '0' )
|
||||
*loCnv.l_Test = .T.
|
||||
|
||||
|
||||
*-- DATOS DE ENTRADA
|
||||
STORE 0 TO lnCodError, lnCodError_Esperado
|
||||
|
||||
*-- Copio la librer<65>a en DATOS_TEST
|
||||
lc_File = UPPER(tcFileName)
|
||||
lcExt2 = loCnv.Get_Ext2FromExt( JUSTEXT( tcFileName ) )
|
||||
lc_OutputFile = FORCEPATH( lc_File, oFXU_LIB.cPathDatosTest )
|
||||
lc_OutputFileTx2 = FORCEEXT( FORCEPATH( lc_File, oFXU_LIB.cPathDatosTest ), lcExt2 )
|
||||
lc_OutputFileBak = lc_OutputFileTx2 + '.bak'
|
||||
|
||||
oFXU_LIB.copiarArchivosParaTest( FORCEEXT( lc_File, LEFT( JUSTEXT(lc_File),2 ) + '?' ) )
|
||||
COPY FILE (lc_OutputFileTx2) TO (lc_OutputFileBak)
|
||||
|
||||
*-- Genero TX2
|
||||
loCnv.Ejecutar( lc_OutputFile, .F., .F., .F., '1', '0', '1', '', '', .T., '', SYS(5)+CURDIR() )
|
||||
|
||||
*-- Genero BIN
|
||||
loCnv.Ejecutar( FORCEEXT(lc_OutputFile, LEFT( JUSTEXT(lc_OutputFile),2 ) + '2' ), .F., .F., .F., '1', '0', '1', '', '', .T., '', SYS(5)+CURDIR() )
|
||||
|
||||
*-- Genero TX2
|
||||
loCnv.Ejecutar( lc_OutputFile, .F., .F., .F., '1', '0', '1', '', '', .T., '', SYS(5)+CURDIR() )
|
||||
|
||||
*-- Comparo resultados
|
||||
THIS.messageout( "Se compara el archivo de texto generado con el original luego de 2 regeneraciones, para saber si hay cambios" )
|
||||
THIS.messageout( "OutputFileTx2 = " + lc_OutputFileTx2 )
|
||||
THIS.messageout( "OutputFileBak = " + lc_OutputFileBak )
|
||||
THIS.asserttrue( FILETOSTR( lc_OutputFileTx2 ) == FILETOSTR( lc_OutputFileBak ), "COMPARACI<43>N DE ARCHIVOS TX2" )
|
||||
|
||||
|
||||
CATCH TO loEx
|
||||
THIS.Evaluate_results( loEx, lnCodError_Esperado, lc_OutputFile, lcParent, lcClass, lcObjName, loReg_Esperado )
|
||||
|
||||
FINALLY
|
||||
* USE IN (SELECT("ARCHIVOBIN_IN"))
|
||||
* USE IN (SELECT("TABLABIN"))
|
||||
STORE NULL TO loCnv, loCtl
|
||||
ENDTRY
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_Para__test_public_protected_vcx__ValidarEl_VC2_GeneradoConElOriginal_Y_NoEncontrarDiferencias
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
THIS.Evaluate_TX2_Output_Test( 'test_public_protected.vcx' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_Para__test_report_frx__ValidarEl_FR2_GeneradoConElOriginal_Y_NoEncontrarDiferencias
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
THIS.Evaluate_TX2_Output_Test( 'test_report.frx' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_Para__Menu_LineBreak_mnx__ValidarEl_MN2_GeneradoConElOriginal_Y_NoEncontrarDiferencias
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
THIS.Evaluate_TX2_Output_Test( 'Menu_LineBreak.mnx' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_Para__Menu_Comments_Procedure_mnx__ValidarEl_MN2_GeneradoConElOriginal_Y_NoEncontrarDiferencias
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
THIS.Evaluate_TX2_Output_Test( 'Menu_Comments_Procedure.mnx' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_Para__Lib_Controles_vcx__ValidarEl_MN2_GeneradoConElOriginal_Y_NoEncontrarDiferencias
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
THIS.Evaluate_TX2_Output_Test( 'Lib_Controles.vcx' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_Para__f_form_aa_scx__ValidarEl_MN2_GeneradoConElOriginal_Y_NoEncontrarDiferencias
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
THIS.Evaluate_TX2_Output_Test( 'f_form_aa.scx' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
*******************************************************************************************************************************************
|
||||
FUNCTION Deberia_Ejecutar_FOXBIN2PRG_Para__f_form_aa2_scx__ValidarEl_MN2_GeneradoConElOriginal_Y_NoEncontrarDiferencias
|
||||
#IF .F.
|
||||
PUBLIC oFXU_LIB AS CL_FXU_CONFIG OF 'TESTS\fxu_lib_objetos_y_funciones_de_soporte.PRG'
|
||||
#ENDIF
|
||||
|
||||
THIS.Evaluate_TX2_Output_Test( 'f_form_aa2.scx' )
|
||||
|
||||
ENDFUNC
|
||||
|
||||
|
||||
ENDDEFINE
|
||||
|
||||
2406
TESTS/ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion.prg
Normal file
2406
TESTS/ut__foxbin2prg__c_foxbin2prg__EvaluarConfiguracion.prg
Normal file
File diff suppressed because it is too large
Load Diff
4
change_file_type.bat
Normal file
4
change_file_type.bat
Normal file
@@ -0,0 +1,4 @@
|
||||
FOR /F "tokens=*" %%i IN ('dir /S /B *.prg') DO cm chgrevtype %%i -type=txt
|
||||
FOR /F "tokens=*" %%i IN ('dir /S /B *.??2') DO cm chgrevtype %%i -type=txt
|
||||
FOR /F "tokens=*" %%i IN ('dir /S /B *.??a') DO cm chgrevtype %%i -type=txt
|
||||
FOR /F "tokens=*" %%i IN ('dir /S /B *.cfg*') DO cm chgrevtype %%i -type=txt
|
||||
23
clean_copied_memo.prg
Normal file
23
clean_copied_memo.prg
Normal file
@@ -0,0 +1,23 @@
|
||||
LOCAL I, lcStrIn, lcStrOut, laStr(1), lcLeftDelim, lcRightDelim, lcStr, lnLines, lnPosDlr
|
||||
ON KEY LABEL CTRL+R DO clean_copied_memo.prg
|
||||
lcStrOut = ''
|
||||
lcStrIn = _CLIPTEXT
|
||||
lnLines = ALINES(laStr, lcStrIn)
|
||||
lnPosDlr = AT('.',laStr(1))
|
||||
|
||||
*--
|
||||
lcLeftDelim = IIF(lnPosDlr > 0 AND lnPosDlr < AT('=', laStr(1)), LEFT(laStr(1), lnPosDlr), '')
|
||||
lcRightDelim = ' ='
|
||||
*--
|
||||
MESSAGEBOX( "LeftDelim = " + lcLeftDelim)
|
||||
|
||||
FOR I = 1 TO lnLines
|
||||
lcStr = STREXTRACT( laStr(I), lcLeftDelim, lcRightDelim )
|
||||
*IF EMPTY(lcStr)
|
||||
* lcStr = STREXTRACT( laStr(I), '', lcRightDelim )
|
||||
*ENDIF
|
||||
laStr(I) = lcStr
|
||||
lcStrOut = lcStrOut + CHR(13) + laStr(I)
|
||||
ENDFOR
|
||||
|
||||
_CLIPTEXT = SUBSTR( lcStrOut, 2 )
|
||||
23
filename_caps.cfg
Normal file
23
filename_caps.cfg
Normal file
@@ -0,0 +1,23 @@
|
||||
*--------------------------------------------------------------------------------------
|
||||
* FILENAME_CAPS.CFG
|
||||
*
|
||||
* FORMATO DE M<>SCARAS:
|
||||
* --------------------
|
||||
* filemask=Filename.Ext:FilenameCAP.ExtCAP
|
||||
* Donde: Filename ==> Es el nombre del archivo
|
||||
* Ext ==> Es la extensi<73>n
|
||||
* FilenameCAP ==> (U)ppercase, (L)owercase, (P)roper, (M)atch, (N)one
|
||||
* ExtCAP ==> (U)ppercase, (L)owercase, (P)roper, (M)atch, (N)one
|
||||
*
|
||||
* EJEMPLOS DE M<>SCARAS:
|
||||
* ---------------------
|
||||
* filemask=*.PDF:U.L ==> Convierte los archivos PDF a <NOMBREARCHIVO.pdf>
|
||||
* filemask=*.DOT:L.U ==> Convierte los archivos DOT a <nombrearchivo.DOT>
|
||||
* filemask=*.PRG:C.L ==> Convierte un archivo espec<65>fico a <Nombrearchivo.ini>
|
||||
* filemask=EJEMPLO.ini:C.U ==> Convierte un archivo espec<65>fico a <Ejemplo.INI>
|
||||
*
|
||||
* IMPORTANTE:
|
||||
* -----------
|
||||
* LAS CONVERSIONES SE REALIZAN EN EL ORDEN QUE SE PONGAN, COMENZANDO POR ARRIBA.
|
||||
*--------------------------------------------------------------------------------------
|
||||
filemask=*.*:N.L
|
||||
BIN
filename_caps.exe
Normal file
BIN
filename_caps.exe
Normal file
Binary file not shown.
17
filetypes.conf
Normal file
17
filetypes.conf
Normal file
@@ -0,0 +1,17 @@
|
||||
# PlasticSCM custom file types.
|
||||
# Syntax: <extension>:<type>
|
||||
# Type can be 'txt' or 'bin'.
|
||||
# Examples:
|
||||
# .cpp:txt
|
||||
# .jpg:bin
|
||||
.cfg_:txt
|
||||
.cfg:txt
|
||||
.prg:txt
|
||||
.pj2:txt
|
||||
.vc2:txt
|
||||
.sc2:txt
|
||||
.fr2:txt
|
||||
.lb2:txt
|
||||
.db2:txt
|
||||
.dc2:txt
|
||||
.mn2:txt
|
||||
@@ -14,6 +14,7 @@
|
||||
* Debug: 0 && Don't Activate individual <file>.Log by default / No Activar <archivo>.Log por defecto
|
||||
* ExtraBackupLevels: 0 && By default 1 BAK is created. With this you can make more .N.BAK, or none / Por defecto 1 BAK es creado. Con esto puede crear m<>s .N.BAK, o ninguno
|
||||
* ClearUniqueID: 0 && EXPERIMENTAL! - 0=Keep UniqueID, 1=Clear Unique ID. Useful for Diff and Merge / 0=Mantener UniqueID, 1=Borrar Unique ID. Util para Diff y Merge
|
||||
* OptimizeByFilestamp: 1 && Optimize file regeneration depending on file timestamp / Optimizar la regeneraci<63>n de archivos dependiendo del timestamp de archivo
|
||||
* XXX_Conversion_Support: N && 0=No support, 1=Generate TXT only (Diff), 2=Generate TXT and BIN (Merge)
|
||||
* PJX_Conversion_Support: 2 && Default value
|
||||
* VCX_Conversion_Support: 2 && Default value
|
||||
@@ -54,6 +55,7 @@
|
||||
*Debug: 1
|
||||
*ExtraBackupLevels: 3
|
||||
ClearUniqueID: 1
|
||||
*OptimizeByFilestamp: 0
|
||||
|
||||
|
||||
* EN: Uncomment to activate the new value, comment to deactivate and use the default
|
||||
|
||||
@@ -23,10 +23,10 @@ _CompanyName = "Fernando D. Bozzo"
|
||||
_FileDescription = "Conversor bidireccional de binarios FoxPro 9 (scx,vcx,pjx) a texto para sustituir al scctext :-)"
|
||||
_LegalCopyright = "Creative Commons 4: Reconocimiento - CompartirIgual (by-sa): http://creativecommons.org/licenses/by/4.0/"
|
||||
_LegalTrademark = "Creative Commons 4: Reconocimiento - CompartirIgual (by-sa): http://creativecommons.org/licenses/by/4.0/"
|
||||
_ProductName = " FOXBIN2PRG v1.19.20"
|
||||
_ProductName = " FOXBIN2PRG v1.19.22"
|
||||
_MajorVer = "1"
|
||||
_MinorVer = "19"
|
||||
_Revision = " 319"
|
||||
_Revision = " 336"
|
||||
_LanguageID = "1034"
|
||||
_AutoIncrement = "1"
|
||||
*</DevInfo>
|
||||
@@ -52,12 +52,52 @@ loProject = _VFP.Projects('foxbin2prg.pjx')
|
||||
WITH loProject.FILES
|
||||
.ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('foxbin2prg.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" />
|
||||
.ADD('props_all.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_checkbox.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_collection.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_combobox.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_commandbutton.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_commandgroup.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_container.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_control.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_cursor.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_cursoradapter.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_dataenvironment.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_editbox.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_form.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_formset.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_grid.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_grid_column.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_grid_header.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_hyperlink.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_image.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_label.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_line.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_listbox.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_olebound.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_optiongroup.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_optiongroup_option.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_pageframe.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_pageframe_page.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_projecthook.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_relation.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_reportlistener.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_separator.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_shape.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_spinner.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_textbox.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_timer.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_toolbar.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_xmladapter.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_xmlfield.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
.ADD('props_xmltable.txt') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" />
|
||||
*</BuildProj>
|
||||
|
||||
.ITEM('__newproject.f2b').Remove()
|
||||
|
||||
*<FileComments>
|
||||
.ITEM(lcCurdir + 'foxbin2prg.prg').Description = 'Conversor'
|
||||
.ITEM(lcCurdir + 'props_all.txt').Description = 'All properties from all VFP classes'
|
||||
*</FileComments>
|
||||
|
||||
*<ExcludedFiles>
|
||||
|
||||
@@ -1,29 +0,0 @@
|
||||
Version= 1.20
|
||||
Author=Fernando D. Bozzo
|
||||
Company=
|
||||
Address=
|
||||
City=Madrid
|
||||
State=
|
||||
Zip=
|
||||
Country=Spain
|
||||
SaveCode=.T.
|
||||
Debug=.T.
|
||||
Encrypt=.F.
|
||||
NoLogo=.F.
|
||||
CommentStyle=1
|
||||
Comments=
|
||||
CompanyName=
|
||||
FileDescription=
|
||||
LegalCopyright=
|
||||
LegalTrademarks=
|
||||
ProductName=
|
||||
Major=1
|
||||
Minor=0
|
||||
Revision= 2
|
||||
AutoIncrement=.T.
|
||||
[OLEServers]
|
||||
[OLEServersEnd]
|
||||
[ProjectFiles]
|
||||
1130644423,P,foxbin2prg.prg,.F.,.T.,1252,,,Conversor
|
||||
1131721714,T,config\config.fpw,.F.,.F.,1252,,,
|
||||
[EOF]
|
||||
BIN
foxbin2prg.pjt
BIN
foxbin2prg.pjt
Binary file not shown.
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user