type
TLINK_FILE_INFO = record
Filename: array [0 .. MAX_PATH] of Char; { 目标文件名 }
WorkDirectory: array [0 .. MAX_PATH] of Char; { 工作目录或者起始目录 }
IconLocation: array [0 .. MAX_PATH] of Char; { 图标文件名 }
IconIndex: Integer; { 图标索引 }
Arguments: array [0 .. MAX_PATH] of Char; { 程序运行的参数 }
Description: array [0 .. 255] of Char; { 快捷方式的描述 }
ItemIDList: PItemIDList; { 只供读取使用 }
RelativePath: array [0 .. 255] of Char; { 相对目录，只能设置 }
ShowState: Integer; { 运行时的窗口状态 }
HotKey: Word; { 快捷键 }
end;
procedure TForm1.GetLinkFileInfo(LnkFileName: String; var LnkInfo: TLINK_FILE_INFO);
var
LnkObj : IUnknown;
ShellPFile : IPersistFile;
ShellLink : IShellLink;
WideFileName: WideString;
pfd : WIN32_FIND_DATA;
begin
FillChar(LnkInfo, SizeOf(LnkInfo), #0);
LnkObj := CreateComObject(CLSID_ShellLink);
ShellPFile := LnkObj as IPersistFile;
ShellLink := LnkObj as IShellLink;
WideFileName := LnkFileName;
ShellPFile.Load(PWideChar(WideFileName), 0);
ShellLink.GetPath(LnkInfo.Filename, 1024, pfd, SLGP_UNCPRIORITY); { 获取快捷方式文件路径 }
ShellLink.GetWorkingDirectory(LnkInfo.WorkDirectory, MAX_PATH); { 获取快捷方式工作目录 }
ShellLink.GetIconLocation(LnkInfo.IconLocation, MAX_PATH, LnkInfo.IconIndex); { 获取快捷方式图标文件，和图标索引 }
ShellLink.GetArguments(LnkInfo.Arguments, 1024); { 获取快捷方式运行参数 }
ShellLink.GetDescription(LnkInfo.Arguments, 1024); { 获取快捷方式描述 }
ShellLink.GetShowCmd(LnkInfo.ShowState); { 获取快捷方式运行方式，1：常规窗体；2：最小化；3：最大化 }
ShellLink.GetHotkey(LnkInfo.HotKey); { 获取快捷方式快捷键 }
ShellLink := nil;
ShellPFile := nil;
end;
-
等级
本版专家分：482结帖率 100% -
使用以下代码获取快捷方式的信息，文件名是对的，但是参数、图标文件名和索引等都是不正确的，得到的参数竟然是实际的Description，望给个正确可用的代码。
展开阅读全文
-
等级
本版专家分：14340勋章
-
- 黄花 2012年5月 Delphi大版内专家分月排行榜第二
-
-
蓝花
2012年4月 Delphi大版内专家分月排行榜第三
2011年8月 Delphi大版内专家分月排行榜第三
-
-
学习中。。。。。。。。。。。。。。。。。
-
等级
本版专家分：482
-
系统win7 x64，貌似是64位系统的问题，求解。
-
等级
本版专家分：8853勋章
-
- GitHub 绑定GitHub第三方账户获取
-
- 红花 2012年11月 Delphi大版内专家分月排行榜第一
-
-
黄花
2013年2月 Delphi大版内专家分月排行榜第二
2013年1月 Delphi大版内专家分月排行榜第二
-
-
蓝花
2013年7月 Delphi大版内专家分月排行榜第三
2012年10月 Delphi大版内专家分月排行榜第三
2012年9月 Delphi大版内专家分月排行榜第三
-
-
等级
本版专家分：482
-
验证了一下，效果一样。
例如"C:\Program Files\7-Zip\7zG.exe"的快捷方式，获取出来是"C:\Program Files (x86)\7-Zip\7zG.exe"
-
等级
本版专家分：482
-
坚持不懈的求解。
-
等级
本版专家分：11651 -
那就坚持不懈的尝试吧。
比如 Char -> WChar
-
等级
本版专家分：8800
-
type
TLINK_FILE_INFO = record
Filename: array [0 .. MAX_PATH] of Char; { 目标文件名 }
WorkDirectory: array [0 .. MAX_PATH] of Char; { 工作目录或者起始目录 }
IconLocation: array [0 .. MAX_PATH] of Char; { 图标文件名 }
IconIndex: Integer; { 图标索引 } 问题应该在这里！
Arguments: array [0 .. MAX_PATH] of Char; { 程序运行的参数 }
Description: array [0 .. 255] of Char; { 快捷方式的描述 }
ItemIDList: PItemIDList; { 只供读取使用 }
RelativePath: array [0 .. 255] of Char; { 相对目录，只能设置 }
ShowState: Integer; { 运行时的窗口状态 }
HotKey: Word; { 快捷键 }
end;
-
等级
本版专家分：8800
-
结构体里两个Integer类型都应该改：
IconIndex: Int32;
ShowState: Int32;
-
等级
本版专家分：0 -
我也遇到类似问题win7 64位系统加载出的原始路径从
C:\Program Files\Debugging Tools for Windows (x64)\windbg.exe
变为
+tszOriginPath 0x0031e800 L"C:\\Program Files (x86)\\Debugging Tools for Windows (x64)\\windbg.exe" wchar_t[260]
Program Files后多了个（x86）
这个怎么解决
-
等级
本版专家分：0
-
不知楼主解决该问题没，本打算用工作目录，拼接程序名，自己创建目标路径
后来请教了下他人，发现问题所在了，我使用的是vs2012
需要修改项目->属性->最顶上配置栏右边修改配置管理器->活动解决方案平台->改为x64（默认的是win32）
我修改后，就能正确区分Program Files与Program Files (x86)了
- 通过快捷方式lnk获得文件真实路径
通过快捷方式.lnk获得文件真实路径 前提 最近开发资源管理，需要预先上传大量资源，负责整理资源的同学因为空间不足，直接用快捷键方式整理视频资源OTZ，所以只能想办法通过.lnk文件获得文件的真实地址。 以下...
- 通过JShellLink获取快捷方式（.lnk格式文件）的真实路径
java 开发时希望获取到快捷方式的真实路径。去年已经实现过了，但最近再次使用时，确总是报错。异常信息如下： Exception in thread "main" java.lang.RuntimeException: Failed to load ShellLink at ...
- Win32：[实现] 根据快捷方式(*.lnk)获取其目标路径
转载：...#include <shlobj.h> #include <windows.h> //************************************ // Method: GetDestPathByLnk // Description:根据l...
- C#读写快捷方式（.lnk文件）
IWshRuntimeLibrary.WshShell shell = new IWshRuntimeLibrary.WshShellClass(); IWshRuntimeLibrary.IWshShortcut shortcut =(IWshRuntimeLibrary.IWshShortcut)shell.CreateShortcut("c://a.lnk");<br
- PYthon 获取快捷方式（Lnk文件）指向文件
百度根本搜不到相关内容，隔壁404网站才有，帮大家搬运回来 import sys import win32... ...WScript.Shell") shortcut = shell.CreateShortCut("t:\\test.lnk") print(shortcut.Targetpath) ...
- VC创建快捷方式
快捷方式： 现在，几乎所有的安装 程序都是在“开始”菜单中添加新的菜单项，或者在桌面上建立新的快捷方式(Shortcut)(有时还要...Windows 的快捷方式实际上是一个带有扩展名LNK的数据文件，其中包含有用于访问Windows
- VC++ 操作Windows快捷方式
Windows的快捷方式实际上是一个带有扩展名LNK的数据文件，其中包含有用于访问Windows某一对象（即在资源管理器中所能浏览的所有对象，包括文件，文件夹，驱动器及打印机等）的有关信息，如目标对象的路径和名称，...
- C++对快捷方式的操作
来源：http://www.itboyzone.com/?post=75 本文借鉴：http://bbs.51cto.com/thread-493507-1.html ... 程序是我理解后写的，可以运行，有些数据需要根据具体情况自己
- 如何在程序中创建快捷方式
Windows的快捷方式实际上是一个带有扩展名LNK的数据文件，其中包含有用于访问Windows某一对象（即在资源管理器中所能浏览的所有对象，包括文件，文件夹，驱动器及打印机等）的有关信息，如目标对象的路径和...
- 编程实现向开始菜单和桌面上添加快捷方式
编程实现向开始菜单和桌面上添加快捷方式 通过InstallShield for Microsoft Visual C＋＋ 6... 一、快捷方式的实质 Windows的快捷方式实际上是一个带有扩展名LNK的数据文件，其中包含有用于访问Windows某一对象（即在
- 在应用程序中创建快捷方式
1 引言 在Windows 3.x中，软件安装程序通常使用动态数据交换(DDE)的方法在程序管理器(Program Manager)中...现在，几乎所有的安装程序都是在“开始”菜单中添加新的菜单项，或者在桌面上建立新的快捷方式(Shortcut)
- 修改程序在桌面和开始的快捷图标
最近给客户升级产品时，有的时候出现客户修改了应用程序的图标，客户只做了升级...Windows的快捷方式实际上是一个带有扩展名LNK的数据文件，其中包含有用于访问Windows某一对象（即在资源管理器中所能浏览的所有对象，
- 给应用程序创建快捷方式VC实现
1 引言 在Windows 3.x中，软件安装程序通常使用动态数据交换(DDE)的方法在程序管理器(Program Manager)中...现在，几乎所有的安装 程序都是在“开始”菜单中添加新的菜单项，或者在桌面上建立新的快捷方式(Shortcut
- 如何创建快捷方式
1 引言 在Windows 3.x中，软件安装程序通常使用动态数据交换(DDE)的方法在程序管理器(Program Manager)中...现在，几乎所有的安装程序都是在“开始”菜单中添加新的菜单项，或者在桌面上建立新的快捷方式(Shortcut)
- VC学习资料收集（24）：在应用程序中创建快捷方式
在应用程序中创建快捷方式2004-5-12 0:24:32 阅读164次1 引言 在Windows 3.x中，软件安装程序通常使用动态数据交换(DDE)的方法在程序管理器(Program Manager)中创建一个程序组(Program Group)。随着Windows95/98/...
- 手工操作快捷方式
1、快捷方式的实质Windows的快捷方式实际上是一个带有扩展名LNK的数据文件，其中包含有用于访问Windows某一对象（即在资源管理器中所能浏览的所有对象，包括文件，文件夹，驱动器及打印机等）的有关信息，如目标对象...
- regedit是什么意思_注册表里的各项是什么意思
ryptOnMove--?NoWinKeys--在"资管"中禁用热键(?)NoSMHelp--隐藏"开始"中的"帮助"选项NoSMBalloonTip -->不显示"单击这里开始"DisallowCpl--指定不能使用的cpl文件(特殊)RestrictCpl--指定只能使用的cpl文件...
- 优启通制作系统u盘_优启通U盘启动盘制作工具BIOS+UEFI版v3.3.2019.0605
优启通是it天空出品的U盘启动盘制作工具，也是U盘网比较推荐的工具了，官方宣称不带后门绑定，大家可以自行测试，跟市面上其他的U盘启动盘制作工具不同的是，它字自带的是win10pe而非win8，老机器适用的还是2003pe这...
- 注册表
由于这些设置是针对那些使用Windows系统的用户而设置的，所以它与具体用户无关，它是一个公共配置信息，大家只须作一个了解就可以了。 HKEY_LOCAL_MACHINE包括了如下五个子键，如图: HARDWARE子键： 该子键
- 机器学习干货贴
1.Kaggle Ensembling Guide 摘要：Creating ensembles from submission files Voting ensembles. Averaging Ra... 2.[导读]Machine Learning Theory 摘要：机器学习相关理论，Machine Learning Theory - Part 1: ...
- JavaSE高级开发之JavaIO
在java.io包中，File类是唯一一个与文件本身操作（创建、删除、取得信息..）有关的程序类。 File类的基本使用 在windows下，路径记得加盘符如”C:” File（”pathname“）//构造 createNewFile（）//创建一个新...
- Notes Twenty one days-渗透攻击-红队-权限提升
** Notes Twentieth Day-渗透攻击-红队-权限提升(dayu) ** 作者：大余 时间：2020-10-5 请注意：对于所有笔记中复现的这些终端或者服务器，都是自行搭建的环境进行渗透的。我将使用Kali Linux作为此次学习的攻击者...
- vb学习笔记
VB基本语法， Visual Studio 2010操作简介
- PPC修改注册表大全 (注册表必看）（转载）
在PPC上很多功能可以通过改注册表实现下面是一些较为常用的注册表修改方法 一共有133条 前面是目录 后面对应的是实现功能和修改方法～～希望对大家有帮助 理论上通用与WM20035.0 6.1 6.5 1.修改“china Mobile”方法...
- vbs学习经典教程
Vbs脚本经典教材 —为什么要使用Vbs？ 在Windows中，学习计算机操作也许很简单，但是很多计算机工作是重复性劳动，例如你每周也许需要对一些计算机文件进行复制、粘贴、改名、删除，也许你每天启动计算机第...
- 教你十三个奇妙的WinRAR另类技巧
1.拒绝利用WinRAR捆绑的恶意程序 随着人们安全意识的提高，木马、硬盘炸弹等恶意程序的生存越来越成为问题，于是那些居心叵测的家伙绞尽脑汁又想出许多办法来伪装自己，利用WinRAR自解压程序捆绑恶意程序就是其中的...
- 注册表知识与技巧大全
注册表基础： ********系统文件夹：********* 名称路径 含义 AppData C:＼Windows＼Application Data 应用程序 Cache C:＼Windows＼Temporary Internet Files 浏览器缓存 Cookies C:＼Windows＼Cookies ...
- Qt IFW创建安装程序 4
在准备好程序的目录结构之后，接下来的任务就是要创建安装程序，这通常有很多好处： 压缩软件的大小； 简化软件的安装过程； ... 提供亲切、友好的操作界面；... 保护软件的完整性，避免被盗版、破解或植入病毒...
- C＋＋Builder 资料库 （转载）
C＋＋Builder 资料库 2005-03-03 15:14 13115人...2.用C++Bulider在WIN.INI中保存信息 3.如何在C＋＋Builder中检测硬件 4.C++Builder如何响应消息及自定义消息 5.利用C++ Builder开发动画DLL 6.用C++ Builder
- Windows Mobile常用程序和设置的调用
&...WINDOWS目录下的程序backlight.exe 电源设置btftpclient.exe 蓝牙资源管理器bubblebreaker.exe 连球游戏calc.exe 计算器calender.exe 日历camera.exe 相机clearstorage.e...