...
var
JPEGImage: TJPEGImage;
Bitmap: TBitmap;
begin
...
JPEGImage:= TJPEGImage.Create;
Bitmap:= TBitmap.Create;
try
JPEGImage.LoadFromStream(stream);
Bitmap.Height:= JPEGImage.Height;
Bitmap.Width:= JPEGImage.Width;
Bitmap.Assign(JPEGImage);
ImageList1.Add(Bitmap,nil);
ListView1.Items.Add;
ListView1.Items[ListView1.Items.Count-1].Caption := 'Imagen';
ListView1.Items[ListView1.Items.Count-1].ImageIndex := 0;
finally
Bitmap.Free;
JPEGImage.Free;
end;
...