Code:

Form1.MDIChildCount

 

 

Закрыть все окна:

Code:

with Form1 do

For i := MDIChildCount-1 DownTo 0 Do

     if Assigned(MDIChildren[i]) then

     begin

       MDIChildren[i].Close;

     end;

 

 

 

 

 

 

Добавить комментарий

Не использовать не нормативную лексику.

Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.

ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!