Changeset: 246 fdbozzo - 16/05/2014 17:15:04:
This commit is contained in:
fdbozzo
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
|
||||
Reference in New Issue
Block a user