如何为Delphi/Lazarus格式化msmtp终端命令字符串？

问题核心是邮件格式要求Subject行后必须跟一个空行，你的代码未正确传递这个空行给msmtp，再加上字符串转义和shell解析的差异，导致终端命令的效果无法在程序中复现。以下是几种可行的解决方案：

方案1：使用转义字符\n代替实际换行 #

在FreePascal字符串中，将邮件内容的换行替换为\n（让echo -e解析为实际换行），确保引号正确传递：

fpsystem('echo -e "Subject: Testing msmtp\n\nHello, this is msmtp." | msmtp myemail@gmail.com');

• 两个\n对应邮件格式要求的主题行后的空行，这是区分主题与正文的关键
• echo -e会将\n解析为实际换行符，符合RFC邮件格式规范

方案2：直接嵌入换行符（FreePascal原生方式） #

利用FreePascal的字符常量#10（换行符）直接构造带空行的字符串，无需依赖echo -e的转义：

fpsystem('echo "Subject: Testing msmtp'#10#10'Hello, this is msmtp." | msmtp myemail@gmail.com');

• #10#10直接生成两个连续换行（空行），跳过echo -e的转义步骤，逻辑更直接
• 单引号包裹的字符串中，#10会被解析为实际换行字符，传递给shell后能正确生成邮件格式

方案3：修复TProcess的执行方式 #

如果使用TProcess，需要开启UseShellExecute=True才能让shell解析管道|和引号，否则TProcess会把整个命令当作单个程序的参数：

Process1.CommandLine := 'echo -e "Subject: Testing msmtp\n\nHello, this is msmtp." | msmtp myemail@gmail.com';
Process1.UseShellExecute := True; // 必须开启，让系统shell处理管道和引号
Process1.Execute;

或者更严谨的方式（直接调用shell传递命令）：

Process1.Executable := '/bin/sh'; // Windows环境替换为'cmd.exe'
Process1.Parameters.Add('-c');
Process1.Parameters.Add('echo -e "Subject: Testing msmtp\n\nHello, this is msmtp." | msmtp myemail@gmail.com');
Process1.UseShellExecute := False;
Process1.Execute;

关键注意事项 #

• 不要用\"转义双引号，FreePascal单引号包裹的字符串中，双引号可直接使用，无需额外转义
• 邮件的RFC格式硬性要求：Subject:字段后必须跟一个空行才能与正文区分，你的终端命令中实际换行恰好满足该要求，但程序中字符串的换行未被正确传递

内容的提问来源于stack exchange，提问作者ThN