用delphi语言的memo组件获取到的文本不会自动换行

在 Delphi 的 Memo 组件中，如果你希望获取到的文本自动换行，你可以在 Memo 组件的属性中将 WordWrap 属性设置为 True。这样，在你调用 Memo 组件的 Text 属性获取文本内容时，文本中的每一行都会在遇到窗口边界时自动换行。

例如，你可以在你的窗体的 OnCreate 事件处理程序中将 Memo 组件的 WordWrap 属性设置为 True：

procedure TForm1.FormCreate(Sender: TObject); begin Memo1.WordWrap := True; end;

之后，当你调用 Memo1.Text 属性获取文本内容时，文本中的每一行都会在遇到窗口边界时自动换行。

注意：如果你希望在文本中显式换行，你可以使用换行符(#13#10)。例如，你可以在 Memo1.Lines 属性中使用以下代码添加两行文本：

Memo1.Lines.Add('Line 1'); Memo1.Lines.Add('Line 2');

这样，在显示文本时会在第一行和第二行之间换行。