在Delphi中操作快捷方式

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..CCH_MAXNAME] of char; //快捷方式的描述

ItemIDList:PItemIDList; //只供读取使用

RelativePath:array[0..255] of char; //相对目录，只能设置

ShowState:integer; //运行时的窗口状态

HotKey:word; //快捷键

end;

3. 函数

1)取得快捷方式或者修改信息函数LinkFileInfo

要注意的是，需要在Uses部分添加comobj,activex,shlobj这三个单元，但是在本文例子中因为要转化热键为文本和使用Windows的API ShellExecute

文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!