ванню, отримаємо результат.
Вихід
Вихід в середу Windows відбувається при натисканні на червоний хрестик у правому верхньому кутку, або сполученням клавіш Alt + F4.
Висновок
У курсовій роботі була спроектована, розроблена база даних в додатку Microsoft SQL. Сам додаток до бази даних написано на Delphi 7. Ця база даних має зручний інтерфейс, головне меню, дозволяє додавати, видаляти, шукати і сортувати дані.
Список використаної літератури
· А.Я.Архангельскій Програмування в С ++ Builder 7-е изд.: ТОВ «Біном-Пресс», 2010р.- 896 с. (+1230 С.): Ил.
· Культин Н. Б. C ++ Builder в задачах і прикладах. Петербург, 2005. - 336 с: ил.- СПб .: БХВ
· Культин Н. Б. Самовчитель по Delphi. Петербург, 2005. - 356 с: ил.- СПб .: БХВ
· Карпова Т.С. Бази даних: моделі, розробка, реалізація.- СПб .: Питер, 2001. - 304с.
· Фаронов В.В. Програмування баз даних в Delphi 7: Навчальний курс.- СПб .: Питер, 2004 - 464 с.
· Могильов А.В., Пак Н.І., Хеннер Є.К. Інформатика: Учеб. посібник для студ. пед. ву-зов/Под ред. Є.К. Хеннера.- М., Academia, 2004.
· Культин Н.Б. Програмування в Turbo Pascal і Delphi.- СПб .: BHV - Санкт-Петербург, 1998. - 240 с.
Лістинг програми
procedure TForm1.pgc2Change (Sender: TObject); pgc2.ActivePageIndex=0 then
//panel.Visible:=True; pnl1.Visible:=False; pnl3.Visible:=False; pnl4.Visible:=False;.Visible:=True;pnl10.Visible:=False;pnl11.Visible:=False;pnl12.Visible:=False;.Visible:=True;pnl7.Visible:=False; pnl6.Visible:=False; pnl8.Visible:=False;
//button.Visible:=True; btn3.Visible:=False; btn4.Visible:=False; btn5.Visible:=False;
//label.Visible:=True;lbl2.Visible:=True;lbl3.Visible:=True;.Visible:=False;lbl8.Visible:=False;lbl9.Visible:=False;.Visible:=False;lbl21.Visible:=False;.Visible:=False;lbl25.Visible:=False;.Visible:=False;lbl22.Visible:=False;lbl23.Visible:=False;lbl26.Visible:=False;
//edit.Visible:=True;DBEditEh2.Visible:=True;DBEditEh3.Visible:=True;.Visible:=False;edt2.Visible:=False;edt3.Visible:=False;;pgc2.ActivePageIndex=1 then
//panel.Visible:=False; pnl1.Visible:=True; pnl3.Visible:=False; pnl4.Visible:=False; .Visible:=False; pnl10.Visible:=True; pnl11.Visible:=False; pnl12.Visible:=False; .Visible:=False; pnl7.Visible:=True; pnl6.Visible:=False; pnl8.Visible:=False;
//button.Visible:=False; btn3.Visible:=True; btn4.Visible:=False; btn5.Visible:=False;
//label.Visible:=True;lbl2.Visible:=True;lbl3.Visible:=True;.Visible:=False;lbl8.Visible:=False;lbl9.Visible:=False;.Visible:=False;lbl21.Visible:=False;.Visible:=False;lbl25.Visible:=False;.Visible:=False;lbl22.Visible:=False;lbl23.Visible:=False;lbl26.Visible:=False;
//edit.Visible:=True;DBEditEh2.Visible:=True;DBEditEh3.Visible:=True;.Visible:=False;edt2.Visible:=False;edt3.Visible:=False;;pgc2.ActivePageIndex=2 then //panel.Visible:=False; pnl1.Visible:=False; pnl3.Visible:=True; pnl4.Visible:=False; .Visible:=False; pnl10.Visible:=False; pnl11.Visible:=True; pnl12.Visible:=False; .Visible:=False; pnl7.Visible:=False; pnl6.Visible:=True; pnl8.Visible:=False;
//button.Visible:=False; btn3.Visible:=False; btn4.Visible:=True; btn5.Visible:=False;
//label.Visible:=False;lbl2.Visible:=False;lbl3.Visible:=False;.Visible:=True;lbl8.Visible:=True;lbl9.Visible:=True;.Visible:=True;lbl21.Visible:=False;.Visible:=False;lbl25.Visible:=False;.Visible:=False;lbl22.Visible:=False;lbl23.Visible:=False;lbl26.Visible:=False;
//edit.Visible:=True;DBEditEh2.Visible:=True;DBEditEh3.Visible:=True;.Visible:=True;edt2.Visible:=False;edt3.Visible:=False;;pgc2.ActivePageIndex=3 then
//panel.Visible:=False; pnl1.Visible:=False; pnl3.Visible:=False; pnl4.Visible:=True; .Visible:=False; pnl10.Visible:=False; pnl11.Visible:=False; pnl12.Visible:=True; .Visible:=False; pnl7.Visible:=False; pnl6.Visible:=False; pnl8.Visible:=True;
//button.Visible:=False; btn3.Visible:=False; btn4.Visible:=False; btn5.Visible:=True;
//label.Visible:=False;lbl2.Visible:=False;lbl3.Visible:=False;.Visible:=False;lbl8.Visible:=False;lbl9.Visible:=False;.Visible:=False;lbl21.Visible:=False;.Visible:=True;lbl25.Visible:=True;.Visible:=True;lbl22.Visible:=True;lbl23.Visible:=True;lbl26.Visible:=True;
