Студопедия

Главная страница Случайная страница

Разделы сайта

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






  • Частина 4. 16.Завдання на створення запиту СУБД MS Access.






    16. Завдання на створення запиту СУБД MS Access.

    1) Відкриємо файл бази даних Підприємство.mdb.

    2) Додамо таблицю Кадри у вікно конструктора запитів.

    3) Перетягнемо поля Прізвище, Ім’я, По батькові, Посада, Оклад у нижню частину бланка

    запиту (рис. а).

    а

    4) Для відбору співробітників, які працюють на посаді робітник, на значення поля Посада

    встановимо умову відбору «Робітник» у рядку Условие отбора (Умова відбору).

    5) Збережемо запит.

    У режимі перегляду таблиці запит має вигляд, як показано на рис. б.

    б

    17. Для виконання завдання можна скористатися такими посиланнями:

    • https://www.plaza.kh.ua/ — інтернет-магазин цифрової техніки «Plaza»: ноутбуки,

    комп’ютери, комплектуючі.

    • https://www.plaza.kh.ua/guarantee/ — сервісні центри. Гарантійне обслуговування

    придбаних товарів здійснюють авторизовані сервісні центри, координати яких по-

    даються. Товари фірм-виробників, у яких немає сертифікованих сервісних центрів,

    обслуговуються через гарантійний відділ інтернет-магазину «Plaza».

    www.e-ranok.com.ua

    Варіант 6 33

    • https://hard.rozetka.com.ua/computers/c80095/filter/ — інтернет-супермаркет

    «Rozetka»: добір комп’ютерів за такими параметрами: клас (навчальний рівень, для

    роботи та навчання, ігрові комп’ютери), виробник, ціна, процесор, обсяг оперативної

    пам’яті, відеокарта, обсяг жорсткого диску, оптичний привід, операційна система.

    • https://rozetka.com.ua/service-centers/ — інформація про сервісні центри інтернет-

    супермаркету «Rozetka».

    • https://www.spark.ua/ — інтернет-магазин «Spark»: комп’ютери, портативна

    техніка, монітори, комплектуючі, МФУ, принтери, сканери, планшети, оргтехніка,

    мультимедіа, аксесуари для ПК, витратні матеріали, програмне забезпечення, носії

    інформації, інтернет-карти, usb-сувеніри.

    • https://service.spark.com.ua/ — інформація про сервісний центр інтернет-магазину

    «Spark».

    18. Задача на програмування мовою Delphi.

    Встановити значення властивостей в Інспекторі об’єктів для об’єкта Form: Caption — Літаюча

    кнопка, задати Width та Height форми, з палітри компонентів вибираємо необхідні компоненти,

    встановлюємо властивості Interval — 1000 для компоненти Timer. В Інспекторі об’єктів встановити

    для об’єкта BitBtn значення Caption — відповідно запропонованій в завданні назві кнопки, Glyph

    завантажити малюнок на кнопку.

    unit Unit1;

    interface

    uses

    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

    Dialogs, StdCtrls, Buttons, ExtCtrls;

    type

    TForm1 = class(TForm)

    BitBtn1: TBitBtn; // вкладка Additional, компонент BitBtn

    Timer1: TTimer; // вкладка System, компонент Timer

    procedure FormActivate(Sender: TObject);

    procedure Timer1Timer(Sender: TObject);

    private { Private declarations }

    delta: integer;

    public { Public declarations }

    end;

    var Form1: TForm1;

    implementation

    uses Types; {$R *.dfm}

    procedure TForm1.FormActivate(Sender: TObject);

    Begin

    delta: = 20; // 20 — крок для переміщення кнопки

    end;

    procedure TForm1.Timer1Timer(Sender: TObject);

    Begin

    if BitBtn1.Left+ 80 > Form1.Left + Form1.Width — 80 then //80 — розмір кнопки

    Begin

    BitBtn1.Left: = 5;

    BitBtn1.Top: = 15;

    delta: = 20;

    end;

    if BitBtn1.Top + 80 > Form1.BoundsRect.Bottom – 80 then delta: = –20;






    © 2023 :: MyLektsii.ru :: Мои Лекции
    Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав.
    Копирование текстов разрешено только с указанием индексируемой ссылки на источник.