首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

请使用过inno setup的朋友帮忙,该如何处理

2012-02-21 
请使用过innosetup的朋友帮忙本人第一次使用innosetup,在用的过程中,不清楚要怎么加,开机就运行安装程序的

请使用过inno setup的朋友帮忙
本人第一次使用inno     setup,在用的过程中,不清楚要怎么加,开机就运行安装程序的代码(就像开机后QQ能自动运行,并在右下角显示出来),请高手们指教!    
以下是创建角本的代码:    
;     脚本用     Inno     Setup     脚本向导生成。    
;     查阅文档获取创建     INNO     SETUP     脚本文件详细资料!    
 
[Setup]    
AppName=test6    
AppVerName=test65    
AppPublisher=hehe    
AppPublisherURL=http:\\www.163.com
AppSupportURL=http:\\www.163.com
AppUpdatesURL=http:\\www.163.com
DefaultDirName=f:\test6\test6    
DefaultGroupName=test6    
OutputBaseFilename=setup    
SetupIconFile=F:\MAIL01B.ICO    
Compression=lzma    
SolidCompression=yes    
 
[Languages]    
Name:     "chi ";     MessagesFile:     "compiler:Default.isl "    
 
[Tasks]    
Name:     "desktopicon ";     Description:     "{cm:CreateDesktopIcon} ";     GroupDescription:     "{cm:AdditionalIcons} ";     Flags:     unchecked    
Name:     "quicklaunchicon ";     Description:     "{cm:CreateQuickLaunchIcon} ";     GroupDescription:     "{cm:AdditionalIcons} ";     Flags:     unchecked    
 
[Files]    
Source:     "F:\测试\Project2.exe ";     DestDir:     "{app} ";     Flags:     ignoreversion    
;     注意:     不要在任何共享系统文件中使用“Flags:     ignoreversion”    
 
[INI]    
Filename:     "{app}\Project2.url ";     Section:     "InternetShortcut ";     Key:     "URL ";     String:     "http:\\www.163.com "    
 
[Icons]    
Name:     "{group}\test6 ";     Filename:     "{app}\Project2.exe "    
Name:     "{group}\{cm:ProgramOnTheWeb,test6} ";     Filename:     "{app}\Project2.url "    
Name:     "{group}\{cm:UninstallProgram,test6} ";     Filename:     "{uninstallexe} "    
Name:     "{userdesktop}\test6 ";     Filename:     "{app}\Project2.exe ";     Tasks:     desktopicon    
Name:     "{userappdata}\Microsoft\Internet     Explorer\Quick     Launch\test6 ";     Filename:     "{app}\Project2.exe ";     Tasks:     quicklaunchicon    
 
[Run]    
Filename:     "{app}\Project2.exe ";     Description:     "{cm:LaunchProgram,test6} ";     Flags:     nowait     postinstall     skipifsilent    
 
[UninstallDelete]    
Type:     files;     Name:     "{app}\Project2.url "

[解决办法]
写注册表,具体看帮助。在[Registry]下面。
如:

[Registry]
Root: HKCU; Subkey: "Software\My Company "; Flags: uninsdeletekeyifempty


Root: HKCU; Subkey: "Software\My Company\My Program "; Flags: uninsdeletekey
Root: HKLM; Subkey: "Software\My Company "; Flags: uninsdeletekeyifempty
Root: HKLM; Subkey: "Software\My Company\My Program "; Flags: uninsdeletekey
Root: HKLM; Subkey: "Software\My Company\My Program "; ValueType: string; ValueName: "InstallPath "; ValueData: "{app} "


[解决办法]
[Icons]
Name: "{userstartup}\服务器 "; Filename: "{app}\服务器\Server.exe ";workingdir: "{app}\服务器 ";
[解决办法]
那需要实现托盘功能有这么一个控件RxTrayIcon1,在程序运行的时候最小化到托盘
[解决办法]
托盘功能,要么自己编程实现,要么使用控件.托盘控件在delphi2006里就有一个TrayIcon,不过功能不是很强,可以将就着用.
[解决办法]
CoolTrayIcon
http://www.delphi32.com/vcl/5086/

可以满足你的要求

热点排行