OpenEuphoria

Re: RichEdit - Paint Event

• Posted by "Alex Chamberlain" <alex at ear26.freeserve.co.uk> Dec 16, 2004
• 547 views

Problem program:
--  code generated by Win32Lib IDE v0.18.22


include Win32Lib.ew
without warning

----------------------------------------------------------------------------
----
--  Window Window1
global constant Window1 = createEx( Window, "Window1", 0, Default, Default,
400, 300, 0, 0 )
global constant StatusBar3 = createEx( StatusBar, "", Window1, 0, 0, 0, 0,
0, 0 )
global constant RichEdit2 = createEx( RichEdit, "", Window1, 5, 5, 385, 235,
w32or_all({ES_NOHIDESEL}), 0 )
---------------------------------------------------------
----------------------------------------------------------------------------
----
integer paintCount
paintCount = 0
----------------------------------------------------------------------------
----
procedure RichEdit2_onPaint (integer self, integer event, sequence
params)--params is ( int x1, int y1, int x2, int y2 )
paintCount += 1
setText(StatusBar3, sprintf("Paint Count: %d", paintCount))
end procedure
setHandler( RichEdit2, w32HPaint, routine_id("RichEdit2_onPaint"))


WinMain( Window1,Normal )


>
>
> posted by: Brian Broker <bkb at cnw.com>
>
> Alex Chamberlain wrote:
> >
> > This is a multi-part message in MIME format.
>
> Please disable MIME and HTML when sending to the list.  Use plain text
only.
>
> >
> > Is anyone else having a problem with RichEdits turning grey and only
printing |||||||||||||||
> > when you type after calling a paint event?
> >
> > Anybody have an answer to the problem?
> >
> > (Running on XP)
> >
> > Alx
>
> Do you have an example that exhibits this behavior?