☆IdTCPClientのOpenWriteBuffer

Indy9のIdTCPClient.OpenWriteBufferがIndy10でエラーになりましたので、次のように書き換えました。

　//Indy9
　　I := Stream1.Size;
　　FIdTCPClient.OpenWriteBuffer;
　　FIdTCPClient.WriteBuffer(Stream1.Memory^, I);
　　FIdTCPClient.CloseWriteBuffer;

        
　//Indy10
　　FIdTCPClient.IOHandler.WriteBufferOpen;
　　FIdTCPClient.IOHandler.Write(Stream1);
　　FIdTCPClient.IOHandler.WriteBufferClose;

別に名称まで変える必要ないと思うんだけど・・・。