异常问题

Question

var
jpgImage : TJgegImage;
begin
  jpgImage := TJpegImage.Create;
  jpgImage.loadfromfile(filename);  // 如何处理这里产生的异常;
  ...
end;//如果filename不是指定的jpg格式，将会出现提示框，我想换成自已的指示

Answer 1

try
  jpgImage.loadfromfile(filename);  
except
  on E:Exception do
   ShowMessage(E.message); //你也可在這判斷
end;

Answer 2

try
jpgImage := TJpegImage.Create;
  jpgImage.loadfromfile(filename);  
except
//你的东西
end;

Answer 3

var
jpgImage : TJpegImage;
begin
jpgImage := TJpegImage.Create;
try
  try
  jpgImage.loadfromfile(filename);  // 如何处理这里产生的异常;
  except
  on E:Exception do
  raise  Exception.Create(e.Message );//抛出异常
  end;
finally
jpgImage.Free ;//不论是否失败，都要释放
end;
end;