2020-01-14
119
После запуска приложения вы увидите главное окно программы (рисунок 27):
Рисунок 27 Главное окно базы данных «Компьютерный магазин».
Для того чтобы распечатать таблицу необходимо кликнуть по «Файл» и «Печать» (рисунок 28).
Рисунок 28 Для печати таблицы
Для выхода из программы необходимо кликнуть «Файл» и «Выход» (рисунок 29).
Рисунок 29 Для выхода из программы
Чтобы изменить шрифт необходимо кликнуть «Настройки» и «шрифт» (рисунок 30).
Рисунок 30 Выбор шрифта.
Чтобы узнать о программе необходимо, кликнуть «Помощь» «о программе» (рисунок 31).
Рисунок 31 О программе
Для того чтобы узнать «о создателе» необходимо кликнуть «Помощь» «о создателе» (рисунок 32).
Рисунок 32 О создателе.
Чтобы узнать о «руководстве пользователя» необходимо кликнуть «Помощь» «руководство пользователя» (рисунок 33).
Рисунок 33 – Руководство пользователя.
Чтобы переключаться между таблицами, необходимо кликнуть по выбранной базе данных (рисунок 34).
Рисунок 34 – Перемещение между таблицами.
Для перемещения из начала таблице в конец необходимо кликнуть по 
а если на оборот то 
. Также можно добавить в таблицу данные при нажатии кнопки, 
а если удалить то 
.
А эти кнопки 
предназначены для перехода построчно.
Изменить 
Сохранить 
Удалить 
Обновить 
ЗАКЛЮЧЕНИЕ
В теоретической части была рассмотрена достаточно актуальная тема среди программистов – оптимизация программ. В ней были рассмотрены методы и подходы к различным средам программированиям в современной операционной системе.
Оптимизация программ является неотъемлемой частью всех хорошо обученных программистов. Ведь программа, работающая эффективно и быстро намного лучше той, которая работает медленнее и сложна в освоении, именно поэтому оптимизация программ является наиболее актуальной темой на данный период времени.
Если программа работает быстро и устойчива к любому программному обеспечению и операционной системе это значит, что вы добились успеха, ваша программа,будет иметь успех, ведь массовость применения это и есть прибыль от вашей работы.
В практической части была создана программа “База данных компьютерного магазина”, также были рассмотрены аналоги существующих баз данных.
1. Компьюлиб.
Небольшая программа предоставляющая возможности Учета компьютеров, устройств, программ с распределением по административным отделам, доменам, месторасположению, помещениям, ответственным лицам. Учет гарантийных сроков, расчет сроков окончания гарантии.
Недостатки данной программы в том, что она платная и имеет очень громоздкий и непонятный интерфейс.
2.Hardware inspector.
Инвентарный учет компьютеров и оргтехники на предприятии. Возможность автоматизированного заполнения базы данных об устройствах (из отчетов ASTRA, ASTRA32, EVEREST и AIDA32). На все устройства заводятся паспорта. Отслеживается история перемещения устройств, их ремонт и профилактика.
Недостатки программы заключаются в том, что программа очень устарела по отношению к нашей базе данных и имеет очень большой клиент – 40 мегабайт.
СПИСОК ЛИТЕРАТУРЫ
1. Боэм Б. У. Инженерное проектирование программного обеспечения. М.: Радио и связь, 2003. 511 с.
2. Липаев В. В. Отладка сложных программ: Методы, средства, технология. М.: Энергоатомиздат, 1999. 384 с.
3. Майерс Г. Искусство тестирования программ. М.: Финансы и статистика, 2004. 176с.
4. Орлов С. А. Принципы объектно-ориентированного и параллельного программирования на языке Ada 95. Рига: TSI, 2006. 327 с.
5. Чеппел Д. Технологии ActiveX и OLE. M.: Русская редакция, 2008. 320 с.
6. Abreu, F. В., Esteves, R., Goulao, M. The Design of Eiffel Programs: Quantitative Evaluation Using the MOOD metrics. Proceedings of the TOOLS'96. Santa Barbara, California 20 pp. July 1999.
7. Albrecht, A. J. Measuring Application Development Productivity. Proc. IBM Application Development Symposium, Oct. 2005, pp. 83-92.
8. Ambler, S. W. The Object Primer. 2nd ed. Cambrige University Press, 2006. 541 pp.
9. Beck, K., and Cunningham, W. A Laboratory for Teaching Object-oriented Thinking. SIGPLAN Notices vol. 24 (10), October 2005, pp 1-7.
10. Beck, K. Embracing Change with Extreme Programming. IEEE Computer, Vol. 32, No. 10, October 2006, pp. 70-77.
11. Beck, K. Extreme Programming Explained. Embrace Change. Addison-Wesley, 1999.211pp.
12. Beck, K, Fowler, M. Planning Extreme Programming. Addison-Wesley, 2004. 156pp.
13. Beizer, B. Software Testing Techniques, 2nd ed. New York: International Thomson Computer Press, 1999. 503 pp.
14. Beizer, B. Black-Box Testing: Techniques for Functional Testing of Software and Systems. New York: John Wiley & Sons, 2006. 320 pp.
15. Bieman, J. M. and Kang, B-K. Cohesion and Reuse in an Object-Oriented System. Proc. ACM Symposium on Software Reusability (SSR'95), pp. 259-262, April 2008.
16. Binder, R. V. Testing object-oriented systems: a status report. American Programmer 7 (4), April 1999, pp. 22-28.
17. Binder, R. V. Design for Testability in Object-Oriented Systems. Communications of the ACM, vol. 37, No 9, September 2009, pp. 87-101.
18. Binder, R. V. Testing Object-Oriented Systems. Models, Patterns, and Tools. Ad-dison-Wesley, 2006. 1298 pp.
ПРИЛОЖЕНИЕ
Исходный текст программы база данных «Компьютерный магазин»
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, DBCtrls, Grids, DBGrids, DB, ADODB, jpeg, Menus,
StdCtrls, ShellAPI;
type
TForm1 = class(TForm)
ADOConnection1: TADOConnection;
ADOTable1: TADOTable;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
DBNavigator1: TDBNavigator;
ADOTable2: TADOTable;
ADOTable3: TADOTable;
DataSource2: TDataSource;
DataSource3: TDataSource;
DBGrid2: TDBGrid;
DBGrid3: TDBGrid;
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
N6: TMenuItem;
N7: TMenuItem;
RadioGroup1: TRadioGroup;
N8: TMenuItem;
N9: TMenuItem;
N10: TMenuItem;
N11: TMenuItem;
FontDialog1: TFontDialog;
ColorDialog1: TColorDialog;
PrintDialog1: TPrintDialog;
procedure RadioGroup1Click(Sender: TObject);
procedure N6Click(Sender: TObject);
procedure N7Click(Sender: TObject);
procedure N3Click(Sender: TObject);
procedure N9Click(Sender: TObject);
procedure N10Click(Sender: TObject);
procedure N11Click(Sender: TObject);
procedure N5Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
uses Unit2;
{$R *.dfm}
procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
if RadioGroup1.ItemIndex=0 then
begin
DBGrid1.Visible:=True;
DBGrid2.Visible:=False;
DBGrid3.Visible:=False;
DBNavigator1.DataSource:=DataSource1;
end;
if RadioGroup1.ItemIndex=1 then
begin
DBGrid1.Visible:=False;
DBGrid2.Visible:=True;
DBGrid3.Visible:=False;
DBNavigator1.DataSource:=DataSource2;
end;
if RadioGroup1.ItemIndex=2 then
begin
DBGrid1.Visible:=False;
DBGrid2.Visible:=False;
DBGrid3.Visible:=True;
DBNavigator1.DataSource:=DataSource3;
end;
end;
procedure TForm1.N6Click(Sender: TObject);
begin
FontDialog1.Execute;
DBGrid2.Font:=FontDialog1.Font;
end;
procedure TForm1.N7Click(Sender: TObject);
begin
ColorDialog1.Execute;
DBGrid2.Color:=ColorDialog1.Color;
end;
procedure TForm1.N3Click(Sender: TObject);
begin
PrintDialog1.Execute;
end;
procedure TForm1.N9Click(Sender: TObject);
begin
Form2.showmodal;
end;
procedure TForm1.N10Click(Sender: TObject);
begin
ShowMessage('Создал Сахаров Андрей Николаевич');
end;
procedure TForm1.N11Click(Sender: TObject);
begin
ShellExecute(Handle, nil, ‘Руководство пользователя БД.docx’, nil, nil, SW_SHOW);
end;
procedure TForm1.N5Click(Sender: TObject);
begin
Form1.Close;
end;
end.
