图片问题。 ( 积分: 100 )

我执行一个
opendialog.execute 后。
在另一按钮使用：
JPJPBT := TJPEGImage.Create;
JPJPBT.LoadFromFile('LABEL.JPG');
bitmpbt:=TBitMap.Create;
出错，
cannot open 'LABEL.JPG'?
不执执行opendialog.execute,又没有问题。


另我想问：（从一文件调用（可行，当有时出现上面的问题））
JPJPBT := TJPEGImage.Create;
JPJPBT.LoadFromFile('./LABEL.JPG');
bitmpbt:=TBitMap.Create;
bitmpbt.Width:=200;
bitmpbt.Height:=100;
bitmpbt.Assign(JPJPBT);
改成从现成图片调用（这样调用的东西怎么为空没有内容）
bitmpbt:=TBitMap.Create;
bitmpbt.Width:=imgbq.Picture.Bitmap.Width;
bitmpbt.Height:=imgbq.Picture.Height;
bitmpbt.Assign(imgbq.Picture.Bitmap);

我执行一个
opendialog.execute 后。
在另一按钮使用：
JPJPBT := TJPEGImage.Create;
JPJPBT.LoadFromFile('LABEL.JPG');
bitmpbt:=TBitMap.Create;
出错，
cannot open 'LABEL.JPG'?
不执执行opendialog.execute,又没有问题。


另我想问：（从一文件调用（可行，当有时出现上面的问题））
JPJPBT := TJPEGImage.Create;
JPJPBT.LoadFromFile('./LABEL.JPG');
bitmpbt:=TBitMap.Create;
bitmpbt.Width:=200;
bitmpbt.Height:=100;
bitmpbt.Assign(JPJPBT);
改成从现成图片调用（这样调用的东西怎么为空没有内容）
bitmpbt:=TBitMap.Create;
bitmpbt.Width:=imgbq.Picture.Bitmap.Width;
bitmpbt.Height:=imgbq.Picture.Height;
bitmpbt.Assign(imgbq.Picture.Bitmap);

应该使用文件的绝对路径吧

路径问题，用绝对路径打开图片
s := ExtractFilePath(ParamStr(0));
if s[Length(s)] <> '/' then
s := s + '/';
JPJPBT.LoadFromFile(s + 'LABEL.JPG');

LoadFromFile();里面必须是一个完整的路径例如你的里面加入一个LoadFromFile(‘c:/123.jpg’)就可以了;

JPJPBT := TJPEGImage.Create;
JPJPBT.LoadFromFile('C:/LABEL.JPG'); <-要指向路徑和文件名
bitmpbt:=TBitMap.Create;

OK,谢谢各位。果然如此。还是大富翁上能人多呀。每次的提的问题都有人及时回复。
分数有限。请各位见谅。