MakeError(FSession, ERROR_INVALID_DATA)
else begin
body := Buf;
+ body := EUCtoSJIS(body); // 2byte\95¶\8e\9a\82Ì\95\94\95ª\82Í\8eg\82í\82È\82¢\82¯\82Ç\94O\82Ì\82½\82ß
FSession.FDMDM := Copy(body, Pos('"DMDM=', body) + 6, Length(body));
FSession.FDMDM := Copy(FSession.FDMDM, 1, Pos(';', FSession.FDMDM) - 1);
FSession.FMDMD := Copy(body, Pos('"MDMD=', body) + 6, Length(body));