Question

delphi中Timage控件动态加载图片

有三个文件夹分别为小明、小红、小芳；每个文件夹中都存放有对应的身份证、学历证、资格证（都是jpg格式）。image1、image2、image3分别存放身份证、学历证、资格证。双击小红的名字，则分别在image1、image2、image3显示小红的身份证、学历证、资格证；以此类推；
上述功能如何实现（带路径循环读取图片）；如果有人的身份证图片没有，使用循环时，如何跳过（避免系统提示“找不到文件”）

Answer 1

你可以把加载图片部分使用类似：

try
  Image1.Picture.LoadFromFile(预测的图片路径);
except
  on e: EFOpenError do
  begin
    //如果找不到图片。则在这里执行没有图片的提示
  end
  else
  begin
    //如果图片因为其他的原因加载错误则在这里处理
  end;
end;

当然，这样做的话，可能调试的时候依然会弹出图片不存在的提示(直接运行时则没有)。如果你想要避开提示的话。也可以在加载图片之前使用FileExists函数来确认文件是否存在，如下：

if FileExists(预测的图片路径) then
begin
  //如果文件存在则加载图片
  Image1.Picture.LoadFromFile(预测的图片路径);
end
else
begin
  //如果找不到图片。则在这里执行没有图片的提示
end;

Answer 2

应该用不到循环吧？双击名字的时候触发动作，读取指定目录下的3张指定名称的图片。分别显示在3个timage中。如果其中某图片找不到，则跳过。