在單元的聲明部分加入以下代碼:
procedure CreateLink(ProgramPath, ProgramArg, LinkPath, Descr: String);
其中,ProgramPath是快捷方式的目標文件的全路徑(包括文件名和路徑);
ProgramArg是目標文件的參數;LinkPath是快捷方式的全路徑;Descr是對此快捷方式的描述。
在單元的實現部分加入以下代碼:
procedure CreateLink(ProgramPath, ProgramArg, LinkPath, Descr: String);
var
延伸閱讀
文章來源于領測軟件測試網 http://www.kjueaiud.com/