紧急求助关于用ClientSocket读写XML信息出错问题 (100分)

我用D7写一个读写XML信息的程序，通过ClientSocket与服务器端相连，接收到服务器端的信息后发送一个确认信息。但是在ClientSocket主动发送信息的时候会出错（无效的XML声明），出错的地方是onClientSocketRead事件，代码如下：
try
XMLDoc := TXMLDocument.Create(Application);
XMLDoc.Active := False;
XMLDoc.XML.Text := Socket.ReceiveText;
[red]XMLDoc.Active := True;[/red]
Root := XMLDoc.DocumentElement;
...
finally
XMLDoc.Free;
end;
红色[red]...[/red]是出错的地方，我看过收到的确实是有问题，请问怎么判断XML声明是否合法，如何避免弹出出错信息？

补充一下，这个问题可能与ClientSocket无关，因为试过连某个服务器端就没有出错，主要是想知道把信息读进TXMLDocument时怎么避免弹出出错信息，我试过用except也会出错。

“用except也会出错”那是在调试环境下，在非IDE环境下不会。