Implementation. procedure TForm1.FormClick(Sender: TObject)

procedure TForm1.FormClick(Sender: TObject);

Begin

end;

Разработка программного кода для вывода текста.

Вариант 1. Для вывода текста в процедуре обработки события необходимо задать значение строковой константы (Str1), а затем свойству.Caption присвоить это значение.

procedure TForm1.FormClick(Sender: TObject);

Const Str1= 'Мы все учились понемногу,' #10+ //#10 – перевод строки

'Чему-нибудь и как-нибудь.'; // + объединение строк

Begin

Label2.Caption:= Str1;

end;

Вариант 2. З начение строковой константы (Str1) задано в разделеimplementation, а в процедуре обработки события свойству Caption присвоено значение константы.

Implementation

………………

Const Str1= 'Мы все учились понемногу, '#10+ //#10 – перевод строки

'Чему-нибудь и как-нибудь.'; // + объединение строк

procedure TForm1.FormClick(Sender: TObject);

Begin

Label2.Caption:= Str1;

end;

Если константа (или переменная) используется в нескольких процедурах, то вариант 2 предпочтительнее.

TEdit - однострочное редактируемое текстовое поле

Компонент класса TEdit позволяет осуществлять ввод, редактирование и отображение текстовой строки.

Text:String - центральное свойство, отображаемая строка.

CharCase – способ автоматического преобразования регистра букв:

esNormal – без преобразования;

esUpperCase – все буквы прописные;

esLowerCase – все буквы строчные.

ReadOnly –(true/false) – разрешает/запрещает изменение текста.

Свойства +Font, AutoSize, WordWrap аналогичны свойствам компонента TLabel


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: