Проект «Перевод»

Проект «Перевод» Создадим проект, в котором будем динамически менять свойства компонентов, а также посмотрим последовательность действий для разработки обработчика событий. Поместить на форму три компонента Tlabel : Label1 в центре формы. Свойство Caption оставить без изменения; Label2 в правом верхнем углу формы. Свойство Caption изменить на "English"; Label3 разместить на компонент Label2. Свойство Caption изменить на "Русский".

2.Для Form1 создать событие OnCreate. В обработчике события введите код: Проект «Перевод» procedure TForm1.FormCreate(Sender: Tobject); begin Label1.Caption := 'Привет, Мир!'; Label2.Visible := true ; Label3.Visible := false ; end ; Определяет видимость компонента во время выполнения приложения

Проект «Перевод» 3.Для Label2 создайте событие OnClick. В обработчике события введите код: procedure TForm1.Label2Click(Sender: Tobject); begin Label2.Visible := false ; Label3.Visible := true ; Label1.Caption := 'Hello, World!'; end ;

4.Для Label3 создайте событие OnClick. В обработчике события введите код: Проект «Перевод» procedure TForm1.Label3Click(Sender: Tobject); begin Label2.Visible := true ; Label3.Visible := false ; Label1.Caption := 'Привет, Мир!'; end ;

Проект «Перевод» 5.Поместить на форму в правый нижний угол компонент TBitBtn. Изменить вид с помощью свойства Kind. 6.Запустить проект.