多分これ
READYSTATE_COMPLETE
ttp://plaza21.mbn.or.jp/~takoyakusi/delphi/Event.html

write の直後に ReadyState が READYSTATE_COMPLETE になるまで待機すればいいかも
試してないけど