Re: [lazarus] Found serious bug in win32 interface

2008-01-30 Thread Andrey Gusev
* 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

[lazarus] Found serious bug in win32 interface #2

2008-01-30 Thread Andrey Gusev
--- 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); +

Re: [lazarus] Found serious bug in win32 interface

2008-01-30 Thread Andrey Gusev
* 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

Re: [lazarus] Found serious bug in win32 interface #2

2008-01-30 Thread Mattias Gärtner
Zitat von Andrey Gusev [EMAIL PROTECTED]: --- 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); -

Re: [lazarus] Found serious bug in win32 interface #2

2008-01-30 Thread Andrey Gusev
* Mattias G#228;rtner [EMAIL PROTECTED] [Wed, 30 Jan 2008 18:45:57 +0100]: Zitat von Andrey Gusev [EMAIL PROTECTED]: --- interfaces/win32/win32callback.inc (revision 13905) +++ interfaces/win32/win32callback.inc (working copy) @@ -504,7 +504,7 @@ if (ControlDC = 0) or not needParentPaint

RE: [lazarus] Found serious bug in win32 interface #2

2008-01-30 Thread Andrew Brunner
that MS Windows sufficiently offers API to scroll a window with children. I just wanted to point that out. Thanks. -Original Message- From: Andrey Gusev [mailto:[EMAIL PROTECTED] Sent: Wednesday, January 30, 2008 3:48 PM To: lazarus@miraclec.com Subject: Re: [lazarus] Found serious bug

Re: [lazarus] Found serious bug in win32 interface

2008-01-30 Thread Micha Nelissen
Andrey Gusev wrote: -MoveWindowOrgEx(PaintMsg.DC, ORect.Left, ORect.Top); +MoveWindowOrgEx(PaintMsg.DC, -ORect.Left, -ORect.Top); No. ORect.Left is offset from Win32 - LCL. So if LCL draws at (0,0) it should actually be at (ORect.Left, ORect.Top), so the code is correct. With

Re: [lazarus] Found serious bug in win32 interface

2008-01-30 Thread Marc Weustink
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

Re: [lazarus] Found serious bug in win32 interface #2

2008-01-30 Thread Luiz Americo Pereira Camara
Andrey Gusev wrote: * Mattias G#228;rtner [EMAIL PROTECTED] [Wed, 30 Jan 2008 18:45:57 +0100]: Zitat von Andrey Gusev [EMAIL PROTECTED]: --- interfaces/win32/win32callback.inc (revision 13905) +++ interfaces/win32/win32callback.inc (working copy) @@ -504,7 +504,7 @@ if (ControlDC = 0) or

Re: [lazarus] Found serious bug in win32 interface #2

2008-01-30 Thread Andrey Gusev
* Luiz Americo Pereira Camara [EMAIL PROTECTED] [Thu, 31 Jan 2008 01:16:58 -0300]: Andrey Gusev wrote: * Mattias G#228;rtner [EMAIL PROTECTED] [Wed, 30 Jan 2008 18:45:57 +0100]: Zitat von Andrey Gusev [EMAIL PROTECTED]: --- interfaces/win32/win32callback.inc (revision 13905) +++

Re: [lazarus] Found serious bug in win32 interface

2008-01-30 Thread Andrey Gusev
* Micha Nelissen [EMAIL PROTECTED] [Wed, 30 Jan 2008 22:27:36 +0100]: Andrey Gusev wrote: -MoveWindowOrgEx(PaintMsg.DC, ORect.Left, ORect.Top); +MoveWindowOrgEx(PaintMsg.DC, -ORect.Left, -ORect.Top); No. ORect.Left is offset from Win32 - LCL. So if LCL draws at (0,0) it

[lazarus] Found serious bug in win32 interface

2008-01-29 Thread Andrey Gusev
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,

Re: [lazarus] Found serious bug in win32 interface

2008-01-29 Thread Paul Ishenin
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); -