mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-07-31 13:35:56 +02:00
MG: fixed loop
git-svn-id: trunk@1163 -
This commit is contained in:
parent
7bba64c548
commit
c9b0df3a12
@ -578,7 +578,8 @@ var
|
|||||||
// this is a container widget -> go through all childs
|
// this is a container widget -> go through all childs
|
||||||
ChildEntry:=PGtkContainer(PaintWidget)^.resize_widgets;
|
ChildEntry:=PGtkContainer(PaintWidget)^.resize_widgets;
|
||||||
while ChildEntry<>nil do begin
|
while ChildEntry<>nil do begin
|
||||||
ForAllChilds(PGtkWidget(ChildEntry^.Data));
|
if PGtkWidget(ChildEntry^.Data)<>PaintWidget then
|
||||||
|
ForAllChilds(PGtkWidget(ChildEntry^.Data));
|
||||||
ChildEntry:=ChildEntry^.Next;
|
ChildEntry:=ChildEntry^.Next;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
@ -6527,6 +6528,9 @@ end;
|
|||||||
{ =============================================================================
|
{ =============================================================================
|
||||||
|
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.275 2002/10/31 18:54:17 lazarus
|
||||||
|
MG: fixed loop
|
||||||
|
|
||||||
Revision 1.274 2002/10/30 17:43:35 lazarus
|
Revision 1.274 2002/10/30 17:43:35 lazarus
|
||||||
AJ: added IsNullBrush checks to reduce pointless color allocations & GDK function calls
|
AJ: added IsNullBrush checks to reduce pointless color allocations & GDK function calls
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user