Hello Francesco,
thanks for the test application. Now, I know what your problem is. If you
change your code as below
then all works like you want. The changed code is marked with '->'.
METHOD CellEdit(oEvent) CLASS Test
LOCAL oColumn AS bDataColumn
LOCAL oCell AS bCell
IF oEvent:EditMode=BEDIT_CREATE
oColumn := oEvent:Control:GetOpenColumn(oEvent:EditCell:Column)
IF oColumn:FieldSym==#STATUS
oCell := oEvent:EditCell
oEvent:EditControl := oEvent:Control:EditCreate(oCell:Column,;
oCell:Row,;
oCell:RecNo,;
#ComboBox,;
->
WS_CHILD+WS_TABSTOP+CBS_AUTOHSCROLL+CBS_SORT,;
BOXDROPDOWNLIST)
ENDIF
ENDIF
RETURN NIL
Regards
Joachim Bieler
Infoservice schrieb:
> "Joachim Bieler" <sup****t@[EMAIL PROTECTED]
> ha scritto nel messaggio
> news:67lriuF2ojnvnU1@[EMAIL PROTECTED]
>> Francesco,
>>
>>> I prepare a sample and send to you...............
>> Please note that I am in vacation from 01.05. - 12.05.2008. So that I
can
>> have a look at your test program, I need it until tomorrow. Otherwise I
>> will be able to have a look at it only after my vacation.
>>
>> Joachim Bieler
>>
>
> No problem...............i now sending and wait......
>
> Thanks
> Francesco
>
>
>
>
>
>
>
>
>
>
>
>
>> Infoservice schrieb:
>>>> in the case described by you, you can enter only values which are
>>>> contained in the ValueTransformList. Other values are not possible.
If
>>>> this is possible in your program then you still make something
>>>> additional.
>>> It's correct but only if set the combobox with BOXDROPDOWNLIST, and in
>>> this case don't work the incremental seek.
>>>
>>>
>>>> Please send me a test program (aef file) with that I can reproduce
your
>>>> problem. To simply build a test program you can use one of the
samples
>>>> from the bBrowser and adapt it. The sample "bSample - Edit.aef" is
the
>>>> best one for your problem.
>>> I prepare a sample and send to you...............
>>>
>>>> Regards
>>>> Joachim Bieler
>>>
>>> Thank!
>>>
>>> Francesco
>>>
>>>>
>>>> Infoservice schrieb:
>>>>> Joachim,
>>>>> I create a bArrayserver with a normal Array, when i get the column:
>>>>>
>>>>> oColonna := SELF:oDCbBrowser:GetColumn(4)
>>>>> oColonna:ViewValueAs := #ComboBox
>>>>> oColonna:ValueTransformList := SELF:aEse
>>>>>
>>>>> Where aEse is create with a simple method that fill a list of value:
>>>>> aadd(aEse,{"Text1","Value1"})
>>>>> aadd(aEse,{"Text2","Value2"}).....
>>>>>
>>>>> The sequence of my code is:
>>>>> 1) Create a bArrayServer.
>>>>> 2) Put your code in the CellEdit()
>>>>> 3) Get the column and set the ViewValueAs
>>>>>
>>>>> I not have particolar setting, all is in auto mode............
>>>>> Sure i wrong something........
>>>>>
>>>>> Thanks for your patience!
>>>>>
>>>>> Francesco
>>>>>
>>>>>
>>>>>
>>>>>
>>>>> "Joachim Bieler" <sup****t@[EMAIL PROTECTED]
> ha scritto nel messaggio
>>>>> news:67l5ctF2oq6liU1@[EMAIL PROTECTED]
>>>>>> Francesco,
>>>>>>
>>>>>> the bBrowser uses the standard behaviour of the combo box and makes
>>>>>> nothing own. The ComboBox in the bBrowser should behave just the
same
>>>>>> as in a DataWindow. How do you create your ComboBox? What are your
>>>>>> settings?
>>>>>>
>>>>>> Regards
>>>>>> Joachim Bieler
>>>>>>
>>>>>>
>>>>>>
>>>>>> Infoservice schrieb:
>>>>>>> Hi Joachim ,
>>>>>>> thank for the advice, but this solve part of my problem because
with
>>>>>>> the combobox dropdown the incremental seek work fine only if the
user
>>>>>>> insert a value present in the list. If the seek value not found
the
>>>>>>> field stay with the wrong value.
>>>>>>> Example:
>>>>>>> List of value: "francesco","pippo","bill"
>>>>>>> If i enter 'pippo' in the combobox the bbrowser found and return
the
>>>>>>> correct value, if i insert 'XXX' in the combobox the value of the
>>>>>>> combobox is 'XXX' and this is not correct.
>>>>>>> I want obtain the same function of the Vo combobox in the
bbrowser.
>>>>>>> With the Vo combobox dropdownlist sorted, the digit perform a
>>>>>>> incremental seek but is not possible assign a value not in list.
>>>>>>> Is this possible?
>>>>>>> Many thanks for your help.
>>>>>>>
>>>>>>> Francesco
>>>>>>>
>>>>>>>
>>>>>>> "Joachim Bieler" <sup****t@[EMAIL PROTECTED]
> ha scritto nel messaggio
>>>>>>> news:67al3hF2nnculU1@[EMAIL PROTECTED]
>>>>>>>> Hello Francesco,
>>>>>>>>
>>>>>>>> in your case the bBrowser creates a ComboBox of the type
>>>>>>>> BOXDROPDOWNLIST. To get a ComboBox of the type BOXDROPDOWN, you
must
>>>>>>>> create the ComboBox. The following code shows the proceeding:
>>>>>>>>
>>>>>>>> method CellEdit(oEvent) class myDataWindow
>>>>>>>> local oCell as bCell
>>>>>>>> local oColumn as bDataColumn
>>>>>>>>
>>>>>>>> // check the EditMode
>>>>>>>> if oEvent:EditMode = BEDIT_CREATE
>>>>>>>> // determine the column
>>>>>>>> oCell := oEvent:EditCell
>>>>>>>> oColumn := oEvent:Control:GetOpenColumn(oCell:Column)
>>>>>>>>
>>>>>>>> // check the field name of the column
>>>>>>>> if oColumn:FieldSym = ...
>>>>>>>> // create the edit control
>>>>>>>> oEvent:EditControl :=
oEvent:Control:EditCreate(oCell:Column,;
>>>>>>>> oCell:Row,;
>>>>>>>>
oCell:RecNo,;
>>>>>>>> #ComboBox,;
>>>>>>>> ,;
>>>>>>>>
BOXDROPDOWN)
>>>>>>>> endif
>>>>>>>> endif
>>>>>>>> return NIL
>>>>>>>>
>>>>>>>> Regards
>>>>>>>> Joachim Bieler
>>>>>>>>
>>>>>>>>
>>>>>>>> Infoservice schrieb:
>>>>>>>>> Hi,
>>>>>>>>> i have a bBrowser with a field with this option:
>>>>>>>>>
>>>>>>>>> oColonna:ViewValueAs := #ComboBox
>>>>>>>>> oColonna:ValueTransformList := SELF:aEse
>>>>>>>>>
>>>>>>>>> This display a list of value.
>>>>>>>>>
>>>>>>>>> The seek text in this combobox is different from the seek of Vo
>>>>>>>>> combobox, because the search stop on the first character and not
>>>>>>>>> apply the incremental seek.
>>>>>>>>> It's a bug? It's normal? There is a solution?
>>>>>>>>> Many thanks for any suggestion.
>>>>>>>>>
>>>>>>>>> Francesco
>>>>>
>>>
>>>
>
>
>
|
