Author: Jonas Bilinkevicius

How to close all MDI child forms at once

Answer:

1   var
2     cik: integer;
3   
4   for cik := MDIChildCount - 1 downto 0 do
5   begin
6     MDIChildren[cik].Close;
7   end;