Delphi 2005赏析

【 tulaoshi.com - 编程语言 】

　　一、概述

　　Borland 希望Delphi 2005 能成为Windows平台上的最终的完整解决方案，为此 Delphi 2005 集成了 Delphi, C#, Microsoft .NET Framework and Win32 ，支持图形用户接口(GUI), Web开发, 数据库、富客户端应用程序（rich-client applications）等多方面的开发, 集成软件生命周期管理（ALM）功能及快速开发（即RAD）的能力。在Delphi 2005中，所提供的IDE使Windows平台的开发更快速，更容易，并且新的版本能更好的支持win32 标准，同时还提供了一个世界级水平的编译器和调试器；他还提供了大量的可重用的组件，一个强大的代码生成向导，可以帮你更快的产生你所想要的代码；Delphi 2005 还 包括了崭新的第二代企业核心对象技术 (Borland Enterprise Core Objects II即ECO II) 。ECO II 为模型驱动的.NET企业应用提供了开发框架。Delphi 2005还能协助开发团队在创建新应用的同时，维护及改进现有的Windows应用。 总之，凭借Delphi 2005，开发人员既能继续改进Win32应用，又能采用.NET及ASP.NET，是一款值得期待和使用的开发工具。

　　二、Delphi 2005的新特性

　　有了大概的印象之后，也许你已经很急于了解Delphi 2005所提供的各种引人注目的功能了吧。下面我们将详细的来了解Delphi 2005 的新的特性。

　　（1）集成开发环境

　　1、一个集成开发环境，支持多种平台

　　在Delphi 2005 的集成开发环境中，为广大用户提供了统一而又强大的开发环境。在这里你可以用Delphi 或者 C# 等语言来创建win32 应用程序或者是创建.NET程序，也可以使用ASP.NET创建动态网页或者传统的客户端应用程序。在Delphi 2005 中，IDE还可以保证你的程序如你在设计时所看见的一样，即通常所说的所见即所得的方式。例如：如果你要用ASP.NET建立一个web应用程序，html设计可以保证你在设计时的页面显示状态，同时还可以通过拖拽组件到页面上来建立你所要的web应用程序，但你却可以只写很少甚至不写一点代码。如下图所示：

　　在这里选择你想要建立的工程类型，在向导帮助你建立起所要的框架。

　　当然新的开发环境中，同样可以开发传统的win32应用程序。Delphi 2005 提供了一个全面的而又强大的Delphi语言开发win32应用程序的环境。其中包含了众多我们所熟知和不熟悉的可视化组件库（Visual Component Library 即VCL），同时又增加了一些功能强大的vcl控件供用户使用。如下图所示：

　　2、使用C# 或者 Delphi 开发.NET 框架应用程序

　　.NET已经推出了很多年了，他同时也代表着未来软件技术的发展方向。所以Delphi 2005 集成了能够完全支持.NET框架的SDK（应用程序开发包）。在Delphi 2005 中包含了基于ASP.NET、Windows 窗体、网服务器和组件开发的图形设计环境，在其中你可以使用Delphi语言，也可以使用C#语言。在这个.NET框架中Delphi既可以使用.NET SDK来创建windows窗体和网窗体应用程序，又可以使用Borland的可视化组件库（Visual Component Library即vcl.NET）。同时你还可以很容易的将以前的基于win32的vcl应用程序移植到vcl.NET环境下。如下图所示：

　　当我们用Delphi 2005 打开一个以前的工程时，系统会提示我们在工程被打开时，要被升级。如下图所示：

　　我们有两种选择，可以继续传统的win 32 应用程序，也可以升级到Delphi的.NET版本。

　　3、改进的工程开发环境

　　Delphi 2005 在多年的基础上，依靠Borland工程师对工作的了解，所以做了许多的改动。其中最有特色的是对IDE中工具栏的改造。可以根据所建工程类型的不同自动的显示不同工程中所提供和能够使用的组件和控件。我们可以在主界面的右下角进行选择。如下图所示：

　　左上角的工程结构窗口则显示了组件和工程之间的关系，使开发人员都工程里各部分的关系更为清晰。如下图所示：

　　最让人关注和喜爱的还要数，Delphi 2005 代码编辑器的演变。在代码编辑器中，Borland工程师为广大Delphi用户提供了非常体贴的提示标签。如下面两幅图中所示：

　　图一

　　图二

　　当我们将鼠标指向并放在一个变量上面时，编译器会为我们显示出，相应的提示，或者是错误的提示，如变量没有定义或者是所指示函数的说明。

　　还有一种提示则是，对要求对应出现的符号的提示。如括号和引号等。当我们在括号中写入内容，或者选择内容是，编译器会将对应的符号换色显示，从而避免低级错误的发生。如下图所示：

　　Delphi 2005 的多样性，不仅表现在工程选择和语言上，还扩展到了调试器上。在Delphi 2005 中你可以同时调试win 32和.NET两种平台上的应用程序。如下图所示：

　　对于一个工程为变量改名是在所难免的。Delphi 2005 中也提供了一个在整个文件中批量改名的功能。使用它用户可以便利的将同一文件中的一个变量的所有名字都改过来，包括全局变量。如下图所示：

　　也可以改变一个对象或成员变量的名字。如下图所示：

　　（2）语言的发展和演变

　　Delphi 2005 中包含了新的语言特征，新增For ... in 语法。其用法类似Visual Basic的For Each ：如下图所示：

　　你也可以自己输入下面代码，体验一下。

procedure TestNewFor();var　StrList: TStrings;　S: String;begin　StrList := TStringList.create();　StrList.Add('Borland Delphi');　StrList.Add('Borland C++ Builder');　StrList.Add('Borland JBuilder');　for S in StrList do begin　　ShowMessage(S);　end;end;

　　（3）代码管理

　　在Delphi 2005 中还提供了对代码的管理。其中清晰的显示了，用户对代码所做的修改过程。如下图所示：

　　当然还包括很多的功能，我们可以在以后的使用中不断的体会Delphi 2005 中所提供的便捷性。

　　三、安装

　　Delphi 2005 一共是3张盘，其中第一张是Delphi 2005，我们可以在光盘中，找到setup.exe文件，双击，就进入了安装界面，如下图所示：

　　图一

　　图二

　　点击next，进入下一页：

　　图三

　　在这里Delphi 2005 会检查你的软件环境。在安装的Delphi 2005前你必须先安装以下程序：

　　先安装 IE6.1 ；

　　再安装.NET_framework 1.1;

　　再安装.NET_framework 1.1 Pack;

　　再安装 .NET_Framework_SDK_1.1_CHS;

　　再安装 J# net V1.1;

　　再安装 msxml;

　　否则就会出现如下提示：

　　提示一

　　提示二

　　如果你已经安装了上述软件，就会进入下一页安装界面：

　　点击next，进入下一个页面：

　　选择 I accept the terms in the license agreement ,进入下一页：

　　填入用户名称，和单位，点击next进入下一页：

　　在这里我们可以选择完全和自定义两种安装方式，一般情况选择"complete",点击next，进入下一页：

　　同样是选择第一项，点击next按钮，进入下一页：

　　在这里你可以选择安装的路径。然后点击next按钮进入下一页：

　　在这里可以选择要按装的组件。在要安装的组件项前，点击复选按钮，打上对构表示已选中。之后点击next进入下一页：

　　点击install，到下一步，开始安装：

　　直到安装结束。

　　四、实战

　　还是让我们通过一个实例，来对Delphi 2005做更亲密的接触吧。

　　下面是一个简单的例子，其中我们主要实现了一个随机出题的软件，虽然我们只实现了最多10个小于10的数字的加法，但其中显示了Delphi 2005 中的主要功能。

　　从左下角的开始 〉 程序〉 Borland Delphi 2005 〉 Delphi 2005 如下图所示：

　　打开Delphi 2005 ，启动界面如下图所示：

　　（3）新建工程

　　我们点击菜单栏中的 file ，在下级菜单中选择 windows forms application Delphi for .NET ，如下图所示：

　　也可以选择 other ... 选项，打开

　　在这里，我们选择windows forms application，这种工程文件是可以在windows中直接运行的exe可执行文件。点击 ok 按钮，来到Delphi主界面。如下图所示：

　　（4）设计窗体

　　1、我们的软件要首先要在窗口标题上写上软件名称，我们可以在左边的properties （属性）列表中找到text属性，将其中的winform1改为珠脑算出题软件v1.0，回车，可以看到设计窗体中的窗体标题也变为珠脑算出题软件v1.0。如下图所示：

　　2、在窗体上添加文本框label1，修改其text属性，作为操作方法的提示，添加文本框label2，修改其text属性，作为做题时间指示，添加文本框label3，修改其text属性，作为要被显示的题目，文本框label4，修改其text属性，用来指示正在做的题数：如下图所示：

　　图一

　　图二

　　3、在向窗体中添加一个文本输入框（ textbox1 ），和三个按钮botten1 ， botton2 ， botton3，并分别为其命名为，出题，下一题，完成。如下图所示：

　　最后再添加一个richtextbox （福文本框），用来显示已经做过的题目，及其正误，做题时间及题数。如下图所示：

　　当然我们要先将他的visible属性设置为false，这样在窗体载入时就可以不显示了，可以露出后面的其它控件了。

　　最后在向窗口中添加一个timer控件，来为做题计时。这时timer控件会放在主窗口的下面。如下图所示：

　　并且设置它的enable属性为false，这样就可以使timer控件不会在开始时就运行了。

　　（5）编写代码

　　我们可以通过在主窗口下面的分页中，进行代码和设计窗口的切换。如下图所示：

　　我们可以点击code页，来到代码窗口，可以看到Delphi 为我们添加了许多的代码。如下图所示：

　　剩下的当然就是我们自己来编写自己的代码了。

　　在代码窗口对Twinform类的定义后面中添加下面的代码：

//自定义变量type　suijishu = array [ 1 .. 10 ] of integer ; //用来保存 加数和被加数　deshu = array [ 1 .. 10 ] of integer ; //用来保存 每道题的得数，所填的数，与此比较，判断对误var　sjs : suijishu ; //定义suijishu类型的一个实例　ds : deshu ; //定义deshu类型的一个实例　temp : integer ; //定义一个临时变量　tishu : integer ; //定义一个变量，存储已经做得题数　shijian : integer ; //定义一个变量，存储做题所用的时间

　　在implementation段后面，添加下面的代码：

//自定义过程procedure fenpei( ) ; //给sjs数组分配随即数值var　i : integer ;begin　Randomize ;　for i : = 1 to 10 do　begin　　sjs [ i ] : = Random ( 10 ) ;　end ;end ;procedure jisuan ( ) ; //得到结果，并保存到ds数组中var　i : integer ;begin　temp : = 0 ;　for i : = 1 to 10 do　begin　　temp : = temp + sjs [ i ] ;　　ds [ 1 ] : = temp ;　end ;end ;

　　这里我们定义了两个过程fenpei 和 jisuan 。fenpei用来给sjs数组分配随即数值，这样就可以出题了，jisuan将得到算数的结果，并保存到ds数组中

　　做题时，首先是要点击出题按钮。所以要在TWinForm . Button1 _ Click事件中添加代码，调用fenpei和jisuan过程来初始化题目并得到答案。之后显示在label3中，并且开始计时，在label4中显示正在做第几题。下面是这里所要添加的代码：

procedure TWinForm . Button1 _ Click ( sender : System . Object ; e : System . EventArgs ) ;begin　//添加自己的代码　fenpei ;　jisuan ;　label3 . text : = Convert . ToString ( sjs [ 1 ] ) + ' + ' + Convert . ToString ( sjs [ 2 ] ) + ' + ' + Convert . ToString ( sjs [ 3 ] ) + ' + ' + Convert . ToString ( sjs [ 4 ] ) + ' + ' + Convert . ToString ( sjs [ 5 ] ) + ' + ' + Convert . ToString ( sjs [ 6 ] ) + ' + ' + Convert . ToString ( sjs [ 7 ] ) + ' + ' + Convert . ToString ( sjs [ 8 ] ) + ' + ' + Convert . ToString ( sjs [ 9 ] ) + ' + ' + Convert . ToString ( sjs [ 10 ] ) + ' = ' ;　timer1 . Enabled : = true ;　button1 . Enabled : = false ;　button2 . Enabled : = true ;　shijian : = 0 ;　tishu : = 1 ;　richtextbox1 . Visible : = false ;　label4 . text : = '第' + Convert . ToString ( tishu ) + '题' ;　textbox1 . Clear ;end ;

　　之后我们需要在文本框（ textbox1 ）中填写得数，点击下一题 ，就可以从新开始一道新的题目了。 但为了统计所做题目相关信息，如：正误等，所以我们还要在福文本框中添加相应的信息。

　　按照前面的构思我们要在TWinForm . button2 _ Click事件中加入下面的代码:

procedure TWinForm . button3 _ Click ( sender : System . Object ; e : System . EventArgs ) ;begin//添加自己的代码if textbox1 . Text = Convert . ToString ( ds [ 1 ] ) thenbegin　richtextbox1 . Text : = richtextbox1 . text + label3 . Text + textbox1 . Text + ' 正确' + chr ( 13 ) + chr ( 10 ) ;　fenpei ;　jisuan ;　label3 . Text : = Convert . ToString ( sjs [ 1 ] ) + ' + ' + Convert . ToString ( sjs [ 2 ] ) + ' + ' + Convert . ToString ( sjs [ 3 ] ) + '+ ' + Convert . ToString ( sjs [ 4 ] ) + ' + ' + Convert . ToString ( sjs [ 5 ] ) + ' + ' + Convert . ToString ( sjs [ 6 ] ) + ' + ' + Convert . ToString ( sjs [ 7 ] ) + ' + ' + Convert . ToString ( sjs [ 8 ] ) + ' + ' + Convert . ToString ( sjs [ 9 ] ) + ' + ' + Convert . ToString ( sjs [ 10 ] ) + ' = ' ;　TextBox1 . Text : = ' ' ;　tishu : = tishu + 1 ;　label4 . text : = '第' + Convert . ToString ( tishu ) + '题' ;　endelsebegin　richtextbox1 . Text : = richtextbox1 . text + label3 . Text + textbox1 . Text + ' 错； 正确得数为 ：' + Convert . ToString ( ds [ 1 ] ) + chr ( 13 ) + chr ( 10 ) ;　fenpei ;　jisuan ;　label3 . Text : = Convert . ToString ( sjs [ 1 ] ) + ' + ' + Convert . ToString ( sjs [ 2 ] ) + ' + ' + Convert . ToString ( sjs [ 3 ] ) + ' + ' + Convert . ToString ( sjs [ 4 ] ) + ' + ' + Convert . ToString ( sjs [ 5 ] ) + ' + ' + Convert . ToString ( sjs [ 6 ] ) + ' + ' + Convert . ToString ( sjs [ 7 ] ) + ' + ' + Convert . ToString ( sjs [ 8 ] ) + ' + ' + Convert . ToString ( sjs [ 9 ] ) + ' + ' + Convert . ToString ( sjs [ 10 ] ) + ' = ' ;　textbox1 . Text : = ' ' ;　tishu : = tishu + 1 ;　label4 . text : = ' 第' + Convert . ToString ( tishu ) + '题' ;end ;end ;

　　对于完成按钮，我们所要做的就是在此按钮被点击时，让福文本框的可见性变为true,这样就可以显示刚才所保存的所有做题信息了。