Главная страница Случайная страница Разделы сайта АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
💸 Как сделать бизнес проще, а карман толще?
Тот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое раписание, но и напоминать клиентам о визитах тоже.
Проблема в том, что средняя цена по рынку за такой сервис — 800 руб/мес или почти 15 000 руб за год. И это минимальный функционал.
Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.⚡️ Для новых пользователей первый месяц бесплатно. А далее 290 руб/мес, это в 3 раза дешевле аналогов. За эту цену доступен весь функционал: напоминание о визитах, чаевые, предоплаты, общение с клиентами, переносы записей и так далее. ✅ Уйма гибких настроек, которые помогут вам зарабатывать больше и забыть про чувство «что-то мне нужно было сделать». Сомневаетесь? нажмите на текст, запустите чат-бота и убедитесь во всем сами! I. Створення найпростішого Windows-додатка з заданим заголовком вікна і кольором форми
Хід виконання лабораторної роботи.
1. Створити папку для збереження розроблених додатків 2. Запустити Delphi 3. Змінити заголовок вікна форми з Form1 на Привіт: у вікні інспектора об'єктів (Object Inspector) установити для властивості Caption значення Привіт 4. Змінити колір форми зі стандартного на іншій: у вікні інспектора об'єктів установити для властивості Color значення clAqua. 5. Виконати додаток: 5.1. Запустити додаток - меню Run, Run або F9 або кнопка на панелі інструментів. 5.2. Змінити розміри вікна. 5.3. Виконати екперимент з стандартними кнопками мінімізації і максимізації вікна. 5.3. Закінчити роботу додатка, закривши його вікно. 6. Зберегти форму і проект на диску: Меню File, Save All, установити свою папку, створити нову папку (з ім'ям Додаток1), установити нову папку, відкрити неї, ввести ім'я проекту.
II. Створення Windows-додатка, що містить текст " Моя перша програма! " і кнопки, що дозволяють змінювати розмір шрифту і рухати текст
1. Запустити Delphi 2. Помістити об'єкт Label у вікно форми Form1: 2.1. Вибрати в палітрі компонентів (на сторінці стандартних компонентів) компонентів Label. 2.2. Клацнути на ньому і потім клацнути у формі. Об'єкт буде доданий у форму і за замовчуванням одержить ім'я Label1. 2.3. Перемістити об'єкт Label1 на бажане місце у формі. 3. Змінити властивості об'єкта Label1: 3.1. Переконатися, що об'єкт Label1 виділений. 3.2. У вікні інспектора об'єктів (Object Inspector) установити наступні значення для властивостей об'єкта:
__________________________________________________ 4. Виконати додаток: меню Run, Run або F9. 5. Зберегти форму і проект на диску: Меню File, Save All, встановити свою папку, ввести ім'я Додаток2. 6. Помістити об'єкт Button (командна кнопка) у вікно Form1. Він за замовчуванням одержить ім'я Button1. Змінити його розміри. 7. Встановити властивість Caption об'єкта Button1 у значення " Збільшення". 8. Написати код для події Click на об'єкті Button1: 8.1. Два рази клацнути по об'єкті Button1 у формі, що приведе до відкриття вікна коду (переключення між вікном коду і вікном форм - F12). 8.2. Між словами Begin і End написати наступний код: Label1.Font.Size: = Label1.Font.Size +2; 9. Виконати програму. Звернути увагу на те, що відбувається при натисканні кнопки з написом " Збільшення". 10. Зберегти форму і проект на диску: Меню File, Save. 11. Створити об'єкт " командна кнопка" для зменшення розміру шрифту в тексті. 12. Створити об'єкт " командна кнопка" для того, щоб рухати текст. Код: Label1.Left: = Label1.Left + 10; Label1.Top: = Label1.Top + 10; 13. Створити об'єкт " командна кнопка" для того, щоб зробити текст невидимим. Код: Label1.visible: = false; 14. Створити об'єкт " командна кнопка" для виходу з роботи програми. Код: Close; 15. Зберегти форму і проект.
|