Delphi2009 Indy10 에서 한글 깨짐 문제

Memo1.Text:=IdHTTP1.Get('http://www.xxx.com');

옛날에는 참 행복하게도 이렇게만 하면 대부분 잘 되었다.
하지만 Delphi2009에선 String이 좀 바뀌고 하면서 한글이 깨지는 경우가 발생한다.

TEncoding 을 사용해서 해결해야 한다. (델마당 데브 (wyb330)님의 댓글에서 발췌)

function GetURLContent(const URL: String): String;
var
  BytesStream: TBytesStream;
  IdHTTP1: TIdHTTP;
begin
  IdHTTP1:=TIdHTTP.Create(nil);
  BytesStream:=TBytesStream.Create;
  try
    IdHTTP1.Get(URL, BytesStream, []);
    Result:=TEncoding.Default.GetString(BytesStream.Bytes, 0, BytesStream.Size);
  finally
    FreeAndNil(BytesStream);
    FreeAndNil(IdHTTP1);
  end;
end;