image 显示剪贴板的图片(100)

H

hn_yxb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-03-28

• #1

大家好，本人碰到一个问题，用image 显示剪贴板的图片，显示正常： img1.Picture.Assign(Clipboard);随后把图片的内容存在本地盘img1.Picture.SaveToFile('c:/12.jpg');再次打开，img1.Picture.LoadFromFile('c:/12.jpg');缺提示错误 "JPEG ERROR #42"请问，这个文件该怎么保存和打开他呢

 

W

wangdonghai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-03-28

• #2

打开的时候用img1.Picture.Bitmap.LoadFromFile('c:/12.jpg');

 

H

hn_yxb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-03-28

• #3

to wangdonghai:你好，用你的方法，同样提示错误，说图片格式不对。

 

D

dark_power

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-03-28

• #4

将扩展名改为.bmp。TImage默认的应该是bitmap吧。JPEG应该要用到jpeg单元。要Assign到jpeg的图像对象中，的说。

 

W

wangdonghai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-03-28

• #5

...implementation{$R *.dfm}uses Clipbrd;procedure TForm1.Button1Click(Sender: TObject);begin image1.Picture.Bitmap.Assign(Clipboard); image1.Picture.Bitmap.SaveToFile('c:/12.jpg'); image1.Picture.Bitmap.LoadFromFile('c:/12.jpg');end;

 

L

lastforest

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-03-29

• #6

应该是BITMAP ，要用jpeg要重新转换才行，如果你Clipboard图片是JPEG格式那要经过转换。

 

H

hn_yxb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2010-03-30

• #7

我把他存为WMF，就OK了，谢谢。