页面顶部带有 titlesec 的分隔符

Question

我正在结合使用一些我认为会引起问题的包。首先，我正在使用报告类。其次，我希望页面周围有 1 英寸的边距，因此我使用geometry。第三，我不希望在新章节开始时出现新页面，因此我使用在另一个 StackOverflow 帖子中找到的命令。以下是代码：

\documentclass[12pt]{report}

%Set margins to 1 inch
\usepackage[margin=1in]{geometry}

%turn off new page at new chapter
\usepackage{etoolbox} 
\makeatletter 
\patchcmd{\chapter}{\if@openright\cleardoublepage\else\clearpage\fi}{\par}{}{} 
\makeatother 

\usepackage[bf,compact,calcwidth]{titlesec}
\titleformat{\chapter}
{\normalfont\huge\bfseries}{\chaptertitlename\ \thechapter}{1em}{}   
\titlespacing*{\chapter}{0pt}{-\topskip}{40pt}

\begin{document}
    \chapter{The First Chapter}

    Some text

    \chapter{The Second Chapter}

    More text
\end{document}

本质上，如果章节位于页面顶部，我希望间距距页面边缘 1 英寸。如果章节位于页面中间，如The Second Chapter，我希望间距较小，例如5 pt。我尝试使用\titlespacing*{\chapter}{0pt}{-\topskip}{40pt}和\titlespacing*{\chapter}{0pt}{-50pt}{40pt}，但这会弄乱第二章的间距（它不是5 pt）。感谢您的帮助。