OpenEuphoria

Re: Win32Lib - Tab Control

• Posted by Matthew Lewis <MatthewL at KAPCOUSA.COM> Aug 09, 2000
• 397 views

> From: Lee West
>
> How do I set the Tab Control to a specific TabItem from
> within my program.

Add this code to setFocus right before the c_proc call:

atom ok, parent, item
if window_type[id] = TabItem then
    parent = window_owner[id]
    item = find(id, window_tabitems[parent]) - 1
    ok = sendMessage( parent, TCM_SETCURSEL,
        item, 0)
    return
end if

Then, you can use setFocus with tabitems just like everything else.

Also, I've found a bug in the new toolbar code.  It makes it so that buttons
outside a toolbar won't work.  It's an easy fix, though: change line 16012:

elsif iMsg = WM_COMMAND
and window_type[id] = FlatToolBar then

I added the second part.  It was preventing the default WM_COMMAND
handling...

I've uploaded the changes to setFocus and WndProc...

Matt