delphi 应用程序路径,应用程序对路径的访问被拒绝

如果写一个简单的delphi程序，delphi会弹出保存路径对话框，如何在DELPHI路径begine edit 1 . text:extra中获取文件。edit1.text:extract(应用程序，ExeName)；这是一个获取自己目录的函数，两个函数的区别在于，a 路径后面跟一个\，如果要获取打开的文件，不使用a 路径使用opendialog控件(在dialogs控件组下):如果opendialog 1，则开始，execute the edit 1 . text:open dialog 1。显示在文本框中，。

begin edit 1 . text:extract(应用程序。ExeName)；edit1.text:extract(应用程序。ExeName)；这是一个获取自己目录的函数。两个函数的区别在于，a 路径后面跟一个\，如果要获取打开的文件，不使用a 路径使用opendialog控件(在dialogs控件组下):如果opendialog 1，则开始。execute the edit 1 . text:open dialog 1。显示在文本框中。。

你写一个简单的delphi 程序，比如在表单上放一个标签和一个按钮，双击按钮，写一个代码label1。标题:代码编辑器光标处的“记录仓库货物出库单”；然后按集成开发环境(IDE)菜单上的保存按钮，delphi会弹出保存路径对话框，在其中可以选择路径像保存WORD文档一样保存文件。

您可以使用默认文件名，也可以使用不以数字开头的文件名。保存后，会再次弹出保存对话框。这一次，保存项目文件名。不要和单位文件名重名，也不要以数字开头。将保存的位置保持两次不变(最好)，然后点击DELPHI工具栏上的绿色三角形按钮。如果没有错误，就会出现run表单。你可以点击你放在上面的按钮，标签上的字是

extract(应用程序。Exename)目前路径上层可以使用extract(应用。Exename) \...\ 当然，很多方法都没有经过深思熟虑。假设你得到c:\abcde\fgh\只删除倒数第二个之后的所有字符串\的提取结果。Extract:根据参数内容(绝对文件名)获取文件所在的路径(不含最后一个斜杠)。获取当前dir:获取当前路径，但是注意这个值会在调用OPENDIALOG或者SAVEDIALOG之后动态改变。

获取其他软件路径通常的做法是读取注册表(如果那个软件是写入注册表的)，对于QQ也是一样。你可以在有QQ功能的机器上试试腾讯或者QQ.exe，比如有HKEY_LOCAL_MACHINE\SOFTWARE\有一个D:\Tencent\QQ\Bin\QQ.exe在微软\ Windows \ Current Version \ Shared DLLS下(当然还有很多其他的注册表写入QQ安装目录)，然后就简单了，直接读取这个位置就行了，如何读取注册表就不言而喻了。