IdHTTPServer接收复合内容消息

[比特灵]

  boundary := IdGlobalProtocols.ExtractHeaderSubItem(ARequestInfo.ContentType, 'boundary', QuoteHTTP);
  boundary := '--' + boundary;
  repeat
      tmpStr := ReadLnFromStream(ARequestInfo.PostStream, -1, true);
      Memo1.Lines.Add(tmpStr);
  until tmpStr = boundary;

第一个问题：网上搜来的这一段，运行会报错，我感觉是读到结束符了。这段流读取控制感觉缺了个EOF判断？

第二个问题：换了一种读取方式（苟且）：
tmpStr := StreamToString(ARequestInfo.PostStream);
可以读出内容，但是有乱码，使用UTF8ToWideString(ARequestInfo.PostStream)仍然有乱码，求助。

求指导