关于路径问题，各位大虾帮帮忙，急！

Question

在Form里加入一个AVI，可是只能使用绝对路径。但是用户安装程序不一定在那个路径下。请问怎么把觉得路径改为相对路径。

Answer 1

ExtractFilePath(Application.ExeName) + <你的相对路径>

Answer 2

能具体点吗？我加入的是一个Animate组件显示avi，只是设置属性，没有使用任何代码。

Answer 3

一开始要用GIF动画的，可是使用GIF动画，它会闪，很不好看，所以使用ANIMATE组件显示AVI

Answer 4

application.exename得到你主程序文件的路径（包括文件名）
extractfilepath得到不含文件名的路径

Answer 5

ExtractFilePath(ParamStr(0)) + <你的相对路径>

Answer 6

ExtractFilePath(Application.ExeName) + <你的相对路径>
或
GetCurrentDir+<你的相对路径>
或
DWORD GetCurrentDirectory(    DWORD nBufferLength, // size, in characters, of directory buffer 
    LPTSTR lpBuffer  // address of buffer for current directory 
   );

Answer 7

ExtractFilePath(Application.ExeName)取得你可执行文件的路径，
然后再加上你的路径就可以了。

Answer 8

写在窗体的show事件里，让程序字段帮你设置属性。
ExtractFilePath(Application.ExeName)+'a.avi';