1. Win32LibEx bugs
------=_NextPart_000_0015_01C011ED.71C48600
charset="iso-8859-2"
Content-Transfer-Encoding: quoted-printable
RaBars addToBand(control,band):
Band should be able to hold more controls, like 3 comboboxes, but it can =
only have one. Is that originally that way? Maybe it is.
-------------------------------------------------------------------------=
-------
ComboBoxEx:
eraseItems(id) has bug:
change this:
elsif find(window_type[id], {ListView, TreeView}) then
to this:
elsif find(window_type[id], {ListView, TreeView,ComboBoxEx}) then
------=_NextPart_000_0015_01C011ED.71C48600
charset="iso-8859-2"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Diso-8859-2" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.2614.3401" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2>RaBars=20
addToBand(control,band):</FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2>Band should be able =
to hold more=20
controls, like 3 comboboxes, but it can only have one. Is that =
originally that=20
way? Maybe it is.</FONT></DIV>
<DIV> </DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2></FONT> </DIV>
<DIV>
<HR>
</DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana =
size=3D2>ComboBoxEx:</FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2></FONT> </DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2>eraseItems(id) has=20
bug:</FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2></FONT> </DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2>change =
this:</FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2>elsif =
find(window_type[id],=20
{ListView, TreeView}) then</FONT></DIV>
<DIV> </DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2>to this:</FONT></DIV>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2>
<DIV><FONT color=3D#0000ff face=3DVerdana size=3D2>elsif =
find(window_type[id],=20
{ListView, TreeView,<FONT color=3D#0000ff face=3DVerdana=20
size=3D2>ComboBoxEx</FONT>}) =
------=_NextPart_000_0015_01C011ED.71C48600--
2. Re: Win32LibEx bugs
©koda wrote:
>RaBars addToBand(control,band):
>Band should be able to hold more controls, like 3 comboboxes, but it can
only have one. Is that >originally that way? Maybe it is.
Rebarbands can only have one child window. This is a windows thing, not
win32lib. You can get around this by putting a toolbar in as the child, and
adding children to the toolbar. You can then put as many combo's as you
want into the toolbar.
>ComboBoxEx:
>eraseItems(id) has bug:
>change this:
>elsif find(window_type[id], {ListView, TreeView}) then
>to this:
>elsif find(window_type[id], {ListView, TreeView,ComboBoxEx}) then
Actually, I don't think this will work properly. Here's how it should look:
global procedure eraseItems( atom id )
-- clear a list
integer msg
-- get the message, based on control type
if window_class[ id ] = LISTBOX then msg = LB_RESETCONTENT
elsif window_class[ id ] = COMBO
or window_type[id] = ComboBoxEx then msg = CB_RESETCONTENT
-- Begin Matt Lewis
elsif find(window_type[id], {ListView, TreeView}) then
ok = deleteItem( id, -1 )
return
-- End Matt Lewis
end if
ok = sendMessage( id, msg, 0, 0 )
end procedure
I stuck treeview and listview together, since the command to delete all of
their items is the same (deleteItem(id, -1)), but a comboboxex is really a
souped up combo, and mostly works the same.
Matt
