створити або відкрити з'явиться смуга вибору БД, в якій за допомогою клавіш управління можна вибрати потрібну БД.
При виборі потрібної бази з'явиться БД в якій за допомогою клавіш вгору, вниз вибирається додавання, видалення, редагування, перегляд і створення.
Tслі пароль вірний, то відкривається головне меню бази даних. У головному меню міститься (меню, база даних lt; lt; LogyCom gt; gt ;, заміна пароля, про програму) Малюнок 3.3
Малюнок 3.3
При запуску (Аналіз продажів на складі компанії «LogyCom») відкривається база даних, яка складається з трьох частин (Товари складу компанії «LogyCom», Аналіз продажів на складі компанії «LogyCom», Працюючий персонал) Малюнок 3.4
Малюнок 3.4
Приклад фільтрації, в якому потрібно ввести назву товару і код. За цими двома пунктами він буде фільтрувати дані. Малюнок 3.5. Малюнок 3.6
Малюнок 3.5 - Фільтрація
Малюнок 3.6
Пошук, який шукає по трьох полях (ім'я, прізвище, посада) Малюнок 3.7
Малюнок 3.7
На малюнку 3.8 представлений завдання Прімер1. який виводить кол-во проданих і бракованих товарів
Малюнок 3.8
Висновок
По закінченню терміну курсової, я освоїв нові етапи роботи з програмним мовою Delphi, підняв завдяки практичним заняттям вправність щодо функцій та інших видів діяльності у створенні програм, тепер я впевнений що усвідомлено можу створити програми ідентичні за властивостями з програмами створеними під час практики, а так само поверх них маючи досвід і в інших типах функцій і операторів написання програм.
Список літератури
1. Архангельський А. Я. Програмування в Delphi 6.-M.: ЗАТ Видавництво БІНОМ 2003
2. Гутман Г.Н. Стаття в газеті Інформатика № 21, 2003
. Ілюстрований самовчитель по Delphi 6, 2002 г.
. Ілюстрований самовчитель по Delphi 7 для професіоналів.
. Куандик А.А. Створення системи бази даних у середовищі Delphi: навчальний посібник. Алмати: 2006 г.
6. Малишев О.В. Довідкова система по DELPHI. Версія 1.0. 1999
7. Попов В.Б. Turbo Pascal для школярів, M .: lt; lt; Фінанси і статистика gt; gt ;, 2003
. Пінкус М. Електронний підручник 32 уроку по Delphi: електронна бібліотека InfoCity.
. Фаронов В.В. Delphi 2005 розробка додатків для баз даних та інтернету.
СПб .: Питер, 2006 р.
10. Фаронов В.В. Turbo Pascal 7/0, 2001 г.
11. Фленов М.Є. Бази даних в середовищі Delphi 3, 2003
ДОДАТОК А
Лістинг програми
TForm1.SpeedButton1Click (Sender: TObject);a,b:string;:textfile;:boolean;(f,laquo;C:Bazaparol.txtraquo;);(f);:=edit1.Text;:=false;(not EOF (f)) and (c=false) do begin (f, a); a=b then c:=true; .Hide ;; (c=true) then form2.showmessagedlg ( НЕ ВІРНО , mtinformation, [mbOK], 0); (f) ;; TForm1.SpeedButton2Click (Sender: TObject) ;;;. TForm3.BitBtn1Click (Sender: TObject) ;. First ;; TForm3.BitBtn2Click (Sender: TObject) ;. Last ;; TForm3.BitBtn3Click (Sender: TObject); Table1.Eof then.Next ;; TForm3.BitBtn4Click (Sender: TObject); Table1.Bof then.Prior ;; TForm3.BitBtn8Click (Sender: TObject) ;. Insert ;; TForm3.BitBtn6Click (Sender: TObject) ;. Delete; ( запис удаліна! ) ;; TForm3.SpeedButton2Click (Sender: TObject); not Table1.Locate ( Tovar raquo ;, Edit1.Text, [loCaseInsensitive,]) then ( Запис не знайдено ) ;; TForm3.Button1Click (Sender: TObject);.Filtered:=false;.FilterOptions:=[focaseinsensitive];.Filter:=laquo;(Tovar=raquo;laquo;raquo;+edit3.Text+laquo;raquo;laquo;)and(Kol_vo=raquo;+edit2.Text+laquo;)raquo;;.Filtered:=true;;TForm3.Button2Click(Sender: TObject) ;. Filtered:=false ;; TForm3.Timer1Timer (Sender: TObject) ;. Caption:=TimeToStr (Time) ;; TForm3.Button7Click (Sender: TObject); openpicturedialog1.Execute then.Edit;.Picture.LoadFromFile(openpicturedialog1.FileName);.Post;;;TForm3.SpeedButton4Click(Sender: TObject) ;;. Show ;; TForm3.BitBtn19Click (Sender: TObject); pole: shortstring; RadioGroup3.itemindex of
: pole:= Tovar raquo ;;
: pole:= Model raquo ;;
:pole:=laquo;Kod_tovararaquo;;;.Locate(pole,edit1.Text,[locaseinsensitive,lopartialKey]) ;; TForm3.BitBtn20Click (Sender: TObject); pole: shortstring; RadioGroup2.itemindex of
...
