第1章Delphi的程语言——ObjectPascal.ppt

第1章 Delphi的编程语言——Object Pascal 1.1 认识Delphi 1.2 Object Pascal语言基础 1.3 Delphi 中的程序调试及异常处理 ?本章小结 1.1 认识Delphi 感受Delphi编程 Delphi的特点 Delphi编程环境及其作用 Delphi应用程序的文件组成 Delphi中几个重要概念 Delphi学习方法 ★本节要点 ?练习 感受Delphi编程 下面在Delphi的集成开发环境中编写一个最简单程序，并运行。让大家对Delphi的编程有一种感性认识，并体验Delphi快捷、方便、高效的编程环境。 Delphi的特点 Delphi最早是Borland公司于1994年底发布的一种可视化编程语言。它以Object Pascal作为基本开发语言。目前已从Delphi 1.0发展到Delphi 7.0。它适用于Windows 9x， Windows xp,Windows 2000或更高的版本操作系统,同时也推出Lynux操作系统下的kylix版本。 编程效率高、代码质量好 领先的数据库技术 强大的Internet应用开发功能 与Office 的巧妙结合 可视化编程语言 编程语言的发展 机器语言→汇编语言→高级语言（结构化→面向对象→可视化） 面向对象的程序设计（Object Oriented Programming) 可视化（Visual)编程语言 Delphi,VFP,VB,VC 等，由组件来构造应用程序。 面向对象的程序设计 对象：把要处理的数据和处理这些数据的方法组合成的一种数据类型。对象有如下三大特性： 封装性：把数据和处理数据的方法定义在同一数据类型(对象)中，一般只能用该对象中的方法来处理这些数据。 继承性：可以用已定义的对象来构造其子对象，并且子对象可以访问其父对象中的数据和方法。 多态性：为动作赋予一个可由对象序列共享的名称，对象序列中的每个对象均以适合于自身的方式实现该操作。 事件驱动 对象的多态性实例 implementation {$R *.DFM} type TPerson=class Name:string; weight:integer; constructor Create(aName:string;aWeight:integer); function GetTitle:string; virtual; //父类中使用虚方法 function GetInformation:string; end; TStudent=class(TPerson) School:string; Constructor Create(aname:string;aWeight:integer;aSchool:string); function GetTitle:string; override;//子类中使用覆盖 end; constructor TPerson.Create(aName:string;aWeight:integer); begin inherited create; name:=aname; weight:=aweight; end; function TPerson.GetTitle:string; begin result:=Name+ is a Person; end; 对象的多态性实例（续） Constructor TStudent.Create(aname:string;aWeight:integer;aSchool:string); begin inherited create(aname,aweight); school:=aschool; end; function TStudent.GetTitle:string; begin result:=Name+ is a Student of +school; end; procedure showtitle(Person:TPerson); begin showmessage(person.getInformation); end; procedure TForm1.Button1Click(Sender: TObject); var aPerson:TPerson; aStudent:TStudent; begin aPerson:=TPerson.create(David,60); AStudent:=TStudent.create(Young,65,Tsinghua); showtitle(aperson); //显示某人相关的信息 sh