RTC解决中文乱码 d := RtcStringToBytes(read); Memo3.Lines.Text := Response.HeaderText; // 显示下http头 if TRegEx.IsMatch(UpperCase(string(PAnsiChar(d))), 'GBK|GB2312') then Memo1.Lines.Text := string(PAnsiChar(d)) else // 根据ContentType中charset的内容来读取数据 Memo1.Lines.Text :=