Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
procedure FechaJanelasMDI;var X : Byte;begin if MDIChildCount > 0 then for X := 0 to Pred(MDIChildCount) do MDIChildren[X].Close;end;
Carregando comentários...