编译后的软件不能读jpg图象(100分)

S

sinahappy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-17

• #1

用delphi6.0作的程序，用到的是TOpenPictureDialog,和Timage，程序编译后执行在选择图象时不能打开.jpg的文件，而可以打开.bmp的，我加入了这行语句也不行openpicturedialog1.Filter := 'JPEG Image File (*.jpg)|*.jpg';

请教高手，谢谢！

 

K

kl78pgy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-17

• #2

你先检查你引用是否有问题，要不把部分代码贴出来看看

 

S

sinahappy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-17

• #3

这是关于选择图片的程序编译后打不开.jpg文件;
procedure TForm3.selectimageClick(Sender: TObject);
begin
openpicturedialog1.Filter := 'JPEG Image File (*.jpg)|*.jpg';
if openpicturedialog1.Execute then
image1.Picture.LoadFromFile(openpicturedialog1.FileName );

end;

 

A

andy263

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-18

• #4

uses JPEG;

var
Jpg: TJpegImage;
begin
Jpg:=TJpegImage.Create;
jpg.LoadFromFile('f:/1.jpg');
image1.picture.Bitmap.Assign(jpg);
Jpg.Free;
end

 

K

kl78pgy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-18

• #5

在uses中加上jpeg单元就能支持了,其他的我就不说了，结帐吧[]

 

S

sinahappy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-18

• #6

谢谢！

 

S

sinahappy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-02-18

• #7

给你们结帐了，呵呵。。。。。。