收汇的英文译语怎么说-报效祖国演讲稿
2023年4月4日发(作者:会计师资格)
InnoSetup详细教程
一.关于InnoSetup如何在安装时播放音乐方法(1):在
脚本编译里的[Code]与[Files]段处添加以下代码:[Code]
FunctionmciSendString(lpszCommand:String;
lpszReturnString:Integer;cchReturnLength:Integer;
hwndCallback:Integer):Integer;
external\'\'mciSendStringA@call\'\';
procedureInitializeWizard();
var
BGMusicFile,SplashFile:string;
SplashForm:TForm;
SplashFileName:String;
I:Integer;
beginExtractTemporaryFile(ExtractFileName(ExpandConstant(\'\'
{tmp}3\'\')));
SplashForm:=(nil);
withSplashFormdo
begin
mciSendString(ExpandConstant(\'\'play
{tmp}3\'\'),0,0,0);
Close;
Free;
end;
end;[Files]
Source:\"C:3\";Flags:dontcopy或者Source:
\"C:3\";DestDir:\"{tmp}\";Flags:dontcopy代码说
明:[Code]中蓝色代码{tmp}与3的意思是播放inno
setup安装时创建的临时文件夹内的3音乐文件!
[Files]中C:3是你音乐源文件的地址,填自己的音
频名称与音频格式。Flags:dontcopy的意思是在安装时将音
乐文件放到InnoSetup所创建的临时文件夹内,并且在完成
安装后删除此音乐文件!二.关于InnoSetup如何修改安装向
导内的图片这个很简单,只需来到InnoSetup程序的根目录
找到与
这个2个图片文件替换即可。其中:
为左侧图如图(1);则为右上角
图标如图(2)。说明:这个图片的大小
为:164这个图片的大小
为:5555(这2个图片大小我是按照以前默认大小改的,
其它比例大小我没试过,有兴趣的话可以自己试下。)三:
关于InnoSetup如何在安装分割线里加入文字如图:只需要
加入一个[Messages]段并在此段下输入以下代码:
BeveledLabel=Professional代码说明:其中绿色部分
Professional为自定义文字,可以自行随意输入!四:关于Inno
Setup如何韦编三绝的主人公 创建多个桌面快捷方式这个也是很简单只要在
[Icons]段加入以下代码:Name:\"{commondesktop}程序名称
1\";Filename:\"{app}\";Tasks:desktopicon;
WorkingDir:\"{app}\"Name:\"{commondesktop}程序名称2\";
Filename:\"{app}\";Tasks:desktopicon;
WorkingDir:\"{app}\"说明:程序名称1and程序名称2就是
快捷方式的名字,这个自己定义。
为快捷方式位于根目录的源执行文件。(还有值
得注意的是,如果你一开始选择的是使用向导来创建安装并
且在向导快捷方式项目已经对是否创建桌面快捷方式进行
了打勾,那么系统会自动在[Icons]段自动创建主执行文件的
快捷方式,此代码为:Name:
\"{commondesktop}{#MyAppName}\";Filename:
\"{app}{#MyAppExeName}\"对付的近义词是什么 ;Tasks:desktopicon这条代
码中{#MyAppName}的意思是使用安装文件夹内主执行文
件的程序名字,{#MyAppExeName}的意思是安装文件夹内
主执行文件的源执行文件名称。请大家注意的是避免重复建
立快捷方式。如果想用这段代码请在后面添加绿色部
分;WorkingDir:\"{app}\"这个是快捷方式的起始位置。在默认
情况下没有这部分。可能会导致快捷方式无法打开!)09.08.26
更新增加(有些游戏或者软件的主执行文件不在安装目录内
而在安装目录的子文件内,像这种情况的解决方法如下):测
试修正
中!-----------------------------------春残李清照 --------------------------------------
----------------------------------Name:\"{commondesktop}快捷方
式程序名称\";Filename:\"{app}\";Tasks:desktopicon;
WorkingDir:\"{app}\"说明:其中蓝色字部分是要注意的:
1.{app}将进行子目录添加,如:{app}子文件夹1子
文件夹2.{app}将进行对应添加,如:{app}子文件
夹1子文件夹
2---------------------------------------------------------------------------
--------------------------------五:关于InnoSetup安装欢迎界面
文字与安装向导文字颜色修改我们只需创建[Code]段在此段
添加如下代码:[Code]//千万别忘记我噢~~procedure
InitializeWizard();begin//改变欢迎页面文字的颜色(如
图):=
clNavy;:=clTeal;//改
变其他页面文字的颜色(如
图):=
clred;:=
clBlue;end;说明:代码中浅绿色标识的为颜色,可以随意替
换目前只发现支持以下颜色!
-----------------------------------------------------------------------------
------------------------------clBlack(黑色),clMaroon(暗红),
clGreen(绿色),clOlive(橄榄绿),
clNavy(深蓝),clPurple(紫色),clTeal(深青),clGray(灰
色),
clSilver(浅灰),clRed(红色),clLime(浅绿),clYellow
(黄色),
clBlue(蓝色),clFuchsia(紫红),clAqua(青绿),clWhite
(白色)。
-----------------------------------------------------------------------------
------------------------------六:InnoSetup的打包压缩与分割压
缩bin文件的方法1.分割bin文件,在[setup]段添加:
DiskSpanning=true
DiskSliceSize=2100000000说明:DiskSliceSize=2100000000
是按字节计算,可随意输入想分割的数。貌似最多吕氏春秋简介 不能超过
tup的压缩格式,默认是按照7Z的压缩
算法进行压缩的。还是在[setup]段:找到:Compression=lzma
说明:其中绿色的lzma为默认压缩格式,也就是7z的默认
压缩方式进行压缩。下面在提供一种实用的压缩方式,也就
是7z的极限压缩。
-----------------------------------------------------------------------------
------------------------------Compression=none(此命令为不压
缩。)Compression=lzma/ultra64(此压缩为7z极限压缩算法,
耗内存很大时间也会长些。不过压缩率很不错!)
-----------------------------------------------------------------------------
------------------------------七.关于InnoSetup在安装欢迎界面时
添加自己的文字方法姗姗来迟的意思解释 (如图)方法(1):1.添加[Code]段2.
在此段下输入以下代码:procedure
InitializeWizard();varLabelDate:
Tlabel;ze:=
true;LabelDate:=
(WizardForm);ze:=
true;n:=\'\'本程序由Professional制作
\'\'#10#13#10#13\'\'欢迎PC爱好者共同讨论
\'\'#10#13#10#13\'\'Professional:
/pfia\'\';:=
ePage;:=
;:=
++80;end;方法(2):1.添
加[Messages]段;2.在此段下输入该代码:ClickNext=单击“下
一步”继续,或单击“取消”退出安装程
序。%n%n%n%n%n%n%n%n本程序由Professional制
作%n%n欢迎PC爱好者共同讨论%n%nProfessional:
/pfia说明:1.方法一与方法二中代码绿色角声满天秋色里 字
部分为个人喜好可随意更改处。2.方法一绿色字中#10#13为
组合换行符;方法二绿色字中%n为换行符。<学过C的朋
友应该知道在C语言中换行符为n,千万不要搞混。。>
换行符可按照自己喜好随意增减。3.千万不要忘掉方法一代
码绿色字内的一对单引号\'\'\'\'。(因为那些文字都是字符串,方
法2中不用添
加。)-------------------------------------------疏影姜夔译文及赏析 ---------------------------
-------------------------------------八.关于InnoSetup显示关于按
钮以及网站超链接(如图)
添加[Code]段,在此段下输入代码:procedure
AboutButtonOnClick(Sender:TObject);
begin
MsgBox(\'\'欢迎访问
Professional\'\'#13#13\'\'/pfia\'\',mbInformation,
mb_Ok);
end;procedureURLLabelOnClick(Sender:TObject);
var
ErrorCode:Integer;
beginShellExec(\'\'ope泰戈尔的名言 n\'\',\'\'/pfia\'\',\'\'\'\',\'\'\'\',
SW_SHOW,ewNoWait,ErrorCode)
end;procedureInitializeWizard();
var
AboutButton:TButton;
URLLabel:TNewStaticText;begin
AboutButton:=(WizardForm);
:=Width-
-
;
:=;
:=;
:=;
n:=\'\'关于(&A)\'\';
k:=@AboutButtonOnClick;
:=WizardForm;URLLabel:=
(WizardForm);
:=+-
-2;
:=++10;
n:=\'\'Professional\'\';
:=[fsBold,fsUnderline];
:=clBlue;
:=crHand;
k:=@URLLabelOnClick;
:=\'\'宋体\'\';
:=ScaleY(-13);
:=WizardForm;
:=\'\'点击访问相关网站\'\';
nt:=True;
end;代码说明:①:绿色代码部分是点击关于按钮后弹出的
信息,#13为换行符。②:紫色代码部分是点击超链接信息
后转到的网站地址。③:粉色代码部分为关于按钮的名称,
(&A)为快捷键,可随意填写字母。④:蓝色代码部分为
超链接文字名称。⑤:黄色代码部分为超链接文字名称颜色,
clBlue可改为其它颜色。如:clBlack(黑色),clMaroon(暗
红),clGreen(绿色),clOlive(橄榄绿),
clNavy(深蓝),clPurple(紫色),clTeal(深青),clGray(灰
色),
clSilver(浅灰),clRed(红色),clLime(浅绿),clYellow
(黄色),
clBlue(蓝色),clFuchsia(紫红),clAqua(青绿),c庙组词语 lWhite
(白色)。⑥:红色代码部分为超链接文字名称字体,可修
改为黑体字型等。⑦:橙色代码部分为鼠标指针放到超链接
文字标题上显示的提示语。
-----------------------------------------------------------------------------
---------------------------对于innosetup,封装很简单,根据向导
来就可以了。但离做出自己想要的效果还有一些差距。现在
将网上收集到的资料整理下,共享之,大家一同提高。一、
实现安装过程图片替换:效果就是这样的:为了方便,首先
把你的那些图像用编号命名,比如,,
以此类推。进度栏是随着描写山的四字词语 文件复制过程变化。你可
以决定当复制某个文件时,图像更换到某个指定的图像。参
看下面的示例:[Setup]AppName=My
ProgramAppVerName=MyProgramversion
1.5DefaultDirName={pf}MyProgramDefaultGroupName=My
Program[Files];把图像文件(,,
等等)打包Source:\"imges*.bmp\";DestDir:\"{tmp}\";Flags:
dontcopy;更换到图像rce:\"\";
DestDir:\"{app}\";BeforeInstall:ChangeImageWhileInstall(1);
继续其它文件...;;更换到图像rce:
\"\";DestDir:\"{app}\";BeforeInstall:
ChangeImageWhileInstall(2);继续其它文件...;;更换到图像
rce:\"\";DestDir:\"{app}\";BeforeInstall:
ChangeImageWhileInstall(3)[Code]varChangingImg:
TBitmapImage;procedureInitializeWizard();begin//释放图像
文件
ExtractTemporaryFile(\'\'\'\');ExtractTemporaryFile(\'\'pic1.
bmp\'\');ExtractTemporaryFile(\'\'\'\');ExtractTemporaryFile
(\'\'\'\');//在安装页面创建位图ChangingImg:=
(WizardForm);:=
lingPage;:=
ScaleX(0);:=
ScaleY(78);:=
ScaleX(417);:=
ScaleY(145);h:=
True;omFile(ExpandConstant(\'\'{t
mp}\'\'));//初始时的图像;Procedure
ChangeImageWhileInstall(ImgNo:Integer);//更改位图
omFile(ExpandConstant(\'\'{t
mp}pic\'\')+IntToStr(ImgNo)+\'\'.bmp\'\');end;
更多推荐
Inno是什么意思o在线翻译读音例句
发布评论