怎样把一个TMemoryStream的内容装到一个TImage中?(200分)

B

Buder

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-29

• #1

我把A机的屏幕抓下来,从bmp格式转化为jpg格式后,以流的形式送到
B机,在B机应该用Image1.Canvas.LoadFromStream( )使图像显示出来,但是TImage.Canvas
没有LoadFromStream方法!没办法,我只好MemoryStream1.SaveToFile('c:/t.jpg'),
再Image1.Canvas.LoadFromFile('c:/t.jpg').
但这样不可避免要与硬盘交换数据,速度和效率大打折扣!
各位高手,小弟该怎么办呢?

甚急!愿出200分求解答.

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-29

• #2

TJPEGImage.LoadFromStream

 

D

djdsz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-29

• #3

TImage.Picture.BitMap.LoadFromStream就可以了。
最好的方法是A机将BitMap转化成JPEG,再传诵
在B机用wjiachun的方法，在将Jpegimage副给Image.Picture.Graphic

 

B

Buder

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-29

• #4

to wjiachun:
但TJPEGImage无法显示呀!
---------------------------------
to wjiachua:
因为bmp比jpeg大得多,所以我只想用Jpeg传输,显示,
但是在B机用 //Jpegpic:TJpegImage,tmpStream:TMemoryStream
JpegPic.LoadFromStream(tmpStream);
Image1.Picture.Graphic:=JpegPic; <----程序到此行出错!
为什么呀?
小弟对图像一向糊涂,还请各位指教...

 

B

Buder

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-30

• #5

各位大虾: 小弟是急用才忍痛割200分的呀!
-----------------------------------------
TJpegImage有个转化为(internal)TBipmap的方法,
但我怎么也用不对......

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-30

• #6

TJPEGImage(Image1.Picture.Graphic):=JpegPic;
试试这样行么？

 

J

Jhdandcl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-30

• #7

用djdsz的方法绝对行！
timage.picture.bitmap.loadfromstrem 方法，再Tiamge.update一下.

 

P

pengyt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-30

• #8

Image1.Picture.Graphic:=JpegPic; <----程序到此行出错!

改为 image1.picture.bitmap.assign(jpegpic);

 

D

djdsz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-03-30

• #9

你在A机要将Bitmap转化成Jpeg啊
jpegimage.assign(bitmap)可以将Bitmap转化成Jpegimage的

 

B

Buder

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-04-02

• #10

多人接受答案了。