[Lazarus] Visual "uglyness" when creating TSynEdit @ runtime in my app

[Martin]

On 05/01/2013 11:19, luiz americo pereira camara wrote:
>
> What OS are you using.
>
> Here with windows 7 no Paint occurs at all. See previous mail
>
> Can you check (comment ShowScrollBar) if the paint you are seeing is
> really from ShowScrollBar?
>
> After that we can look what to do
>

If I single step, it is not painted by that line.

It happens here

       Perform(CM_SHOWINGCHANGED, 0, 0); // see TWinControl.CMShowingChanged

in B:\lazarus_latest_2\lcl\include\wincontrol.inc 4295

procedure TWinControl.UpdateShowing;

   procedure ChangeShowing(bShow: Boolean);
   begin
     if FShowing = bShow then Exit;
     FShowing := bShow;
     try
       {$IFDEF VerboseShowing}
       DebugLn(['ChangeShowing ',DbgSName(Self),' new FShowing=',FShowing]);
       {$ENDIF}
       Perform(CM_SHOWINGCHANGED, 0, 0); // see TWinControl.CMShowingChanged
     finally
       if FShowing<>(wcfHandleVisible in FWinControlFlags) then
       begin
         FShowing := wcfHandleVisible in FWinControlFlags;
         DebugLn(['TWinControl.UpdateShowing.ChangeShowing failed for 
',DbgSName(Self),', Showing reset to ',FShowing]);
       end;
     end;
   end;



#0 CHANGESHOWING(0x2fcf1dc, true) at include\wincontrol.inc:4308
#1 UPDATESHOWING(0x219838) at include\wincontrol.inc:4356
#2 UPDATESHOWINGRECURSIVE(0x2fcf290, 0x219838, false) at 
include\wincontrol.inc:3466
#3 UPDATESHOWINGRECURSIVE(0x2fcf290, 0x2193b8, true) at 
include\wincontrol.inc:3463
#4 DOALLAUTOSIZE(0x2193b8) at include\wincontrol.inc:3520
#5 ENABLEAUTOSIZING(0x2193b8) at include\control.inc:5433
#6 ENABLEAUTOSIZING(0x219838) at include\control.inc:5431
#7 SETPARENT(0x219838, 0x2193b8) at include\control.inc:4076
#8 TFORM1__BUTTON1CLICK(0x21b858, <error reading variable>) at unit1.pas:38
#9 CLICK(0x21b858) at include\control.inc:2718
#10 STDCTRLS$_$TBUTTONCONTROL_$__$$_CLICK at :0
#11 STDCTRLS$_$TCUSTOMBUTTON_$__$$_CLICK at :0
#12 STDCTRLS$_$TBUTTON_$__$$_CLICK at :0
#13 STDCTRLS$_$TBUTTONCONTROL_$__$$_WMDEFAULTCLICKED$TMESSAGE at :0
#14 DISPATCH(0x21b858, 0) at ..\inc\objpas.inc:602
#15 WNDPROC(0x21b858, {MSG = 66567, WPARAM = 0, LPARAM = 0, RESULT = 0, 
WPARAMLO = 0, WPARAMHI = 0, LPARAMLO = 0, LPARAMHI = 0, RESULTLO = 0, 
RESULTHI = 0}) at include\control.inc:2111
#16 WNDPROC(0x21b858, {MSG = 66567, WPARAM = 0, LPARAM = 0, RESULT = 0, 
WPARAMLO = 0, WPARAMHI = 0, LPARAMLO = 0, LPARAMHI = 0, RESULTLO = 0, 
RESULTHI = 0}) at include\wincontrol.inc:5323
#17 DELIVERMESSAGE(0x21b858, 0) at lclmessageglue.pas:117
#18 WINDOWPROC(6359808, 273, 47192, 1116996) at win32\win32callback.inc:2476
#19 CUSTOMFORMWNDPROC(6359808, 273, 47192, 1116996) at 
win32\win32wsforms.pp:375
#20 USER32!GetWindowMinimizeRect at :0
#21 $FORMS$_Ld101 at :0
#22 ?? at :0
#23 ?? at :0
#24 ?? at :0
#25 USER32!GetWindowMinimizeRect at :0
#26 WIN32WSFORMS_$$_ADJUSTFORMBOUNDS$TCUSTOMFORM$RECT at :0
#27 USER32!CallNextHookEx at :0
#28 USER32!SendNotifyMessageA at :0
#29 DllInstall at :0
#30 DllInstall at :0
#31 DllInstall at :0
#32 USER32!GetWindowMinimizeRect at :0
#33 ?? at :0
#34 USER32!GetWindowMinimizeRect at :0
#35 DSA_Destroy at :0
#36 USER32!CancelShutdown at :0
#37 USER32!CancelShutdown at :0
#38 CALLDEFAULTWINDOWPROC(1116996, 514, 0, 65547) at 
win32\win32callback.inc:106
#39 WINDOWPROC(1116996, 514, 0, 65547) at win32\win32callback.inc:2284
#40 BUTTONWNDPROC(1116996, 514, 0, 65547) at win32\win32wsstdctrls.pp:1590
#41 USER32!GetWindowMinimizeRect at :0
#42 ?? at :0
#43 USER32!GetWindowMinimizeRect at :0
#44 
WIN32WSSTDCTRLS$_$TWIN32WSBUTTONCONTROL_$__$$_GETPREFERREDSIZE$TWINCONTROL$LONGINT$LONGINT$BOOLEAN 
at :0
#45 USER32!GetMonitorInfoA at :0
#46 USER32!DisplayExitWindowsWarnings at :0
#47 APPPROCESSMESSAGES(0x233fb8) at win32\win32object.inc:367
#48 HANDLEMESSAGE(0x1dc178) at include\application.inc:1274
#49 RUNLOOP(0x1dc178) at include\application.inc:1407
#50 INTERFACEBASE$_$TWIDGETSET_$__$$_APPRUN$TAPPLICATIONMAINLOOP at :0
#51 RUN(0x1dc178) at include\application.inc:1395
#52 main at C:\Users\martin\AppData\Local\Temp\project1.lpr:19