急急急~~~~~~~！请各位高手们帮帮我这个菜鸟！~~~

[cj77334931]

我用easyscan控件想做一个显示图片的程序段，其中代码为：EasyScanX1.ReadFromFile('d:\pic\11.tif');这里是绝对地址，可以正常显示图片，如果我想将PIC目录及11.tif都换成变量，使之能够更灵活的变换地址及图片，这语句该怎么写啊？？？？？？？？拜托了！~~~

[hthunter]

那就设置一个字符串变量啊-_-#

[hqhhh]

var
sPath, sFileName : String;
begin
sPath := 'd:\pic\';
sFileName := '11.tif';
EasyScanX1.ReadFromFile(sPath + sFileName);
end;

[xaocao]

for i:=1 to 100 do
begin
TempFileName:=ExtractFilePath(Application.Exename)+'PicDir\'+ IntToStr(i)+ '.tif';
if FileExists(TempFileName) then EasyScanX1.ReadFromFile(TempFileName);
end;

应用程序所在路径 PicDir 下 1..100.tif 文件装入, 够了吗？