begin
if fTMC = nil then
fTMC := TfTMC.Create(Application);
end;
procedure TfTMC.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
fTMC := nil;
end;
animr: как я сказал, можете сменить стиль формы и использовать autocreated. Или оставить MDI Child и завести глобальную переменную, где считать кол-во открытых окон и ограничивать их количество