Andrey Gusev wrote:
* Paul Ishenin <[EMAIL PROTECTED]> [Wed, 30 Jan 2008 11:27:16 +0700]:
Andrey Gusev wrote:
> That:
> --- interfaces/win32/win32callback.inc (revision 13905)
> +++ interfaces/win32/win32callback.inc (working copy)
> @@ -504,7 +504,7 @@
> if (ControlDC = 0) or not needParentPaint then
> begin
> DCIndex := Windows.SaveDC(PaintMsg.DC);
> - MoveWindowOrgEx(PaintMsg.DC, ORect.Left, ORect.Top);
> + MoveWindowOrgEx(PaintMsg.DC, -ORect.Left, -ORect.Top);
> {$ifdef DEBUG_DOUBLEBUFFER}
> Windows.GetClipBox(PaintMsg.DC, ClipBox);
> DebugLn('LCL Drawing in DC ', IntToHex(PaintMsg.DC, 8), '
with
> clipping rect (',
>
----------------------------------------------------------------------------------------------------------------------------
Please try to build ide with your changes and you'll see nice effects
:)
I saw it all yesterday.
That's question:
How it contrived by develoers team: to build correctly worked
tabular-components on top of so fundamental bug ???
This is recently changed. Initially the code had a similar behaviour as
delphi. It became clear that only scrolling in win32 would work like the
old way and that all other widgetsets had to add heaps of code.
So scrolling changed, however all widgetsets need to get adapted to the
new situation.
Marc
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
