Створіть проект, у якому в результатi настання події Click для напису буде встановлено: • зменшення його відступу від лівої межі вікна на 20 пікселів, розмiр символів 12, колір символів синій і виведеться в напис назва вашого закладу освіти; • зменшення ширини напису на 2 символи, розмiр символів 12, колір сим волів синій і виведеться в напис назва вашого закладу освіти.
Ответы
Ответ:
Створюємо проєкт у Lazarus. Після цього на верхній панелі натисніть кнопку "Label", створіть звичайний напис.
Подвійним натисканням на цей Label активуйте саму процедуру натискання на напис. Зліва, між "begin" та "end;", напишіть наступний код:
Label1.AutoSize := False; // щоб спрацював останній метод
Label1.Left := Label1.Left - 20; // змінити відстань від лівого краю
Label1.Font.Size := 12; // встановити розмір шрифту - 12
Label1.Color := clblue; // встановити колір тексту - синій
Label1.Caption := 'Школа №66'; // впишіть назву своєї школи! це зміна тексту напису.
Label1.Width := Label1.Width - 2; // зменшення ширини на 2
Компілюємо та бачимо результат (фото №1 - до натискання, фото №2 - після натискання).
*через зміну ширини текст буде обрізаним.
