Envio de imagen y string por tcp

[willembg8]

Para enviarlo he hecho este codigo:

Código Delphi [-]
var
  Nombre,ImgNom : TMemoryStream;
begin
  Nombre := TMemoryStream.Create;
  Nombre.Write('hola',6);
  ImgNom := TMemoryStream.Create;
  ImgNom.CopyFrom(Nombre,0);
  ImgNom.CopyFrom(ImgStream,0);

  try
    if Client.Connected = true  then
      Client.Disconnect;
    Client.Host := Ip;
    Client.Connect();
    Client.WriteStream(ImgNom);
    Client.Disconnect;
  finally
    ImgNom.Free;
  end;
end;

El problema es como lo separa cuando lo leo. Separar la imagen del stream.

Gracias