Компонент Memo (вкладка Standard) является редактором много-
строчного текста, в котором формат текста (шрифт, его атрибуты, вырав-
нивание) одинаков для всего текста. Он снабжен многими функциями,
свойственными большинству редакторов со стандартными комбинациями
горячих клавиш для выделения фрагментов текста, работы с буфером об-
мена, отмены последней команды редактирования.
Весь текст окна Memo можно рассматривать как единое целое, пред-
ставленное одной строкой типа string, внутри которой используются раз-
делители типа символов возврата каретки и перевода строки, либо как N
отдельных строк, разделенных между собой клавишей Enter. Основные
свойства компонента представлены в табл. 4.1.
Таблица 4.1. Свойства компонента Memo
Для работы со строками используется свойство Lines, к которому мож-
но применять методы приведенные в табл. 4.2.
Таблица 4.2. Методы свойства Lines
При работе с компонентом часто используются следующие методы:
• Clear – позволяет очистить содержимое компонента Memo. На-
пример, Memo1.Clear;
• SetFocus – делает компонент Memo активным (устанавливает фо-
кус). Например, Memo1.SetFocus
Пример 1.
Memo1.Text:='Весь текст в поле компонента’);
Memo1.Lines.Add(‘Добавление строки в конец текста’);
Label1.Caption:=IntToStr(Memo1.Lines.IndexOf('слово'))
Пример 2. Рассмотрим программу чтения из компонента Memo:
procedure TForm1.Button1Click(Sender: TObject);
var a: array[1..5] of string;
i: integer;
st: string;
begin
if Memo1.Lines.Count=0 //исходные данные
then begin
ShowMessage(‘Исходные данных нет’);
exit
end
else begin
st:=’Введенный массив:’+#13;
for i:=1 to 5 do
begin
a[i]:=Memo1.lines[i-1];
st:=st+IntToStr(i)+a[i]+#13
end;
ShowMessage(st)
end
end;
|