--- In [email protected], "brucexs" <[EMAIL PROTECTED]> wrote:
>
> --- In [email protected], "Sheri" <sherip99@> wrote:
> >
> > Script below is similar to the other one, but uses a proxy
> > sidekick button to provide height for the combo box. There's a
> > pause at each
>
>
> I tried these scripts and it did make me think of another portion of
> the code the check, where I did find the possible source of the
> problem.
>
> Try the latest exe
>
>
> http://powerpro.webeddie.com/download/powerpro.exe
>
:) :) :)
That is SO much better.
:) :) :)
I wonder if you could make an adjustment when button height is set to
zero (auto height). I never realized how nice those auto setting can
be and hadn't used them before. Unfortunately the "minus adjustments"
that work for button width apparently don't apply to height.
Currently at large font sizes and button height zero, there is a
noticeable gap between the upper and lower parts of the combo box
because the button height is just slightly too low. It is when the
button height is exactly equal to the height of the control that it is
perfect.
Try this:
if (cl.exists("testc") !==0)
cl.removeall("testc")
local testbar=cl.create("testc", 1)
testbar.newproperties("Format1 = IconSize: 24 Position: Floating")
testbar.addproperties("Format2 = MaxText: 531")
testbar.addproperties("Format3 = Flat topmost")
testbar.addproperties("Format4 = Border AllVDesks 3DFrame BarSize
TextCenter")
;combo box
local combobutton=testbar.insert(testbar.length)
combobutton.setid("combo1")
combobutton.setfont("Arial", "Size: 50")
combobutton.setlabel("*control combobox height: 300 NOINTEGRALHEIGHT
dropdownlist scroll clientedge sort border autohscroll")
combobutton.setwidth(450)
combobutton.setheight(0)
messagebox("OK", "demonstrates button height zero first...")
bar.show("testc")
local cb1=testbar.GetCtrlHandle("combo1")
local cbclosedheight=cb1.height
local CB_SHOWDROPDOWN = 0x014F
win.sendmessage(cb1, CB_SHOWDROPDOWN, 1, 0)
wait.for(400)
win.ontop("testc",0)
messagebox("OK", ;;+
"next will set button height to height of the control")
cl.setheight("testc", "combo1", cbclosedheight)
bar.show("testc")
;handle has changed
local cb1=testbar.GetCtrlHandle("combo1")
win.sendmessage(cb1, CB_SHOWDROPDOWN, 1, 0)
wait.for(400)
bar.close("testc")
quit
