Меню сайту
|
Параграф 5.4 НаписПараграф 5.4 Напис Створити проект, у якому властивості компонента Напис змінювалися при натисканні (подія Click) на окрему кнопку Button. 1. Встановимо властивості напис в Інспекторі об’єктів:
2. Кнопка_1 — змінює колір фону Напис Label1.Color:=clBlue; 3. Кнопка_2 — змінює колір тексту Напис Label1.Font.Color:=clRed; 4. Кнопка_3 — збільшує розмір тексту Напис Label1.Font.Size:=Label1.Font.Size+1; 5. Кнопка_4 — зменшує розмір тексту Напис Label1.Font.Size:=Label1.Font.Size-1; 6. Кнопка _5 — змінює текст Напис Label1.Caption:=' Я українець '; Доповнимо проект подією MouseMove, яка змінює колір фону і тексту Напис, та подією MouseLeave, яка повертає колір фону і тексту Напис в попередній стан. procedure TForm1.Label1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); procedure TForm1.Label1MouseLeave(Sender: TObject);
|
Афоризм
Все жалуются на свою память, но никто не жалуется на свой ум. Пошук
Календар
Друзі сайту
|