第四章-文本编辑器的设计（一）（3）

2016年07月27日 64 阅读

第四章-文本编辑器的设计（一）（3）2007-05-08当用户在多个页面中进行切换时，程序应当保证对当前页面进行编辑。 例如在多页编辑器中，用户选中某一页面，即可对该页面中的文件进行编辑、寻找、设置、打印等。为了实现这一功能，定义了一个TMemo类型的变量：Memo1,该变量没有实例化，每次调用DynaAdd,DynaDel方法均定把TabIndex指定页面的Memo指针传给Memo1。这样在程序运行中，始终有一个实例化的Memo指针赋给Memo1，而菜单...

第四章-文本编辑器的设计（一）（4）

2016年07月27日 63 阅读

第四章-文本编辑器的设计（一）（4）2007-05-08TMemo部件提供了一组关于选择文本的属性和方法。如果想在部件成为当前控件时自动选择文本，可设置 AutoSelect 属性。运行时可用SelectAll 方法选中部件的全部文本。 Selstart属性返回选中文本的开始位置，SelText 包含着被选中的文本。SelLength属性返回选中文本的长度，这两个属性可用于字符串的查找和替换。下一节将详细讨论。TMemo的Modified属性是一个运行时才...

第四章-文本编辑器的设计（二）（1）

2016年07月27日 59 阅读

第四章-文本编辑器的设计（二）（1）2007-05-084.4.2查找对话框部件 查找对话框部件为应用程序提供查找对话框， 用户可使用查找对话框在文本文件中查找字符串。可用Execult方法显示查找对话框，如图4.8。应用程序要查找的字符放到FindText属性中。Options 属性可决定查找对话框中有哪些选项。例如， 用户可选择是否显示匹配检查框。Options的常用选项如表4.2所示。如果用户在对话框中输入字符并选择FindNext按钮，对话框将发生...

第四章-文本编辑器的设计（二）（2）

2016年07月27日 63 阅读

第四章-文本编辑器的设计（二）（2）2007-05-08例程中TEditForm.Replace方法响应OnReplace事件，Replace方法首先判断控制中被选中字符串是否与替换字符串相等，如果不等则进行替换。而后根据Options中的方式循环进行查找替换。直至无匹配字符串为止。其代码如下： procedure TEditForm.Replace（Sender: TObject）;varFound: Boolean;beginwith Replac...

第三章-字符串列表及应用（一）（1）

2016年07月27日 64 阅读

第三章-字符串列表及应用（一）（1）2007-05-08Delphi应用程序经常要处理字符串列表，如组合框和列表框中的字符串，TMemo部件的文本行，屏幕支持的字体列表，TNotebook部件的tabs属性，字符串网格的行、列等等。虽然应用程序以不同的方法使用这些列表，但Delphi通过一个叫字符串列表（Tstrings）的对象提供统一的界面，并且在不同场合可相互转化。例如，可以在TMemo部件中编辑某一字符串，并把它当成列表框中列表项使用。在Delphi...

第三章-字符串列表及应用（一）（2）

2016年07月27日 58 阅读

第三章-字符串列表及应用（一）（2）2007-05-083.1.2 装载、保存字符串列表 应用程序可以非常方便的把Delphi字符串列表存入文本文件，或者从文本文件中重新装载（或装入另一个不同的列表），字符串列表有专门的方法处理这类操作。使用LoadFromFile方法从文件中装载字符串列表，LoadFromFile从文本文件中把每一行字符串装入列表中。把列表保存在文件中使用SaveToFile方法，使用时传递文件名的参数。如果文件不存在，SaveToFi...

第三章-字符串列表及应用（二）（1）

2016年07月27日 59 阅读

第三章-字符串列表及应用（二）（1）2007-05-083.1.4 往字符串列表中加入对象 字符串列表除了能在Strings属性中贮存字符串外，还可以在Objects属性中贮存对象。与Stings一样，Objects也是可以索引的，它是对象的索引。在应用程序使用列表中的字符串与列表中是否有对象没有多大关系。除非程序特地访问对象，否则Objects中的内容不变，Delphi只是保存了这些信息，应用程序在必要时对其进行操作。有些字符串列表忽略加入的对象。如TM...

第三章-字符串列表及应用（二）（2）

2016年07月27日 59 阅读

第三章-字符串列表及应用（二）（2）2007-05-083.2.3 绘制自画项目 当部件的Style属性是自画式时，Windows不再绘制部件，相反Windows为每个可视项目产生事件，而应用程序必须在事件中绘制项目。在应用程序绘制自画控制之前，Windows产生测量项目事件，这个事件告诉程序项目显示的位置 。通常由Windows决定项目显示的大小，但应用程序可以处理这个事件并自己选择显示区域。例如，程序要用位图代替文本显示，则需要把区域设置成位图的大小。...

第二章-Delphi面向对象的编程方法（一）（1）

2016年07月27日 63 阅读

第二章-Delphi面向对象的编程方法（一）（1）2007-05-08Delphi的编程语言是以Pascal为基础的。Pascal语言具有可读性好、编写容易的特点，这使得它很适合作为基础的开发语言。同时，使用编译器创建的应用程序只生成单个可执行文件（.EXE），正是这种结合，使得Pascal成为Delphi这种先进开发环境的编程语言。本章中，我们将讨论Object Pascal的主要特点，并讲解如何在事件处理过程和其他应用程序中，使用它来编制程序代码。本章...

第二章-Delphi面向对象的编程方法（一）（2）

2016年07月27日 59 阅读

第二章-Delphi面向对象的编程方法（一）（2）2007-05-082.1.2.3 常量 常量在说明时就被赋予了一个值，在程序执行过程中是不可改变的。下面的例子说明了三个常量： constPi = 3.14159;Answer = 342;ProductName = "Delphi"; 象变量一样，常量也有类型。不同的是，常量假设其类型就是常量说明中其所代表的值的类型。上文的三个常量的类型分别是real型、整形、字符串型。常量用&ld...

第二章-Delphi面向对象的编程方法（二）（1）

2016年07月27日 60 阅读

第二章-Delphi面向对象的编程方法（二）（1）2007-05-082.1.4 跳转语句 Object Pascal的跳转语句有if和case两个。 2.1.4.1 if语句 if语句会计算一个表达式，并根据计算结果决定程序流程。在上文的例程中，根据ColorDialog.Execute的返回值，决定窗体的背景颜色。if保留字后跟随一个生成Boolean值True或False的表达式。一般用“=”作为关系运算符，比较产生一个布尔型...

第二章-Delphi面向对象的编程方法（二）（2）

2016年07月27日 58 阅读

第二章-Delphi面向对象的编程方法（二）（2）2007-05-082.1.7 关于作用范围 2.1.7.1 标识符的作用范围 一个变量、常量、方法、类型或其他标识符的范围定义了这个标识符的活动区域。对于说明这个标识符的最小程序模块而言，此标识符是局部的。当您的应用程序在说明一个标识符的程序模块外执行时，该标识符就不在此范围内。这意味着此时执行的程序无法访问这个标识符，只有当程序再度进入说明这个标识符的程序模块时，才可以访问它。下面的示意图表示一个含有两...

第二章-Delphi面向对象的编程方法（三）（1）

2016年07月27日 63 阅读

第二章-Delphi面向对象的编程方法（三）（1）2007-05-082.1.8.4 过程和函数的语句部分 过程或函数的语句部分由begin开始，end结束。函数需要一个返回值。可以将返回值赋给函数名称，也可以将返回值赋给Result变量。下面的例程将返回值赋给函数名称： function CalculateInterest（Principal,InterestRate: Double）:Double;beginCalculateInterest := P...

第二章-Delphi面向对象的编程方法（三）（2）

2016年07月27日 114 阅读

第二章-Delphi面向对象的编程方法（三）（2）2007-05-082.1.9.4 字符串类型 字符串类型事实上是一个一维的字符数组。当您说明一个字符串型的变量时，您应当指明这个字符串的大小，下面是说明字符串类型的例子：typeMyString: string[15];varMyName: MyString; 则变量MyName被说明成为最多可以包含15个字符。如果您没有说明字符串的大小，Delphi会认为字符串包含最大值255个字符。给字符串赋值可以直...

第二章-Delphi面向对象的编程方法（四）（1）

2016年07月27日 68 阅读

第二章-Delphi面向对象的编程方法（四）（1）2007-05-082.1.10.7 将库单元加入工程 将库单元加入工程是比较简单的。无论是您自己建立的库单元还是Delphi建立的与窗体有关的库单元，如果已经完成，则先打开您想加入库单元的工程（可以用Open Project打开工程）；再选用File|Open File，然后选择您想加入的源程序（.PAS文件），并选择OK即可。则库单元被加入到应用程序中。 2.2 用Delphi的对象进行编程 Delph...

第二章-Delphi面向对象的编程方法（四）（2）

2016年07月27日 65 阅读

第二章-Delphi面向对象的编程方法（四）（2）2007-05-08当您使用Object Inspector来改变对象（部件）的名称时，这个名称的改变会反映到程序中。例如，在Object Inspector中将Form1的Name属性命名为ColorBox，您会发现在类型说明部分，会将前文的TForm1改为： TColorBox=class（TForm）; 并且在变量说明部分，会说明ColorBox为TColorBox类型的变量，由Delphi自动产生的...

第二章-Delphi面向对象的编程方法（四）（3）

2016年07月27日 62 阅读

第二章-Delphi面向对象的编程方法（四）（3）2007-05-082.2.6 对象变量的赋值 如果两个变量类型相同或兼容，您可以把其中一个对象变量赋给另一个对象变量。例如，对象TForm1和TForm2都是从TForm继承下来的类型，而且Form1和Form2已被说明过，那么您可以把Form1赋给Form2:Form2 :=Form1;只要赋值的对象变量是被赋值的对象变量的祖先类型，您就可以将一个对象变量赋给另一个对象变量。例如，下面是一个TDataF...

第一章-Delphi入门（五）（1）

2016年07月27日 61 阅读

第一章-Delphi入门（五）（1）2007-05-081.4.3.1 调用标准对话框 您可以发现，除了Font,Find,Replace对话框之外，其余标准对话框的Events页都是空白的。因为它们本身是不可视的对话框形式，所以不能响应标准的鼠标键盘操作，只能在程序中调用它们。在本章第一节的Demo程序中，我们已经对用Color对话框有了了解，在程序的适当位置加入对话框所属的Execute方法，可以执行标准对话框。 在编制应用程序时，您可以先设计好主菜单...

第一章-Delphi入门（五）（2）

2016年07月27日 114 阅读

第一章-Delphi入门（五）（2）2007-05-081.4.3.4 PrintDialog和PrintSetupDiaog 打印对话框PrintDialog和打印设置对话框PrintSetupDialog可以显示标准打印、打印设置对话框，支持打印文件和打印设置功能，设置它的Options属性可以规定对话框的表现形式 1.4.3.5 FindDialog和ReplaceDialog FindDialog和ReplaceDialog提供了查找、替换两个对话...

第一章-Delphi入门（五）（3）

2016年07月27日 64 阅读

第一章-Delphi入门（五）（3）2007-05-081.5.1.1 创建一个含有About框的例程 作为例子，我们先创建一个含主窗体和简单的About框的应用程序： 在Delphi中创建一个新工程，并为空窗口增加一个Button部件。我们把它作为主窗体，目的是当按动按钮部件时，调出About窗口。下面我们直接进行About窗口的创制。 选用主菜单的File New项，在New页中，选用Form样板，Delphi会自动创建一个空窗体Form2。您可以在其...