属性可定义编辑框中字符的大小写。如果设计者想禁止用户输入,可将ReadOnly属性设置成真值。编辑框也能用做密码输入框。通过设置PassWordChar 属性的值,可将用户输入的字符在编辑框中显示成指定的字符,如\号等。编辑框还可以进行字符选择操作、粘贴、复制和剪切操作。 4.3.2 TMemo 部件
TMemo部件与TEdit部件类似,能向用户显示数据,用户也可输入数据。与TEdit 部件
不同的是,TMemo部件可以处理多行文本,因此主要用于编辑文件。
TMemo的Text属性只能在运行时才能访问。Modified属性用以标识Text的数据是否改
变,通过设置MaxLength属性值来限制用户输入字符的数量。
如果把文本当成一个整体进行访问,可使用Text属性;若想逐行访问,则要使用Lines属性。Lines属性能对文件更方便地进行访问。Lines是TStrings类型的,因此可使用Add 、Delete方法,例如在Memo1中加入一行字符串的代码如下:
Memo1.Lines.Add('Another line is added'); 通过Lines属性可以方便地把文件读入部件中,例程中使用下面的代码将文件读入Memo1:
Memo1.Lines.loadFromFile(Filename).
从TMemo 部件中剪切、复制、粘贴文本非常方便,只需使用 CutToclipboard ,CopyToClipBroad,PasteFromClipBoard方法,其代码如下:
Memo1.CopyToClipboard Memo1.CutToClipboard Memo1.PasteFromClipboard TMemo有一些属性,用以控制文本的显示效果。ScrollBars属性可以定义部件的水平滚动条和垂直滚动条。当文件字体改变时,使用AutoSize属性可使部件大小做相应的调整。设置WordWrap属性可以实现自动换行。
例程中Edit|WordWrap菜单项提供了设置WordWrap的功能,并可根据WordWrap的值决定滚动条的形式。当WordWrap为真时,不需要水平滚动条, 并在菜单中作出检查记号。 其代码如下: TObject); begin
with Memo1 do begin
WordWrap := not WordWrap; if WordWrap then ScrollBars := ssVertical else
procedure
TEditForm.SetWordWrap(Sender:
ScrollBars := ssBoth;
WordWrap1.Checked := WordWrap; end; SetEditRect; end;
TMemo部件提供了一组关于选择文本的属性和方法。如果想在部件成为当前控件时自动选择文本,可设置 AutoSelect 属性。运行时可用SelectAll 方法选中部件的全部文本。 Selstart属性返回选中文本的开始位置,SelText 包含着被选中的文本。SelLength属性返回选中文本的长度,这两个属性可用于字符串的查找和替换。下一节将详细讨论。