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

Changeset: 274 fdbozzo - 05/06/2014 00:56:08:

Browse Source
This commit is contained in:
fdbozzo
2014-06-05 01:02:02 +02:00
parent df38ebfaa2
commit af503166b7
5 changed files with 10 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
TESTS/DATOS_READONLY/f_form_aa.sc2
View File

@@ -1978,7 +1978,7 @@ DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx"
ENDIF ENDIF
loCtl.ControlSource = '' loCtl.ControlSource = ''
CASE loCtl.Baseclass == 'Option' CASE loCtl.Baseclass == 'Optionbutton'
.valor = 2 .valor = 2
loCtl.ControlSource = 'THISFORM.valor' loCtl.ControlSource = 'THISFORM.valor'
IF loCtl.Value = .valor IF loCtl.Value = .valor

BIN
TESTS/DATOS_READONLY/f_form_aa.sct
View File

Binary file not shown.

BIN
TESTS/DATOS_READONLY/f_form_aa.scx
View File

Binary file not shown.

10
TESTS/DATOS_READONLY/lib_controles.vc2
View File

@@ -5848,7 +5848,7 @@ DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx"
DisabledItemBackColor = 255,255,255, ; DisabledItemBackColor = 255,255,255, ;
DisabledItemForeColor = 109,109,109, ; DisabledItemForeColor = 109,109,109, ;
DisplayCount = 0, ; DisplayCount = 0, ;
DisplayValue = , ; DisplayValue = combobox, ;
DragIcon = ..\..\, ; DragIcon = ..\..\, ;
DragMode = 0, ; DragMode = 0, ;
Enabled = .T., ; Enabled = .T., ;
@@ -6854,6 +6854,14 @@ DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx"
ENDIF ENDIF
loCtl.ControlSource = '' loCtl.ControlSource = ''
CASE loCtl.Baseclass == 'Optionbutton'
.valor = 2
loCtl.ControlSource = 'THISFORM.valor'
IF loCtl.Value = .valor
REPLACE c_Value WITH "S"
ENDIF
loCtl.ControlSource = ''
CASE loCtl.Baseclass == 'Spinner' CASE loCtl.Baseclass == 'Spinner'
.valor = 123 .valor = 123
loCtl.ControlSource = 'THISFORM.valor' loCtl.ControlSource = 'THISFORM.valor'

BIN
TESTS/DATOS_READONLY/lib_controles.vct
View File

Binary file not shown.