Подякувати Студентському архіву довільною сумою
Admin
26.02.2023 12:38
Дякуємо, що користуєтесь нашим архівом!
Середовище програмування DELPHI
Інформація про навчальний заклад
ВУЗ:
Національний університет Львівська політехніка
Інститут:
Не вказано
Факультет:
Не вказано
Кафедра:
Не вказано
Інформація про роботу
Рік:
2010
Тип роботи:
Лабораторна робота
Предмет:
Інформаційні технології
Частина тексту файла (без зображень, графіків і формул):
Міністерство освіти і науки України
Національний університет «Львівська політехніка»
Інститут комп’ютерних наук та інформаційних технологій
Кафедра АСУ
Лабораторна робота №8
Середовище програмування DELPHI
Львів 2010
Мета: навчитися використовувати API-функції у проектах Delphi.
Порядок роботи:
Створити проект для виконання індивідуального завдання.
Оформити звіт для захисту лабораторної роботи за зразком
назва роботи
мета роботи
зміст індивідуального завдання
тексти головного файлу проекту, програмних модулів та файлів форм
аналіз отриманих результатів та висновки
Завдання
Створити проект Delphi який, використовуючи певні API-функції, реалізує певний сценарій поведінки персонажа Microsoft Agent.
В індивідуальному завданні вказано: 1) дії, які виконує і коментує агент; 2) API-функції (їхні параметри), які можна застосувати; 3) додаткові джерела інформації.
Варіанти завдання
1) зачитує вміст текстового файла (назва задається у вікні класу Edit); 2) GetMessageA (EM_GETLINE), ReadFile;
1) зачитує текст, введений у вікні класу Edit; 2) GetMessageA (EM_GETLINE);
1) зачитує заголовок вікна під мишкою; 2) WindowFromPoint, SendMessageA (WM_GETTEXT);
1) перемикає розкладку клавіатури; 2) ActivateKeyboardLayout;
1) зачитує назви ярликів на “Робочому столі”; 2) FindWindowA(‘Progman’), GetWindow, SendMessageA(LVM_GETITEMTEXT);
1) ховає і відновлює панель задач; 2) FindWindow, SetWindowPos;
1) викликає меню “Start”; 2) FindWindow, SendMessageA (WM_SYSCOMMAND);
1) відправляє файл у “Recycle Bin” (назва задається у вікні класу Edit); 2) GetMessageA (EM_GETLINE), SHFileOperation;
1) зачитує змінні оточення і їхні значення; 2) GetEnvironmentStringsA, GetEnvironmentVariableA;
1) повертається у напрямку мишки; 2) GetCursorPos;
1) повідомляє, чи натиснуті клавіші “Caps Lock” та “Num Lock”; 2) GetKeyboardState;
1) розкриває вікно під мишкою на повний екран; 2) WindowFromPoint, SetWindowPos;
1) повідомляє, якщо на диску залишилось місця, менше від значення, заданого у вікні класу Edit; 2) GetMessageA (EM_GETLINE), GetDiskFreeSpaceExA;
1) змінює роздільну здатність екрану; 2) ChangeDisplaySettingsA;
1) запускає аплет панелі керування (файл Control.exe з параметром, наприклад, TimeDate.cpl); 2) WinExec;
1) повідомляє поточну розкладку клавіатури; 2) GetKeyboardLayoutNameA;
1) повідомляє версію Windows; 2) GetVersionExA;
1) вирівнює ярлики на “Робочому столі”; 2) FindWindowA (‘Progman’), GetWindow, SendMessageA (LVM_ARRANGE);
1) переміщує до себе заданий ярлик на “Робочому столі”; 2) FindWindowA (‘Progman’),GetWindow,SendMessageA (LVM_SETITEMPOSITION);
1) промовляє “Click here to begin”, при наведенні мишки на кнопку “Start”; 2) GetCursorPos;
Додаткова інформація
Проект AgentDemo.dpr (попередньо встановити через пункт головного меню Component (Install Component компоненту AgentObjects_TLB.pas).
Delphi World (архів статей).
Win32 Programmer Reference
Саймон Р. Windows 2000 API (відкривати за допомогою WinDjView).
18.02.2013 18:02-
Ділись своїми роботами та отримуй миттєві бонуси!
0%
Оголошення від адміністратора