请问delphi中的相对目录是怎样写的啊?

我现在用一个image控件，通过单击事件改变图片现在要load文件夹下pic目录下的图片要用到相对目录怎办啊？

解决方案 »

  1.   

    用extractFilePath函数,如下，装载exe文件所在目录的pic目录下的MyPic.jpg图片
    LoadFromFile(ExtractFilePath(Application.ExeName) + '\Pic\MyPic.jpg');
      

  2.   

    const
      BMPPath='.\load'路径 ＋文件就是ExtractFilePath(Application.Exename+BMPPath+'a.jpg')
      

  3.   

    在程序启动的时候用
    chdir(ExtractFilePath(Application.ExeName))然后用
    LoadFromFile('.\Pic\MyPic.jpg');
    或者
    LoadFromFile('Pic\MyPic.jpg');
    都可以！！！！
      

  4.   

    ExtractFilePath(Application.ExeName) + 'pic\xxx.bmp'