OpenEuphoria

Re: [WIN] change bkgnd color of combo box

• Posted by Dan B Moyer <DANMOYER at PRODIGY.NET> Oct 25, 2000
• 450 views

Matt,

That's ok, the best I can do is to conceive pseudo-code in my head, couldn't
even attempt to make real code without interactive access to Euphoria!

I'll give it a try & see what happens.

Thanks!

Dan

----- Original Message -----
From: "Matthew Lewis" <MatthewL at KAPCOUSA.COM>
To: <EUPHORIA at LISTSERV.MUOHIO.EDU>
Sent: Wednesday, October 25, 2000 9:01 AM
Subject: Re: [WIN] change bkgnd color of combo box


> Yeah, that's what I get for doing this without testing (I didn't have Eu
> where I wrote that)...I'd originally had trackObject() in the proc.  Also,
> you need to use returnValue(myBrush).
>
> Change the procedure to the following:
>
> -- begin code
>
> procedure CB_onEvent( integer iMsg, atom wParam, atom lParam )
>
>     if iMsg = WM_CTLCOLORLISTBOX then
>         returnValue( myBrush )
>     end if
>
> end procedure
> onEvent[CB] = routine_id("CB_onEvent")
>
> -- end code
>
> The only problem with this is that it doesn't affect the background of the
> text in the box.  I'm not sure how to get at that to change it. :(
>
> Matt Lewis
> http://www.realftp.com/matthewlewis