怎样给程序设置一个图标(20分)

H

huanle

Unregistered / Unconfirmed
GUEST, unregistred user!
 我想给自己的小程序设置一个桌面图标,不知道怎么做,谢谢帮忙!
 
一看就知道是个新手 和我一样 呵呵
 
在编译之前,在IDE界面的PROJECT菜单里的OPTION的Application页
 
IDE界面的PROJECT菜单里的OPTION的Application里的LoadIcon
 
楼上都 说清楚了。工程选项中加入就行了,Icon图标。
 
说的是快捷方式吧
给你段代码
function TMCustomShortCut.SaveToLinkFile(LinkFileName: WideString):Boolean;
var
ShellLink:IUnknown;
begin
Result:=False;
ShellLink:= CreateComObject(CLSID_ShellLink);
with ShellLink as IShellLinkdo
begin
SetShowCmd(ShowCmds[Self.FWindowState]);
SetArguments(Pchar(Self.FParameters));
SetDescription(Pchar(Self.FDescription));
SetPath(PChar(Self.FTarget));
SetWorkingDirectory(Pchar(Self.FWorkDir));
end;
(ShellLink as IPersistFile).Save(PWChar(LinkFilename),False);
end;
 
easy,找到你的程序,用鼠标右键点击,选择“复制”,然后用鼠标右键点击桌面,选择“粘贴快捷方式”,完成。
 
Project中的Option选项中,找到Application页 ,点击 Load Icon选择就行.
 
哈哈,楼上的答案都是正确的,而且iamy 更牛,在程序里建快捷方式。
 
好,楼上所言甚善
 
IDE界面的PROJECT菜单里的OPTION的Application里的LoadIcon
 
顶部