转至繁体中文版     | 网站首页 | 图文教程 | 资源下载 | 站长博客 | 图片素材 | 武汉seo | 武汉网站优化 | 
最新公告:     敏韬网|教学资源学习资料永久免费分享站!  [mintao  2008年9月2日]        
您现在的位置: 学习笔记 >> 图文教程 >> 软件开发 >> Delphi程序 >> 正文
用Delphi编写安装程序(1)         ★★★★

用Delphi编写安装程序(1)

作者:闵涛 文章来源:闵涛的学习笔记 点击数:616 更新时间:2009/4/23 18:41:49

用Delphi编写安装程序(1)


[ 作者: 俞文群   添加时间: 2001-5-5 18:01:08 ]


当你完成一个应用软件的开发后,那么你还需要为该软件做一个规范化的安装程序,这是程序设计的最后一步,同时也是很重要的一步,因为运行安装程序往往是用户做的第一步操作。

  很多报刊文章介绍了许多如何利用installshield等工具软件来制作安装程序的方法,这种办法可以很快建立起较常见的安装模式,但用这种办法也有一些不足,如做成的安装程序一般较大;风格较单一;不能灵活的控制启动方式和快捷方式。其实安装程序的的几个运行步骤较固定,我们完全可以自己来编写安装程序。下面就详细介绍如何用DELPHI编写具有自己软件特色的安装程序。

  安装程序要达到的几个原则,如配置的一次性等,在有关杂志上已有许多文章介绍,就不再累述。这里主要介绍安装程序编写中几个主要过程:

1、将需要安装的程序制作成资源文件
  Step 1:编写myres.rc资源脚本文件,可用记事本等编写。

  MYDBSRC mydbsrcfile c:\resdemo\mynbdb.mdb

  MYDBJET mydbjetfile c:\resdemo\mdac_typ.exe

  MYDBAPP mydbappfile c:\resdemo\Tnbdemo.exe

  7001 Icon c:\resdemo\setup.ico

  Step 2:利用BRCC32编译生成资源文件myres.res。

  brcc32.exe myres.rc

2、编写安装程序代码
  Step 1: 在setup.dpr文件中加入{$R mymyres.RES} 语句,这样在编译文件时包含资源文件。

  Step 2: 编写安装程序背景界面。

   //界面色彩渐变效果是通过用渐变的画刷刷绘依次相邻的矩形块实现的。

  //也可以实现其它特殊效果的安装界面。

  var i,j:Integer;

  Dct:TRect;

  begin

  form1.WindowState:=wsMaximized;

  j:=form1.width;

  //获得表单高度

  for i:=0 to 255 do

  //此处设置RGB()中一个颜色值

  begin

  Canvas.Brush.Color:=RGB(0,0,255-i);

  //每次画矩形的画刷颜色 (左,上,右,下)

  //Dct:=Rect(i*2,0,(i+1)*2,j);

  Dct:=Rect(0,i*2,j,(i+1)*3);

  //每次刷绘的矩形区域

  Canvas.FillRect(Dct);

  Form1.Canvas.TextRect(Dct,30,40,''''宁波大学课件管理系统 v1.0'''');

  //填充颜色

  end;

  end;

  Step 3:创建主程序工作目录

  //设置目录环境及配置文件

  if not DirectoryExists(EdtDir.Text) then

  //   if MessageBox(getfocus,''''该目录不存在,是否创建该目录?'''',''''询问'''',1) = idOK then

     try

       ForceDirectories(EdtDir.Text);


没有相关教程
教程录入:mintao    责任编辑:mintao 
  • 上一篇教程:

  • 下一篇教程:
  • 【字体: 】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口
      注:本站部分文章源于互联网,版权归原作者所有!如有侵权,请原作者与本站联系,本站将立即删除! 本站文章除特别注明外均可转载,但需注明出处! [MinTao学以致用网]
      网友评论:(只显示最新10条。评论内容只代表网友观点,与本站立场无关!)

    同类栏目
    · C语言系列  · VB.NET程序
    · JAVA开发  · Delphi程序
    · 脚本语言
    更多内容
    热门推荐 更多内容
  • 没有教程
  • 赞助链接
    更多内容
    闵涛博文 更多关于武汉SEO的内容
    500 - 内部服务器错误。

    500 - 内部服务器错误。

    您查找的资源存在问题,因而无法显示。

    | 设为首页 |加入收藏 | 联系站长 | 友情链接 | 版权申明 | 广告服务
    MinTao学以致用网

    Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved.
    闵涛 投放广告、内容合作请Q我! E_mail:admin@mintao.net(欢迎提供学习资源)

    站长:MinTao ICP备案号:鄂ICP备11006601号-18

    闵涛站盟:医药大全-武穴网A打造BCD……
    咸宁网络警察报警平台