如何通过OpenDialog获取文件路径，下面是几个常用的方法，大家可以根据情况进行拼接：
ExtractFileName：得到文件名
   ExtractFilePath：得到文件地址，以“\”结尾 
    ExtractFileDir：得到文件目录，如果不是根目录则结尾不会有“\”  
如果你想得到文件名和路径，很easy(^-^)
var 
      path:WideString;
begin
     path:==ExtractFileDir(open.FileName)+'\'+ExtractFileName(open.FileName);
end;