procedure TForm1.GREEK_BtnClick(Sender: TObject); var S : widestring; //用string会导致信息丢失, TNTMemo1会出现部分？ begin S := IdHTTP.Get('http://www.gnto.gr/'); S := UTF8Decode(S); //http://www.gnto.gr/利用了UTF-8编码，必须要这句话才行！ Memo1.Lines.Text := S; //有一些? TNTMemo1.Lines.Text := S; //完全显示正确
