将文本环绕在其他方框文本周围

Question

我正在尝试制作一个包含带有注释的文本框的文档，其他文​​本环绕该文本框。我尝试在文档中使用和使用 \newenvironment 来执行此操作。这是我的 MWE：

\documentclass{report}
\usepackage[utf8]{inputenc}
\usepackage{wrapfig}
\usepackage{lipsum}

\title{Title}
\author{Author}
%Environment for Block Notes. Does NOT work how I want:
\newenvironment{NoteBox}{
 \begin{wraptable}{o}{0.4\linewidth}
 \begin{tabular}{|l|}
  \hline
}{
 \\\hline
 \end{tabular}
\end{wraptable}
}

\begin{document}
\maketitle

\lipsum[1]
%This is my notebox that works generally how I want it but is incredibly tedious
\begin{wraptable}{o}{0.4\linewidth}
 \begin{tabular}{|l|}
  \hline
  When once our labour has\\begun, the comfort that\\enables us to endure it is\\the
  prospect of its end...\\
  \hline
 \end{tabular}
\end{wraptable}

\lipsum[2]
%For some reason, the Notebox environment doesn't seem to work
\begin{NoteBox}
 When once our labour has\\begun, the comfort that\\enables us to endure it is\\the
 prospect of its end...
\end{NoteBox}

\lipsum[1]

\end{document}          

这将产生以下 pdf：

这段代码似乎存在一些问题：第一个框上方和下方的间隙很大，并且必须手动插入所有换行符。此外，每次都输入所有这些命令确实很繁琐。当使用 Notebox 环境创建第二个框时，它似乎工作得更糟，例如没有文本换行。

我正在寻找可以执行 \wraptable 功能的东西，但具有自动换行和较小的垂直间隙，可以用来创建新的环境。

Answer 1

像这样？

\documentclass{article}
\usepackage{tikz}
\usepackage{wrapfig}
\usepackage{lipsum}
\usepackage{calc}
\setlength\intextsep{0pt}
\begin{document}
\lipsum[1]
\begin{wrapfigure}{r}{5cm+.6666em+.8pt}
\begin{tikzpicture}[every node/.style={draw,text width=5cm,minimum width=5cm}]
\node {\lipsum[2]};
\end{tikzpicture}
\end{wrapfigure}
\lipsum[2-4]
\end{document}