var
ST,ST1: TMemoryStream;
///
ST := TMemoryStream.Create;
ST1 := TMemoryStream.Create;
///
ST1.LoadFromFile('...');
ST.Write(ST1,ST1.Size);
ClientSocket1.Socket.SendStream(ST);

とすると、うまくストリームの内容が送信されていません。
何がおかしいのでしょうか？