Правильно, CreateDoc, но самое главное - HostWindows.DocWinHandler: посмотрите, какие в ответ на сообщение USER32.WMNCActivate производятся манипуляции с переменной style. WinApi.WS_MINIMIZEBOX - кнопка сворачивания окна, WinApi.WS_MAXIMIZEBOX - кнопка разворачивания окна, WinApi.WS_SYSMENU - иконка с меню в левом верхнем углу окна И крестик для закрытия окна в правом верхнем углу.

Возможно, что достаточно будет закомментировать строки
st := st - {16, 17, 19};	(* minimize box, maximize box, sysmenu *)
и
style := style - {16, 17, 19}	(* minimize box, maximize box, sysmenu *)