6. Добавить в упражнение 5 кнопку «Домой», которая должна передвинуть «убегающую» в верхний левый угол формы.
Добавим к программе из предыдущего упражнения ещё одну кнопку со свойством Text
«Домой», добавим для неё обработчик события Click
. В обработчик события присвоим для свойств первой кнопки Left
и Top
значение 0
. Обработчик для кнопки «Домой» может выглядеть так:
procedure Form1.button2_Click(sender: Object; e: EventArgs);
begin
Button1.Top := 0;
Button1.Left := 0;
end;
Скачать готовый проект Pascal: Upr2-6.rar