Question

批处理 将一个文件a.txt考到delphi的安装目录下，如“C:\Program Files (x86)\Borland\Delphi7\Bin”

这个安装目录不是定死的，需要获取一下，比如xp，win7,装的目录就不同，求高手帮忙

Answer 1

你这个目录应该是固定的吧 Delphi7/Bin。如果不是我就整不了了，下面哥们的方法我还不会用，只能用笨方法，就是说你的目录是固定的，或program files(x86) 或program files，我只能在批处理中让你自己选择了

如果目录不对你就自己改一下里面的目的目录吧

     【存为bat文件，放在a.txt同目录下执行即可】

• Program files(x86) 是64位系统默认的32位程序安装目录，64位中的Program files这个文件夹就是默认放64位程序的了

• 32位系统默认的就是Program files了

  @echo off
  color fc
  
  :menu
  cls
  echo.
  echo   1. 复制到 Program Files(x86)
  echo   2. 复制到 Program Files
  echo   0. 退出
  
  set /p option=选择：
  if %option%==1 goto 1
  if %option%==2 goto 2
  if %option%==0 exit
  
  
  :1
  copy /y a.txt "C:\Program Files (x86)\Borland\Delphi7\Bin"
  echo 已复制到 C:\Program Files (x86)\Borland\Delphi7\Bin
  echo 任意键回到菜单 & pause >nul
  goto menu
  
  :2
  copy /y a.txt "C:\Program Files\Borland\Delphi7\Bin"
  echo 已复制到 C:\Program Files\Borland\Delphi7\Bin
  echo 任意键回到菜单 & pause >nul
  goto menu

Answer 2

可以通过注册表查找 delphi 的安装路径,你手动打开注册表找到 delphi 的安装路径所在注册表项,记录下来,然后就可以用批处理中 reg query 命令读取安装路径了.而且准确高效.