1、Delphi Memo 组件Edit 和 MaskEdit 组件都只能编辑单行文本，Delphi 的 Memo 组件提供了多行文本的编辑功能。下面解释 Memo 组件常用的属性。属性 说明Lines 这是 Memo 组件最常用，也是最有用的属性，它用来显示和保存Memo 组件中的内容。Scrollbar 很多组件都有这个属性。用于设定组件有否滚动条。它有四个值：SSNone 表示既无水平滚动条，也无垂直滚动条；SSHorizontal 表示只有水平滚动条；SSVertal 表示只有垂直滚动条；SSBoth 表示两者都有。当用户要显示的文本或其它的内容较多时，建议选用 SSBoth。WordWr
2、ap 用于设定 Momo 组件是否具有自动折行功能。WantTabs 这个属性只在 Memo、RichEdit 和 DBMemo 组件中使用。通常在切换当前焦点控件时，我们通常使用 Tab 键。但在上述三种组件中，编辑文本时常用 Tab 键来跳过若干个空格使文本对齐，这时就会有冲突。所以应将WantTabs 设置为 True，这样子在组件内就可以使用 Tab 键来编辑文本。Memo 组件常用的方法：. 使用剪贴板（Clipboard）我们可以使用 CutToClipboard、CopyToClipboard 和 PastFromClipboar 这三种方法，实现将 Memo 组件中被选择文本剪
3、切或复制到剪贴板上，以及将剪切板上的内容粘贴到 Memo 组件中。将 Memo 中的选中文本剪切到剪贴板的语句如下：if Memo1.SelLength0 then2. 文本的添加利用 Lines 属性，可以增加、删除一行文本，也可以移动一行文本。下面的代码将文本添加到 Memo 中的最后一行：Memo1.Lines.Add(将文本添加到 Memo 中） ；3. 文件的保存和装载我们可以将 Memo 组件中的文本保存成文本文件，也可以将文本文件装载到 Memo 中。这须要配合使用 SaveDialog 组件和 OpenDialog 组件。将 Memo中的文本保存为文件的语句为：If SaveD
4、ialog1.Execute then /打开保存对话框Memo1.Lines.SaveToFile(SaveDialog1.FileName); /保存为文件上边的语句先打开保存对话框，然后将 Memo 中的文本保存到一个文件中，文件名为我们在 SaveDialog 中输入的文本。在 Memo 中装载文本文件的语句为：if Opendialog1.Execute thenMemo1.Lines.LoadFile(Opendialog1.FileName);执行上边语句将打开 Opendialog 对话框，然后将选中的文本文件装载到 Memo中。下面我们使用 Memo 组件的这些特性制作一个简
5、单的文本编辑器，可以实现文本的拷贝复制，并可以进行文本的保存和装载。当然程序的功能还很简单，我们还可以进一步扩展。这里是入门教程，所以不宜太复杂。程序的界面如下图所示：Memo组件“ TITLE=“Delphi Memo 组件“ /screen.width-461) this.resized=true; this.width=screen.width-460; this.alt=Click here to open new window;“ border=0单选按钮组单选按钮组（RadioBox）是单选按钮的组合。当我们需要对不同的单选按钮进行选择时，为了使不同组之间互不干涉，就需要使用单选按
6、钮组。单选按钮组有两个重要得属性：Items 和 ItemIndex。在窗体上选中RadioBox 组件在对象查看器上双击 Items 属性，将打开一个对话框，如下图所示：Memo 组件“ TITLE=“Delphi Memo 组件“ /screen.width-461) this.resized=true; this.width=screen.width-460; this.alt=Click here to open new window;“ border=0在该对话框的编辑窗口中输入各项标题，每项一行。ItemIndex 属性用于表明单选按钮组中哪一项被选中了。若为（缺省值），表示没有被
7、选中的项；若为 0，表示第一项被选中；若为，表示第二项被选中；其他依次类推。我们在前面编制的文本编辑器的基础上，使用单选按钮组代替单选按钮，并添加字体选择功能。程序用到两个 RadioGroup 组件，属性如下：属性 RadioGroup1 RadioGroup2Caption 颜色 字体Items 红色；蓝色；绿色 Aria ；Symbol ；宋体ItemIndex 0 2由于 RadioGroup1 的 IntemIdex 为，则第一项为初始被选中的项，即“红色”被选中，所以程序在初始化时应将 Memo1 中的文本颜色设置为红色；同样，RadioGruop2 的初始项为第三项 “宋体”（I
8、temIndex 为） ，也应在初始化时将Memo 的文本字体设置为宋体。初始化语句放在 Form1 的 OnCreate 事件中，即在创建窗体时对 Memo 组件进行初始设置。相应得程序如下： procedure TForm1.FormCreate(Sender: TObject); begin memo1.Lines.Text:= 这里是 RadioGroup 组件示例; memo1.Font.Color:=clRed; /设定文本的初始颜色为红色 memo1.Font.Name:=宋体 /设定文本字体为宋体 end; 改变字体颜色的程序代码如下：procedure TForm1.Radi
9、oGroup1Click(Sender: TObject); begin if radiogroup1.ItemIndex=0 then Memo1.Font.Color:=clRed else if radiogroup1.ItemIndex=1 then Memo1.Font.Color:=clBlue else Memo1.Font.Color:=clGreen; end; 改变字体的程序代码如下：procedure TForm1.RadioGroup2Click(Sender: TObject); begin if radiogroup2.ItemIndex=0 then Memo1.
10、Font.Name:=Arial else if radiogroup2.ItemIndex=1 then Memo1.font.name:=Symbol else Memo1.Font.Name:=宋体; end;程序界面如下图所示：Memo 组件“ TITLE=“Delphi Memo 组件“ /screen.width-461) this.resized=true; this.width=screen.width-460; this.alt=Click here to open new window;“ border=0单选按钮和复选框单选按钮（RadioButton）和复选按框（Che
11、ckBox）都是很常用的组件，尤其是在对话框中。单选按钮（RadioButton）是一种具有排他性的选择组件，用户每一次只能选择其中的一个（在同一个容器组件中，如同一 Form 上或 RadioBox中） 。而复选框（CheckBox）则不同，可以同时选择多个。两种组件都有一个 Checked 属性，用于标识和检测是否被选中。我们使用这两个组件，给上一节（Memo 组件介绍）的例程（简单编辑器）添加一些新的功能，使它可以选择字体颜色和字体的样式。程序的界面如下图所示：Memo 组件“ TITLE=“Delphi Memo 组件“ /screen.width-461) this.resized=true; this.width=screen.width-460; this.alt=Click here to open new window;“ border=0
