FiveTech Software tech support forums

Hi Guys,

Do you know if is possible to do a combobox with the lenght of area (2)(see image) bigger than area (1) ?

Wider?

Yes !

Mr Rao,

Thank you

Mr Rao
How to change combobox top area size at runtime ?

TKS!
Shuming Wang

Do you mean height?
While creating, you can use clause HEIGHTGET nHeight.
Do you want to change at runtime? May I know why?

...
activate dialog odlg on init resize(odlg)

function resize(odlg,res)
rsl0:=getsysmetrics(0)/res //width,col

if rsl0<>1;

//<=800*600, not needed

rsl1:=getsysmetrics(1)/if(res==800,600,768) //base height ,nrow
for i:=1 TO LEN(::acontrols)
oCtrol = odlg:aControls[i] // top:nrow, left:ncol,bottom: nrow, right:ncol
aRect = GetCoors( oCtrol:hWnd )
do case
case oCtrol:classname()=="TCOMBOBOX"
oCtrol:Move( aRect[1]*rsl1, aRect[2]*rsl0 )
// cant not set height of combobox : oget height,listbox height
otherwise
oCtrol:Move( aRect[1]*rsl1, aRect[2]*rsl0,(aRect[4] - aRect[2])*rsl0, (aRect[3] - aRect[1])*rsl1, .t. )
// ntop,nleft,nbottom,nright
end case
next
endif

return

I found, sendmessage(..) must be on the ON INIT clausula from the dialog.

byte-one wrote:I found, sendmessage(..) must be on the ON INIT clausula from the dialog.

Yes, ofcourse.
In case of dialog hWnd gets a value only ON INIT.

Works fine!
Thank you MR Rao!
Shuming Wang

Mr Rao,
A small problem with SendMessage( oCbx:hWnd, 0x0153, -1, nNewHeight ),combobox be blue colored background on init .

Regards!
Shuming Wang