* BUG: Container.Children.Clear() should work correctly now.


git-svn-id: svn://localhost/gambas/trunk@4205 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2011-10-17 20:18:56 +00:00
parent 0a6e293d6f
commit 2514d47146

View file

@ -117,10 +117,15 @@ END_PROPERTY
BEGIN_METHOD_VOID(ContainerChildren_Clear)
gContainer *cont = WIDGET->proxyContainer();
int i;
gControl *child;
for (i = 0; i < cont->childCount(); i++)
cont->child(i)->destroy();
for(;;)
{
child = cont->child(0);
if (!child)
break;
child->destroy();
}
END_METHOD