Código Delphi [-] procedure TMDIChild.FormClose(Sender: TObject; var Action: TCloseAction); begin Action:= caFree; end;
procedure TMDIChild.FormClose(Sender: TObject; var Action: TCloseAction); begin Action:= caFree; end;