解决 IndyFTp 乱码问题 10.6.0

在 ftp的FTPOnConnected 事件写入：

 

procedure TfrmMain.FTPConnected(Sender: TObject);
begin
  // FTP.DefStringEncoding := IndyTextEncoding(encOSDefault); // xe4  wjs
  FTP.DefStringEncoding := IndyTextEncoding_OSDefault;  // this ok  indy 10.6.0   d7
  StatusBar.Panels[0].Text := '连接';
end;