Как вывести фирму из кризиса

Компонент Edit является простейшим компонентом ввода текста в программу, для написания которой используется язык Delphi. однако часто служит и для вывода данных либо сообщений. Для добавления объекта Edit на форму следует нажать на соответствующую иконку компонента на панели Standart. Добавление осуществляется в стиле Drag&Drop. При добавлении следует обратить внимание на свойства, описанные в инспекторе объектов Делфи для данного компонента, а именно:

Enabled – свойство логического типа, определяющее активность конкретного элемента на форме, при установке значения False пользователь не сможет ввести данные в указанное поле Edit;

Font – свойство множественного типа, включающее в себя характеристики шрифта, который будет отображаться в поле Edit;

MaxLength – свойство целочисленного типа, определяющее максимальную символьную длину вводимого в Edit сообщения;

ReadOnly – свойство логического типа, определяющее возможность пользователя вносить изменение в поле Edit по ходу работы программы;

Text – ключевое свойство строкового типа, которое характеризует введенный в поле Edit текст;

Visible – свойство логического типа, определяющее видимость элемента. При установке значения True наш Edit будет абсолютно невидим на форме.

Учитывая объектную ориентированность языка Delphi, в тексте программы мы можем изменять значения свойств присваивая им значения в формате "Объект. Свойство". Теперь давайте напишем программу, которая будет возводить в квадрат число, введенное в компонент Edit1 и выводить результат в поле Edit2. Так как нам не нужно, чтобы пользователь вводил что-либо в поле Edit2, сделаем его неактивным при старте программы следующей процедурой:

procedure TForm1.FormActivate(Sender: TObject);

begin

end;

Результат работы программы выведем нажатием на кнопку Button1:

procedure TForm1.Button1Click(Sender: TObject);