paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-13 10:19:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

fixed setcolor for streamed components

Browse Source 
git-svn-id: trunk@1997 -
This commit is contained in:
mattias 2002-08-17 23:40:34 +00:00
parent 01d5566007
commit ddddcfd940
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/gtk/gtkobject.inc
View File

@ -2664,7 +2664,7 @@ begin
if (Color=clNone) and (FixWidget^.Window<>nil) then if (Color=clNone) and (FixWidget^.Window<>nil) then
gdk_window_set_back_pixmap(FixWidget^.Window,nil,0) gdk_window_set_back_pixmap(FixWidget^.Window,nil,0)
else else
if (not ColorIsStored) if ColorIsStored
and ((Color and SYS_COLOR_BASE)=0) then begin and ((Color and SYS_COLOR_BASE)=0) then begin
// don't set background for custom controls (to prevent flickering) // don't set background for custom controls (to prevent flickering)
if GtkWidgetIsA(PGtkWidget(Handle),GTKAPIWidget_GetType) then exit; if GtkWidgetIsA(PGtkWidget(Handle),GTKAPIWidget_GetType) then exit;
@ -6827,6 +6827,9 @@ end;
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.318 2003/01/01 13:01:01 mattias
fixed setcolor for streamed components
Revision 1.317 2003/01/01 12:38:53 mattias Revision 1.317 2003/01/01 12:38:53 mattias
clean ups clean ups