输入隐藏，输出有多余的缩进

Question

如前所述，我正在尝试用 Pascal 重新创建一个我最初用 Ruby 编写的 SSH 配置文件管理器。通过提供的答案，我已经能够让 shell 保持打开状态并接受输入。现在我遇到了一个新问题，所有输入都被隐藏了，所有输出似乎都在每行之前平铺了几个制表符。更新后的相关代码如下：

if HasOption('c', 'connect') then begin
  TempFile:= GetRecord(GetOptionValue('c', 'connect'));
  AProcess:= TProcess.Create(nil);
  AProcess.Executable:= '/usr/bin/ssh';
  AProcess.Parameters.Add('-p');
  AProcess.Parameters.Add(TempFile.Port);
  AProcess.Parameters.Add('-tt');
  AProcess.Parameters.Add(TempFile.Username + '@' + TempFile.Address);
  AProcess.Options:= [];
  AProcess.ShowWindow:= swoShow;
  AProcess.InheritHandles:= False;
  AProcess.Execute;
  AProcess.WaitOnExit;
  AProcess.Free;
  Terminate;
  Exit;
end;

提供的输出如下所示：

我按运行 ls、pwd 和 exit 的顺序。

Answer 1

所以您可能使用了 crt 或其他一些将终端置于原始模式的终端库，同时需要 cr 和 lf。

从 uses 子句中删除 crt，可能会更好

输入隐藏，输出有多余的缩进

Input hidden, output has excess indentation

ssh

pascal

lazarus

freepascal

delphi