Prueba con esto:
Código Delphi
[-]
mostrar:=TJPEGImage.Create;
try
if not qrylistafiliados.FieldByName('foto').IsNull then
mostrar.Assign(qrylistafiliados.FieldByName('foto'));
frmpropcenso.Image2.Picture.Assign(mostrar);
finally
mostrar.Free
end;
Ah!! y por cierto... recuerda que no es obligación de los miembros de este foro el contestar todas las dudas... si no se te había contestado es por que o no entendían tu pregunta o no sabían responderte...
Saludos...