Error jpeg #41 al cargar imagen en TImage

[Repelus]

Saludos compañeros,

Después de buscar mucho por el foro, no consigo resolver este error, espero me podais ayudar.
Lo que hago es cargar una imagen en un TImage en el evento afterscroll del dataset, para ello utilizo el código facilitado en un hilo del foro.

var
  B   : TJPEGImage;
  MS : TMemoryStream;
begin
     B := TJPEGImage.Create;
     MS := TMemoryStream.Create;
     q_trabajadoresfoto.SaveToStream(MS);
     B.LoadFromStream (MS);
     foto.Picture.Assign (B);
     MS.Free;
     B.Free;
end;

Tambien he de decir que he incluido en las uses jpeg;
Seguramente será alguna tonteria pero no doy con ella.