Uses Windows,Registry; function GetShellFolders(strDir: string): string; const regPath = '\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders'; var Reg: TRegistry; strFolders: string; begin Reg := TRegistry.Create; try Reg.RootKey := HK

Delphi 获取进程路径及命令行参数, 但有的进程获取时会报错,不知为啥 type PVOID64 = UINT64; _UNICODE_STRING = packed record Length : USHORT; MaximumLength : USHORT; Buffer : PWideChar; end; UNICODE_STRING = _UNICODE_STRING; PUNICODE_STRING =^_UNICODE_STRING; _UNICODE_STRING64 = pa

WinowsXP 的桌面的是在系统盘上,一但系统瘫痪需要重新安装系统时,总得记得去备份桌面的重要文件,如果一不小心忘记备份就重装系统的话,那些重要文件就一去不复返了.其实我们可以把桌面放到其它盘目录里,如D盘上,这样再重新系统时就不用备份桌面上的重要文件了,也不怕桌面文件因重装系统丢失了.其具体操作方法如下: 第1步,单击“开始→运行”,输入“regedit”,打开注册表编辑器. 第2步,依次展开注册表里的[HKEY_CURRENT_USER\Software\Microsoft\Windows

import java.io.File; import javax.swing.filechooser.FileSystemView; /** 显示本地磁盘根盘符,显示桌面路径 */ public class RDDemo { static File[] files; public static void main(String[] args) { FileSystemView sys = FileSystemView.getFileSystemView(); files = sys.getRo

delphi 在桌面屏幕上模拟鼠标单击 procedure TFrmUnicom.Button1Click(Sender: TObject); var oldPoint, newPoint: TPoint; begin GetCursorPos(&oldPoint); // 保存当前鼠标位置. newPoint.x := ; newPoint.y := ; MouseClick(newPoint); // 模拟放开鼠标左键. application.ProcessMessages; sleep(

Delphi创建虚拟桌面实现后台调用外部程序 核心提示:最近在做的一个软件,其中有一部分功能需要调用其它的软件来完成,而那个软件只有可执行文件,根本没有源代码,幸好,我要做的事不难,只需要在我的程序启动后,将那个软件打开,在需要的时候,对其中的一个文本框设置一些文字,再点击一个按钮就可以了.... 最近在做的一个软件,其中有一部分功能需要调用其它的软件来完成,而那个软件只有可执行文件,根本没有源代码,幸好,我要做的事不难,只需要在我的程序启动后,将那个软件打开,在需要的时候,对其中的一个文本框设

第一种: import winreg def get_desktop(): key = winreg.OpenKey(winreg.HKEY_CURRENT_USER, r'Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders',) return winreg.QueryValueEx(key, "Desktop")[0] print(get_desktop()) 第二种: #该方法在用户改变了桌面路径后,会失

{================================================================= 功 能: 创建 桌面.发送到....快速启动栏.开始菜单.程序菜单.右键菜单 快捷方式 参 数: FileName : 快捷方式执行文件名 Description : 快捷方式描述信息 Arguements : 快捷方式执行参数 ShowName : 快捷方式显示名称 Location : 快捷方式类别 id : 需设置状态的队列号(255 为设置) Create

链接里默认的--------------------------- Error --------------------------- I/O error for file "C:\ProgramData\Embarcadero\InterBase\gds_db\examples\database\employee.gdb" Error while trying to open file 系统找不到指定的路径. . --------------------------- OK ----

解决: 问是否更改那里 点 否 即可 题外话: win10桌面注册表路径 HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders%USERPROFILE%\Desktop

Environment.GetFolderPath(Environment.SpecialFolder.MyComputer); // // 摘要: // 获取由指定枚举标识的系统特殊文件夹的路径. // // 参数: // folder: // 标识系统特殊文件夹的枚举常数. // // 返回结果: // 如果指定的系统特殊文件夹实际存在于您的计算机上,则为到该文件夹的路径:否则为空字符串 ("").如果操作系统未创建文件夹.已删除现有文件夹,或者文件夹是不对应物理路径的虚拟目录(例

FileSystemView fsv = FileSystemView.getFileSystemView(); File com=fsv.getHomeDirectory(); System.out.println(com.getPath()); //这便是桌面的具体路径

//active 控件获取当前用户的桌面的路径的方法 var wsh = new ActiveXObject("wscript.shell"); listall(wsh.SpecialFolders("Desktop")); function listall(imagePath){ // active 控件读取桌面指定名称图片的方法 var fso=new ActiveXObject("Scripting.FileSystemObject");

使用notepa++打开project中的*.dproj文件,在里面找到相似例如以下的区域 <DCC_UnitSearchPath>T:\BusinessSkinForm1006Source;T:\数据库訪问\UniDAC4.3.8.20120624\Source;T:\数据库訪问\UniDAC4.3.8.20120624\Source\UniProviders\SQLite;T:\UniDAC4.3.8.20120624\Source;T:\UniDAC4.3.8.20120624\Sour

//当前用户桌面 File desktopDir = FileSystemView.getFileSystemView() .getHomeDirectory(); String desktopPath = desktopDir.getAbsolutePath();

我的文档 QString location = QStandardPaths::writableLocation(QStandardPaths::DocumentsLocation); 桌面 QString location = QStandardPaths::writableLocation(QStandardPaths::DesktopLocation);

string path = Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory): 生成的运行bin文件下的路径:AppDomain.CurrentDomain.BaseDirectory

//获取临时文件路径(支持安卓.IOS) function GeFileName(const AFileName: string): string; begin {$IFDEF ANDROID} Result := TPath.GetTempPath + '/' + AFileName; {$ELSE} {$IFDEF IOS} Result := TPath.GetHomePath + '/Documents/' + AFileName; {$ELSE} Result := AFileName

txtPath.Text = System.Environment.GetFolderPath(Environment.SpecialFolder.Desktop)

unit UShorCut; interface uses Windows, Classes, SysUtils,Dialogs, ShlObj, ComObj, ActiveX, Registry; procedure CreateUlr(ExeName,Description,FileName:string); implementation procedure CreateUlr(ExeName,Description,FileName:string); var ShLink: IShell