Тема 5: Создание первого приложения

Традиционно при изучении программирования принято создавать первую программу, которая выводит текст "Hello, world!". Не будем отступать от традиции и создадим программу, которая выводит этот текст тремя разными способами. Но вначале познакомимся с самой средой программирования Delphi. Предполагается, что на этот момент Delphi 7 уже установлена на вашем ПК. Если это не так, то перед дальнейшим прочтением лекции установите Delphi 7. При загрузке Delphi 7 вы видите такую картину:

увеличить изображение

Рис. 1.1.  Рабочая среда Delphi 7

Познакомьтесь – это Delphi. У нее есть много окон, панелей, компонентов. С большинством из них мы познакомимся со временем, а пока нам нужно обратить внимание на 5 окон:

1. Главное окно Delphi. Здесь находится основное меню, различные панели инструментов и палитра компонентов, состоящая из множества вкладок.

2. Конструктор формы. Здесь мы визуально видим, как будет выглядеть форма программы, здесь мы будем создавать интерфейс, перенося на форму различные компоненты, и расставляя их таким образом, чтобы интерфейс выглядел привлекательным. Нам часто придется переключаться между конструктором форм и редактором кода, делается это клавишей F12.

3. Редактор кода. Здесь мы видим исходный код программы, который создан самой Delphi. Тут же мы будем вводить наш собственный код.

4. Объектный инспектор. Он предназначен для управления объектами проекта и состоит из двух вкладок – Properties (Свойства) и Events (События).

5. Дерево объектов. Здесь мы видим, какой именно объект в данный момент является текущим. Это окно будет особенно полезно, когда на форме появится множество компонентов.

Когда открывается Delphi, она автоматически создает и отображает новый проект (программу). На рисунке вы видите проект, который содержит только одну стандартную форму. Форма – это тоже объект, который представляет собой окно программы. Чтобы программа делала что-то полезное, нам придется вносить изменения в нее. Выведем текст "Hello, world!" первым способом. Для этого в инспекторе объектов найдите свойство Caption. В данный момент текущим является объект – форма, и свойство Caption формы отвечает за надпись на системной строке программы (синяя полоса вверху любого программного окна). По умолчанию, свойство Caption содержит надпись "Form1", также называется и сама форма. Измените эту надпись на "Hello, world!" (конечно, без кавычек). Уже в процессе ввода текста вы видите, что надпись в системной строке принимает новый вид. Мы ввели этот текст одним способом.

Теперь нам нужно сохранить проект. Проект – совокупность файлов разных форматов, из которых создается программа. Об этом мы подробней поговорим в одной из следующих лекций, а пока запомните правило – каждую программу (проект), которую вы создаете, нужно сохранять в отдельной папке. Если вы все проекты станете сохранять в одну папку, то очень скоро запутаетесь. Чтобы сохранить проект, выполним следующие действия:

1. Выбираем команду меню "File – Save All" (сохранить все), либо нажимаем горячие клавиши <Shift+Ctrl+S>, либо нажимаем одноименную кнопку на панели инструментов

Рис. 1.2.  Кнопки Save (Сохранить) и Save All (Сохранить всё) на панели инструментов

2. Затем выходит окно с предложением сохранить модуль – текстовый файл с исходным кодом, принадлежащий форме. Файл имеет расширение *.pas. Имеем в виду, что каждый проект сохраняется в отдельную папку, поэтому вначале щелкнем правой кнопкой мыши по свободному месту окна с папками, и выберем команду "Создать - Папку". Дадим папке какое-либо имя, например, "01". После создания папки открываем ее.

3. Далее в поле "Имя файла" укажем имя сохраняемого модуля. Имя может быть любым, но обязательно латинскими символами. Еще имя модуля не должно совпадать с именем формы. Обычно, имена формам и модулям стараются делать информативными, то есть, по имени можно будет догадаться, что это за файл. Поскольку это главная форма проекта, дадим ей имя "Main", и нажмем кнопку "Сохранить".

4. Затем нам будет предложено дать имя проекту в целом. Имя проекта будет совпадать с именем исполняемого программного файла. Если мы хотим, к примеру, получить файл "hello.exe", то дадим проекту имя "hello". Нажмем кнопку "Сохранить".

Далее нам необходимо скомпилировать программу, то есть, перевести исходный код в выполняемый exe-файл. Для этого мы можем выбрать команду меню "Run - Run", либо нажать горячую клавишу F9, либо нажать кнопку "Run" на панели инструментов (на кнопке изображение зеленой стрелки, указывающей вправо). В результате, программа была не только скомпилирована, но и запущена. Если вы посмотрите на системную строку Delphi, то увидите надпись "Delphi 7 – hello [Running]", а окна инспектора объектов и дерева объектов исчезли. Это говорит о том, что программа находится в режиме выполнения. Выполняемая программа имеет точно такой же вид, как наша главная форма, только на форме отсутствует точечная сетка, предназначенная для облегчения дизайна. Окно полученной программы содержит все стандартные кнопки Windows – программы. Щелкнув по красному крестику в правой верхней части окна, закройте программу (но не Delphi), и вы увидите прежнюю форму.

Обратите внимание, что свойства в Объектном Инспекторе принадлежат выделенному в данный момент компоненту. Выделяются компоненты простым щелчком мыши. Имейте в виду, что щелкать нужно один раз. Двойной щелчок создаст обработчик события – процедуру. Если вы ошибочно создадите таким образом процедуру, то просто сохраните проект, ничего в нее не вписывая – при сохранении последние пустые процедуры автоматически удаляются. Удалять их вручную не рекомендуется.

Попробуем второй способ. Обратите внимание на Палитру компонентов. Текущей является вкладка Standard, и на ней находится множество значков – компонентов. Когда вы подводите указатель мыши к какому-либо компоненту, через некоторое время выскакивает подсказка с именем компонента. Нам нужен компонент Label, который представлен на вкладке в виде кнопки с изображением жирной буквы "А". Щелкните по этой кнопке, затем щелкните по свободному месту на форме, чтобы вставить компонент. Лучше, если вы расположите его ближе к левому верхнему краю формы. Компонент Label появился на форме. Этот компонент представляет собой обычную надпись. Сейчас он выделен, и содержит надпись по умолчанию, - "Label1". Теперь объектный инспектор показывает свойства этого компонента, а не формы. Label также имеет свойство Caption, которое вы можете изменить в Инспекторе объектов. Найдите это свойство, и вместо "Label1" впишите "Hello, world!". Текст в компоненте Label изменился. Если вам не нравится место, в котором оказался компонент, вы можете перетащить его мышью на другое место. Кроме того, точное местоположение компонента вы можете задать, если выделите его, и будете нажимать клавиши перемещения курсора, удерживая при этом клавишу <Ctrl>. Теперь попробуйте еще одно свойство компонента Label – свойство Font (шрифт). Найдите это свойство в инспекторе объектов, и выделите его. Справа появится кнопочка с тремя точками, нажмите ее. Откроется стандартное окно выбора шрифта. Здесь вы можете выбрать имя шрифта, его размеры, начертание (например, жирный курсив) и цвет текста. Поэкспериментируйте с размером компонента, его положением и шрифтом. Почти все компоненты, с которыми нам придется иметь дело, имеют эти свойства, так что в дальнейшем вам будет легче осваивать новый компонент.

Снова сохраните проект и нажмите кнопку Run (или <F9>). Убедитесь, что надпись появилась на форме, после чего закройте программу (но не Delphi) и вернитесь к форме.

Попробуем третий, немного более сложный способ. Пока что мы создавали программу, не написав ни единой строки кода. Мы занимались только дизайном, все остальные трудности Delphi взяла на себя. Теперь попробуем вывести это же сообщение, как только пользователь нажмет кнопку на форме.

Для начала нужно установить на форму кнопку. Этот компонент также находится на вкладке Standard палитры компонентов, и выглядит как кнопочка с надписью "ОК". При наведении на него указателя мыши выскакивает подсказка "Button". Щелкнув по компоненту, щелкните затем по тому месту на форме, где вы хотели бы видеть эту кнопку. Изменим надпись на кнопке. Убедитесь, что кнопка выделена, и найдите в инспекторе объектов ее свойство Caption. Замените надпись "Button1" на "Нажми меня!". Если надпись не умещается на кнопке, вы можете растянуть кнопку мышью, или использовать для этого клавиши управления курсором с нажатой кнопкой <Shift>.

Далее нам нужно создать обработчик нажатия на кнопку. Обработчик представляет собой процедуру, в которой мы будем писать наш код. Этот код будет выполняться программой всякий раз, когда пользователь нажмет на эту кнопку. Чтобы создать этот обработчик, следует дважды нажать на кнопку на форме. Вы сразу попадаете в редактор кода и видите, что процедура уже создана, курсор мигает в том месте, где мы должны ввести свой код. Пока что не будем разбираться, что тут к чему, а просто впишем строку:

ShowMessage('Hello, world!');

Полный текст процедуры получится такой:

procedure TForm1.Button1Click(Sender: TObject);

begin

ShowMessage('Hello, world!');

end;

Если у вас так и получилось, сохраните проект, откомпилируйте его и запустите на выполнение. При нажатии на кнопку будет появляться указанная надпись. Мы создали полноценную программу, выводящую надпись "Hello, world!" тремя различными способами, вписав при этом лишь одну строку исходного кода! Полученный файл hello.exe находится в указанной вами папке C:\Program Files\Borland\Delphi7\Projects\01

При сохранении проекта вы можете указывать и другие папки, и проект будет сохранен по указанному адресу. Полученный программный файл hello.exe вы можете теперь распространять, например, переслать другу, чтобы он полюбовался вашими достижениями.

Лекция 2. Переменные

Из этой лекции вы узнаете, что такое переменная, и какие типы переменных бывают. Также познакомитесь с типом "Строка". Затем мы затронем стили программирования, познакомимся с комментариями и напишем две программы.

В любом языке программирования приходится использовать переменные. При загрузке программы, компьютер вначале считывает все необходимые данные в оперативную память, после чего уже имеет возможность работать с ними. Переменная – это ячейка оперативной памяти, которая может хранить данные какого-то одного типа. Переменная похожа на ячейку в MS Excel, там тоже в ячейке можно указать нужный формат данных. Если переменная имеет тип данных "строка", то в нее нельзя записать число. А в переменную с типом "целое число" нельзя записать вещественное число. В языках программирования вещественным называют число, у которого есть запятая, после которой имеются цифры, хотя бы нули:

125,00

348,24

Каждая переменная имеет уникальное имя. Для компьютера имя переменной – это адрес ячейки памяти, где хранятся данные. Присваиванием имен (идентификаторов) переменным занимается программист. Имена переменным в Delphi даются по определенным правилам:

1. Имя переменной может содержать любое количество английских букв, цифр и знака подчеркивания, другие символы недопустимы.

2. Первым символом обязательно должна быть буква.

3. В Delphi нет разницы, какие буквы вы даете переменным – большие или маленькие. То есть, myperem, MyPerem, MYPEREM – это одна и та же переменная.

Совет: Переменную можно назвать одной буквой. Однако уже через месяц или раньше вам очень трудно будет вспомнить, зачем вы делали переменную F, и какие данные в ней хранятся. Поэтому старайтесь давать переменным осмысленные имена и сочетайте большие буквы с маленькими для разделения на слова. Хорошие примеры – MinZarplata или Glav_Param.

Типы переменных

Каждая переменная имеет свой тип. Тип переменной обязательно нужно указывать, потому что разные типы переменных занимают разный размер, и компьютеру нужно знать, сколько байт в оперативной памяти требуется отвести под указанную переменную. Создание переменной состоит из двух этапов:

1. Объявление переменной (указываем имя и тип переменной). Переменная объявляется в специальном разделе var (позже мы познакомимся с этим разделом).

2. Присвоение переменной какого-то значения.

Объявление переменной выглядит так:

var

Peremennaya1 : Real;

Peremennaya2, Peremennaya3 : Integer;

Как видно из примера, вначале указывается имя переменной, затем, после двоеточия указывается тип переменной. Если нужно объявить несколько переменных одного типа, их имена разделяются запятыми. В приведенном примере мы объявили одну вещественную переменную типа Real и две целые переменные типа Integer.

Присваивать значение переменным можно неоднократно. Переменная потому и называется так, что ее значение в процессе работы программы может меняться. Оператор присвоения значения выглядит так:

:=

Примеры присвоения значений переменным:

A := 10;

B := 20.35;

C := 'Это строка';

D := True;

A := 3+5-1;

Механизм присвоения значения работает следующим образом: вначале рассчитывается значение в правой части команды, то есть, после знака ":=". Затем результат этого значения записывается в переменную. В последней строке примера мы использовали выражение "3+5-1". Вначале получается результат, в нашем случае он равен 7. Затем этот результат записывается в переменную.

В дальнейшем, имя переменной можно использовать в различных выражениях, например:

A1 := 3;

A2 := A1 + 7;

A1 := A1 + 1;

В первой строке мы записали в переменную число 3. Вторая строка содержит выражение, результатом которого будет число 10. А вот третья строка интересней. Как вы полагаете, что будет записано в переменную A1? Если ваш ответ 4, вы совершенно правы: вначале рассчитывается результат правой части команды, где в переменной A1 еще старое значение, затем он записывается в эту же переменную, изменяя ее значение.

В таблице 2.1 перечислены основные типы переменных:

Таблица 2.1.
Название типа	Описание	Пояснения
Integer	Целое число	Переменная может содержать только целые числа, как со знаком, так и без знака.
Real	Вещественное число	Переменная может принимать в качестве значения целые и дробные числа, со знаком и без знака.
String	Строка	Переменная может хранить любые символы и наборы символов. В переменную String можно записать до 2 Гб символов.
Boolean	Логический тип	Булева переменная, может быть либо False (Ложь), либо True (Истина).

На самом деле, типов переменных значительно больше, и по мере усложнения программ мы будем изучать эти типы. В таблице представлены только основные типы.

Строки

С этим типом переменных приходится работать довольно часто. В примере выше мы указывали строку 'Это строка', а в прошлой лекции имели дело со строкой 'Hello, world!'. Вы уже заметили, что все строки должны быть заключены в одинарные кавычки. Размер строки практически не ограничен. Вы можете записать в строку любой текстовый файл, все зависит от того, сколько места есть у Вас на диске, и какой объем ОЗУ у Вас установлен.

Изучать новое удобней сразу на практике, поэтому запускайте Delphi. Автоматически должен создаться новый проект. Напишем простенькую программу, в которой поработаем со строкой. Все компоненты, которые нам для этого понадобятся, находятся на вкладке Standard Палитры компонентов.

Поместите на форму, один под другим, следующие компоненты:

Label, Edit и Button. С Label и Button вы уже знакомы по прошлой программе – Label это простая надпись, а Button – кнопка на форме. Компонент Edit представляет собой поле для ввода пользователем какого то значения, какой то строки.

Растяните компонент Edit, сделав его примерно вдвое длинней.

Выделите компонент Label (одним нажатием мыши!), и в его свойстве Caption вместо "Label1" впишите "Как твое имя?".

Теперь выделите компонент Edit, и удалите "Edit1" из свойства Text, оставив там пустое поле. Свойство Text этого компонента содержит тот текст, который в данный момент находится в поле ввода. Вообще, со свойствами компонента можно обращаться, как с переменными. В большинство свойств можно заносить значения не только в Инспекторе объектов, в момент разработки формы, но и во время выполнения программы.

Выделите кнопку, и в ее свойстве Caption напишите "Нажми меня!". Для красоты, переместите ее в центр формы.

Измените размер формы, чтобы на ней не было много пустого места. А также в свойстве Caption формы напишите "Приветствие". Напомним, чтобы выделить форму, нужно один раз щелкнуть мышью по любому свободному месту формы. Если вы все сделали правильно, у вас должна получился такая форма:

Рис. 2.1.  Внешний вид формы

Теперь создадим обработчик события для кнопки. Для этого дважды щелкните по кнопке, которую вы разместили на форме. Сразу же вы попадаете в Редактор кода, и курсор мигает между строками begin и end. Begin – это начало процедуры, после него точка с запятой не ставится. End – конец процедуры, после этого оператора точка с запятой обязательна. Если вы присмотритесь, то в последней строке редактора кода увидите end с точкой – это конец программы. Переменные указываются (описываются) перед началом процедуры. Следовательно, строку begin нужно будет опустить, а перед ней вписать раздел переменных var, и указать переменную s. Процедура должна выглядеть так:

procedure TForm1.Button1Click(Sender: TObject);

var

s: String;

begin

s:= 'Привет, ' + Edit1.Text + '!';

ShowMessage(s);

end;

Обратите внимание, что когда вы поставите точку после названия компонента Edit1, выйдет список доступных свойств, методов и событий. Когда мы впишем первую букву "T", список сортируется – в нем останутся только команды на букву "T", причем Delphi оценивает контекст, и оставляет в списке только те команды, которые в этом контексте могут быть использованы. В нашем случае, это строка. Свойство Text, которое останется в списке, может быть использовано в качестве строки:

увеличить изображение

Рис. 2.2.  Выбор свойства из списка – подсказки

Теперь нет нужды вводить "Text" самим – это свойство выделено в списке, и нам достаточно нажать <Enter>, чтобы вставить его в код. На будущее запомните: всегда, когда вы ставите точку после названия компонента, дождитесь такого списка. Дело не только в том, что так легче вводить код. Если список так и не появился, значит вы допустили ошибку. Возможно, в названии компонента, или даже в предыдущей строке.

Теперь сохраните проект в отдельную папку, модуль, как обычно, назовите Main, а проект можете назвать, например, Privet. После сохранения скомпилируйте его и посмотрите, какое сообщение будет выходить при различных строках, которые введет пользователь в поле ввода Edit1.

Справедливости ради стоит заметить, что в данном примере вовсе необязательно было использовать переменную – мы это сделали лишь в учебных целях. Такого же эффекта можно было добиться, если использовать выражение

'Привет, ' + Edit1.Text + '!'

прямо в команде ShowMessage:

procedure TForm1.Button1Click(Sender: TObject);

begin

ShowMessage('Привет, ' + Edit1.Text + '!');

end;

Стиль

Если вы надумаете пойти устраиваться на работу программистом, первым делом вас попросят показать ваши исходные коды. И дело тут вовсе не в том, что кто-то хочет украсть вашу программу, чтобы потом выдать ее за свою. Понимающие люди в первую очередь смотрят на стиль оформления кода. Давайте рассмотрим предыдущий пример:

procedure TForm1.Button1Click(Sender: TObject);

var s: String; begin s:= 'Привет, ' + Edit1.Text + '!'; ShowMessage(s); end;

Такой код вполне работоспособен, однако выглядит он не очень "читабельно", в нем легко запутаться. Посмотрите такой пример:

procedure TForm1.Button1Click(Sender: TObject);

var

s: String;

begin

s:= 'Привет, ' + Edit1.Text + '!';

ShowMessage(s);

end;

Уже лучше, не правда ли? Каждая команда располагается на своей собственной строке, читаемость кода стала намного легче. Однако в таком коде сразу сложно разобраться, где заканчивается один раздел и начинается другой. Классический стиль требует, чтобы вложенные команды выделялись несколькими пробелами, сдвигались вправо:

procedure TForm1.Button1Click(Sender: TObject);

var

s: String;

begin

s:= 'Привет, ' + Edit1.Text + '!';

ShowMessage(s);

end;

Такой код читать еще легче. Старайтесь сразу привыкать к такому стилю, чтобы не только другим было легко читать ваш код, но и вы сами не запутались в нем. Позднее мы еще вернемся к стилям программирования.

Комментарии

Комментарий – это текст, который программист в качестве подсказки вписывает для себя. Компьютер такой текст игнорирует, он нужен только для вас. При компиляции все комментарии просто вырезаются. В хорошем коде комментариев должно быть не менее трети от всего размера кода. Когда Вы будете делать большие проекты, без комментариев не обойтись. Уже через месяц, открыв исходный код большой программы, будет очень сложно вспомнить, что тут к чему, и как работает, поэтому не скупитесь на комментарии!

Комментарии бывают многострочные и однострочные. Многострочный комментарий заключается в фигурные скобки, и в этих строках не должно быть действующих операторов. Пример:

{Это многострочный

комментарий!}

Как видите, кавычки после закрывающей скобки ставить не нужно.

Однострочный комментарий ставится после символов "//", то есть двух слэшей. Этот комментарий может находиться как на отдельной строке, так и после (но не до!) оператора. Примеры:

//комментарий на отдельной строке

a := "Действующий оператор"; //комментарий после оператора

Не скупитесь на комментарии, обязательно указывайте, какую переменную и для чего вы создавали, что делает тот или иной блок кода. Говорят, в корпорации Microsoft увольняют программистов, если комментарии в их программах составляют менее трети общего кода!

Собственный Блокнот

Каждый пользователь, работающий с Windows, хоть раз да использовал простой текстовый редактор Блокнот. Сейчас мы создадим немного упрощенную версию Блокнота, которая позволяет вводить текст, сохранять его на диск, и загружать с диска. Для этого нам требуется создать новый проект. Если в данный момент у вас уже открыт какой либо проект, выберите команду меню "File – Close All (Файл – Закрыть всё)", затем "File – New – Application (Файл – Новое – Приложение)".

У нас есть новая форма, и пока больше ничего нет. Сразу изменим некоторые свойства формы. В свойстве Caption впишите "Мой блокнот" (естественно, без кавычек). Свойство Name изменим на "fMain".

Совет: чтобы легче ориентироваться в названиях модулей (файлов с кодом) и форм, лучше сразу выработать правила:

1. Перед названием формы будем указывать маленькую букву f, чтобы показать, что это именно форма.

2. Имена форм будем подбирать информативные, чтобы было понятно, с какой формой мы имеем дело.

3. Модули форм будем называть также, но без буквы f.

4. Главную форму всегда будем называть fMain, а модуль, соответственно, Main.

Эти рекомендации не являются обязательными, но в дальнейшем, когда пойдут проекты с множеством форм, они помогут вам ориентироваться в названиях. Можете выработать собственные правила.

Сохраним проект в отдельную папку. Модуль называем Main, а проекту даем имя MyNotebook.

Теперь познакомимся с новым, мощным компонентом Memo, который находится на вкладке Standard и предназначен для ввода пользователем многострочного текста.

Установите этот компонент на форму, в верхнюю левую часть формы, и растяните его по форме, оставив внизу немного места. Вниз установите, одну рядом с другой, три кнопки Button. У вас должно получится что то вроде этого:

увеличить изображение

Рис. 2.3.  Заготовка редактора текстов

Теперь выделим первую кнопку, и в свойстве Caption этой кнопки напишем "Сохранить". На второй кнопке напишем "Загрузить", на третьей – "Очистить".

Выделим компонент Memo, который представляет собой большое белое поле. У компонента есть одно интересное свойство Lines, которое содержит строки текста, набранного в компоненте. Подробней с этим свойством мы познакомимся позже, а пока выделим его в Инспекторе объектов, нажмем на кнопку с тремя точками справа от свойства и тем самым откроем редактор текста. Здесь можно набрать текст, который будет выведен в компонент "по умолчанию", при каждой загрузке программы. Нам как раз нужно, чтобы текста никакого не было, поэтому удалите все строки, какие там есть и нажмите "ОК". Компонент Memo очистился.

Это еще не все. Нам нужно, чтобы при вводе текст автоматически переносился на другую строку, а пользователь имел возможность его пролистывать. Найдите свойство ScrollBars (компонент Memo должен быть выделенным), это свойство отвечает за наличие полос прокрутки. Выберите значение ssVertical, чтобы появилась вертикальная полоса прокрутки.

С интерфейсом покончено, осталось вписать код, который будет выполняться программой. Дважды нажмем на первую кнопку, создадим обработчик события для кнопки "Сохранить". В месте, где мигает курсор, впишем только одну строку:

Memo1.Lines.SaveToFile('MyFile.txt');

Метод SaveToFile() свойства Lines компонента Memo сохраняет весь текст в указанный файл. Если вы не указываете путь к файлу, по умолчанию файл будет создан там, откуда была запущена программа.

Для второй кнопки напишем две строки:

if FileExists('MyFile.txt') then

Memo1.Lines.LoadFromFile('MyFile.txt');

Разберем эти строки. Что, если пользователь нажмет эту кнопку до того, как что-нибудь сохранит в файл? Файла то еще нет! Первая строка как раз выполняет проверку на существование файла. Если файла нет, то вторая строка выполняться не будет. Если он есть, тогда вторая строка считает текст из этого файла в компонент Memo. С условными операторами мы будем знакомиться позже, тогда смысл первой строки будет понятней.

Для третьей кнопки код еще проще:

Memo1.Clear;

Эта команда очищает компонент Memo от текста. Вот, собственно, и вся программа. Сохраните ее и скомпилируйте, проверьте, как она работает. Оцените легкость программирования – для создания полноценного редактора текстов мы написали всего 4 строки кода!

Поэкспериментируйте со свойством Font (Шрифт) компонента Memo, посмотрите, каким образом будет изменяться шрифт текста.