>>>I found, that for my combo class the magical number is 38.
>>>
>>>But now I have another weird effect. When I open the form the first time (the form has a pageframe and a container on it) and open the combos for the controls that are in the bottom of the form, the drop-down portion is shown not close to the control, but somewhere... The next time I open that combo the drop-down portion is shown correctly at the top on the combo.
>>>
>>>I'm running in VFP8.
>>>
>>>I can send you a print screen, if you'd like. What address should I use?
>>
>>
fabio@lunacom.net ( my official email, next morning )
>>
>>For now, send it here, but i don't look it every day:
>>fabiolunardon@libero.it
>
>Sorry, I already moved the code into Init method of the combo, there it works fine. In the Drop-down it produced that weird effect. I'm having another problem that I posted a message about few seconds ago. If my combo has just few items to show, the combo's scrollbar doesn't appear and the magical number 39 doesn't work.
>
>Here is the code
>
>*---------------------- Location Section ------------------------
>* Library: Acustomcontrols.vcx
>* Class: Cboviscodes
>* Method: Adjustwidth()
>*----------------------- Usage Section --------------------------
>*) Description:
>*)
>
>* Scope: Public
>* Parameters:
>*$ Usage:
>*$
>* Returns:
>*--------------------- Maintenance Section ----------------------
>* Change Log:
>* CREATED 08/23/2005 - NN (Idea by Fabio Lunardon)
>* MODIFIED
>*----------------------------------------------------------------
>WITH this
> #IF VERSION(2)<900
> .ColumnCount = MAX(.ColumnCount,.BoundColumn, 2)
> #ENDIF
>
> IF .Width > 60
> .ColumnWidths = LTRIM(STR(.Width-39))+ REPLICATE(',0',.ColumnCount-1)
> ENDIF
>ENDWITH
>
>Any ideas to fix?
= LTRIM(STR(.Width-IIF(.ListCount>EVL(.DisplayCount,7),39+SYSMETRIC(5),39)))