Разработка ПО для АРМ сетевого администратора

Аннотация
Введение
1. Технологический раздел
1.1 Описание деятельности компании
1.2 Описание процесса управления сетевым трафиком во внутреннем канале и в каналах VPN северо-западного региона компании
1.3 Программно-техническое обеспечение компании
1.4 Анализ ТЗ
1.5 Цель и назначение разработки
1.6 Анализ требований
1.6.1 Социальные требования
1.6.2 Экономические требования
1.6.3 Эстетические требования
1.7 Технические требования
1.8 Выбор метода оценки эффективности
1.8.1 Предварительное ранжирование
1.8.2 Компетентность экспертов
1.8.3 Повторное ранжирование показателей с учетом компетентности экспертов
1.8.4 Определение согласия экспертов.
1.8.5 Оценка значимости показателей
1.9 Обзор аналогов
1.9.1Экспертная оценка аналогов по частным критериям
1.9.2 Расчет обобщенного показателя эффективности
1.9.3 Предварительная оценка проекта
2. Проектный раздел
2.1. Структурное проектирование
2.2. Логическое проектирование
2.3 Описание систем классификации и кодирования
2.4 Выбор языка программирования
2.5 Выбор СУБД
3. Специальный раздел
3.1 Тестирование
3.2 Описание программной реализации системы
3.2.1 Описание сценария работы программы
3.2.2 Принципиальная схема работы системы
4. Организационно-экономический раздел
5. Разработка вопросов БЖД при работе на ПК
5.1 Актуальность проблемы
5.2 Характеристика условий труда
5.3 Постановка задачи
5.4 Рекомендации к рабочему месту разработчика
5.5 Режим труда
5.6 Расчетная часть
Заключение
Список литературы
Приложение – Программный код системы

В целях преодоления указанных недостатков даются общие рекомендации: лучше передвижная клавиатура; должны быть предусмотрены специальные приспособления для регулирования высоты стола, клавиатуры и экрана, а также подставка для рук.
Существенное значение для производительной и качественной работы на компьютере имеют размеры знаков, плотность их размещения, контраст и соотношение яркостей символов и фона экрана. Если расстояние от глаз оператора до экрана дисплея составляет 60…80 см, то высота знака должна быть не менее 3 мм, оптимальное соотношение ширины и высоты знака составляет 3:4, а расстояние между знаками – 15…20% их высоты. Соотношение яркости фона экрана и символов - от 1:2 до 1:15.
Создание благоприятных условий труда и правильное эстетическое оформление рабочих мест на производстве имеет большое значение как для облегчения труда, так и для повышения его привлекательности, положительно влияющей на производительность труда.
5.4 Режим труда
В таблице 5.1 представлены сведения о регламентированных перерывах, которые необходимо делать при работе на компьютере, в зависимости от продолжительности рабочей смены, видов и категорий трудовой деятельности с ПЭВМ (СанПиН 2.2.2 542-96 «Гигиенические требования к видеодисплейным терминалам, персональным электронно-вычислительным машинам и организации работ»).
Таблица 5.1
Время регламентированных перерывов при работе на компьютере
Категория работы с ВДТ или ПЭВМ Уровень нагрузки за рабочую смену при видах работы с ВДТ Суммарное время регламентированных перерывов, мин Группа А, количество знаков Группа Б, количество знаков Группа В, часов При 8-часовой смене При 12-часовой смене I до 20000 до 15000 до 2,0 30 70 II до 40000 до 30000 до 4,0 50 90 III до 60000 до 40000 до 6,0 70 120 В соответствии со СанПиН 2.2.2 546-96 в нашем случае, работа программиста относится к творческой деятельности, рабочий день программиста 8 часов, следовательно суммарное время перерыво составляет 70 минут.
Эффективность перерывов повышается при сочетании с производственной гимнастикой или организации специального помещения для отдыха персонала с удобной мягкой мебелью, аквариумом, зеленой зоной и т.п.
5.6 Расчетная часть
Расчет освещенности рабочего места сводится к выбору системы освещения, определению необходимого числа светильников, их типа и размещения. Исходя из этого, рассчитаем параметры искусственного освещения.
Расчет освещения производится для комнаты площадью 18м2, ширина которой 6м, высота - 3 м. Воспользуемся методом светового потока.
Для определения количества светильников определим световой поток, падающий на поверхность по формуле:
, где
F - рассчитываемый световой поток, Лм;
Е - нормированная минимальная освещенность, Лк (определяется по таблице). Работу программиста, в соответствии с этой таблицей, можно отнести к разряду точных работ, следовательно, минимальная освещенность будет Е = 300Лк;
S - площадь освещаемого помещения (в нашем случае S = 15м2);
Z - отношение средней освещенности к минимальной (обычно принимается равным 1,1…1,2 , пусть Z = 1,1);
К - коэффициент запаса, учитывающий уменьшение светового потока лампы в результате загрязнения светильников в процессе эксплуатации (его значение зависит от типа помещения и характера проводимых в нем работ и в нашем случае К = 1,5);
n - коэффициент использования, (выражается отношением светового потока, падающего на расчетную поверхность, к суммарному потоку всех ламп и исчисляется в долях единицы; зависит от характеристик светильника, размеров помещения, окраски стен и потолка, характеризуемых коэффициентами отражения от стен (РС) и потолка (РП)), значение коэффициентов РС и РП были указаны выше: РС=40%, РП=60%. Значение n определим по таблице коэффициентов использования различных светильников. Для этого вычислим индекс помещения по формуле:
, где
S - площадь помещения, S = 18 м2;
h - расчетная высота подвеса, h = 2.92 м;
A - ширина помещения, А = 3 м;
В - длина помещения, В = 6 м.
Подставив значения получим:
Зная индекс помещения I находим n = 0,22
Подставим все значения в формулу для определения светового потока F:

Для освещения выбираем люминесцентные лампы типа ЛБ40-1, световой поток которых F = 4320 Лк.
Рассчитаем необходимое количество ламп по формуле:

N - определяемое число ламп;
F - световой поток, F = 33750 Лм;
Fл- световой поток лампы, Fл = 4320 Лм.

При выборе осветительных приборов используем светильники типа ОД. Каждый светильник комплектуется двумя лампами.
Шум ухудшает условия труда, оказывая вредное действие на организм человека. Работающие в условиях длительного шумового воздействия испытывают раздражительность, головные боли, головокружение, снижение памяти, повышенную утомляемость, понижение аппетита, боли в ушах и т. д. Такие нарушения в работе ряда органов и систем организма человека могут вызвать негативные изменения в эмоциональном состоянии человека вплоть до стрессовых.
В таблице 5.2 указаны предельные безопасные уровни звука в зависимости от категории тяжести и напряженности труда.
Таблица 5.2
Предельные уровни звука, дБ, на рабочих местах.
Категория
напряженности труда Категория тяжести труда I. Легкая II. Средняя III. Тяжелая IV. Очень тяжелая I. Мало напряженный 80 80 75 75 II. Умеренно напряженный 70 70 65 65 III. Напряженный 60 60 - - IV. Очень напряженный 50 50 - -
Уровень шума на рабочем месте программистов и операторов ПК не должен превышать 50дБА, а в залах обработки информации на вычислительных машинах - 65дБА. Для снижения уровня шума стены и потолок помещений, где установлены компьютеры, могут быть облицованы звукопоглощающими материалами. Уровень вибрации в помещениях вычислительных центров может быть снижен путем установки оборудования на специальные виброизоляторы.
Список нормативных актов
СанПиН 2.2.2 546-96;
СанПиН 2.2.2 542-96;
СН-245-71;
ГОСТ 12.1.003-83;
СНиПП-4-79.
Заключение
Итак, целью работы является повышение эффективности работы администратора путем разработки системы мониторинга сетевого трафика.
В ходе первой главы было дано описание объекта исследования:
Характеристика деятельности компании «Славянка»;
Описан процесс мониторинга сетевого трафика;
Описана программно-техническая архитектура системы;
Разработано техническое задание на разработку.
Во второй главе разработан проект системы мониторинга сетевого трафика. Создана структура информационного фонда, описаны системы классификации и кодирования, используемые в системе.
В третьей главе представлен результат тестирования системы и описана принципиальная схема работы системы.
В четвертой главе дано финансово-экономическое обоснование разработки и внедрения системы мониторинга сетевого трафика.
В пятой главе даны решения по охране труда оператора ПК, работающего с системой.
Таким образом, цель работы можно считать достигнутой, а инженерные задачи решенными.
Список литературы
Барановская Т.П., Лойко В.И., Семенов М.И., Трубилин А.И. Архитектура компьютерных сетей. М., 2003.
Борзенко А. IBM PC: устройство, ремонт, модернизация. М.: Компьютер Пресс, 1995. – 297с.
Вишневский В.М. Теоретические основы проектирования компьютерных сетей. – М.: Техносфера, 2003 - 512 с.
Вишнеков А.В., Гуляев Д.В., Сафонова И.Е. Расчет аппаратной надежности корпоративных локальных вычислительных сетей ЭВМ // Автоматизация и современные технологии. 2003. № 4. С. 3 – 7.
Гук М. Аппаратные средства локальных сетей. Энциклопедия. – СПб.: Питер, 2000. – 576с.
Кульгин М. Технология корпоративных сетей. Энциклопедия. – СПб.: Питер, 2000.- 704 с.
Максимов Н. В., Попов И. И. Компьютерные сети. – М.: Форум, 2007. – 448с.
Мизин И.А. Сети коммутации пакетов. – М.: Радио и связь, 1986. – 405 с.
Морозевич А.Н. Основы информатики: Учебное пособие для студентов вузов. – М.: Новое знание, 2001. – 544с.
Новиков Ю. В., Кондратенко С. В. Основы локальных сетей. КуПК лекций. – СПб.: Интуит, 2005. – 360с.
Олифер В. Новые технологии и оборудование IP-сетей. – СПб.: BHV, 2001. – 512 с.
Олифер В.Г., Олифер Н.А. Компьютерные сети. Принципы, технологии, протоколы: Учебник для вузов. 4-е изд. СПБ, 2010 -944 с.
Олифер Н.А. Сетевые операционные системы: Учебное пособие для студентов вузов. – СПБ.: Питер, 2001. – 544с.
15. Дубянский В.К. Руководство пользователя «1С – Торговля и Склад». СПб.: Питер, 2007.
16. Ивлиев М.К., Порошина Л.А. Автоматизация оперативного и бухгалтерского учета товаров. Учебное пособие. 2002
17. Карпова Т.С. Базы данных: модели, разработка, реализация.- СПб. : Питер, 2007.
18. Константайн Л., Локвуд Л. Разработка программного обеспечения. СПб.: Питер, 2004.
19. Коуров Л.В. Информационные технологии в работе предприятий. – Минск: Амалфея, 2005.
20. Когаловский, М.Р. Базы данных. Проектирование, реализация и сопровождение. – СПб: Вильямс, 2001.
21. Лапонина О.Р. Основы сетевой безопасности: криптографические алгоритмы и протоколы взаимодействия. Интернет-университет информационных технологий ИНТУИТ.ру 2005.
22. Маклаков, С.В. Bpwin и Erwin. Case-средства разработки информационных систем − М. : ДИАЛОГ-МЭФИ, 2000.
23. Малыхина, М.П. Базы данных: основы, проектирование, использование. – СПб: БХВ Петербург.2006.
24. Михайлов С.В. 1С-Программирование. Самоучииель. СПб.: Питер.2005
25. Мишенин А.И. Теория экономических информационных систем. — М.: Финансы и статистика, 2000. 240 с
26. Романов А.Г. Автоматизация служб предприятия. – Курск: КПО, 2001.
27. Руководство пользователя 1С:Рарус Управление продажами. М.:Рарус.2004
28. Смирнова Г.Н. Проектирование экономических систем. М. : Финансы и статистика, 2003.
29. Смирнова Г.Н. Информационные системы в экономике. М. : Финансы и статистика, 2007.
31. Стражева Н.С., Стражев А.В. Бухгалтерский учет. М.: 2008
32. Титоренко Г.А. Автоматизированные информационные технологии в экономике. М.: Компьютер, ЮНИТИ, 2003г. 232с
33. Фаронов В.В. Delphi. Программирование на языке высокого уровня. М.: 2008
34. Федоров. А.К. Проектирование информационных систем. М. : Финансы и статистика, 2003.
35. Филимонова Е. В. Информационные технологии в профессиональной деятельности. Ростов н/Д: Феникс. 2004. 352 с.
36. Шеремет А.Д. Методика финансового анализа. М.: ИНФРА-М, 2001. 208 с.
37. Шишкин В.Д. Применение CRM-систем. М.: Финансы и статистика, 2006. 138 с.
38. Эймор Д. Электронный бизнес: эволюция и/ или революция. М.:Вильямс. 2001. 752 с.
39. Эйслер В.К. Автоматизация экономических процессов. М.: Финансы и статистика. 2008. 213 с.
Приложение – Программный код системы
// ---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "MainForm.h"
#include "Unit2.h"
#include "Unit3.h"
#include "Unit4.h"
#include "Unit5.h"
#include "Unit6.h"
// ---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "SHDocVw_OCX"
#pragma resource "*.dfm"
TForm1 *Form1;
// ---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner){
//разворачиваем главную форму на весь эран
Form1->WindowState = wsMaximized;
try{try{
ADOUchastok->ExecSQL();}
catch (EADOError *e){
MessageDlg("Ошибка соединения с базой", mtError,
TMsgDlgButtons() << mbOK, 0);}}
__finally {
ADOUchastok->Active=false;}
// прячем все заголовки вкладок
for (int i = 0; i < RightPageBar->PageCount; i++){
RightPageBar->Pages[i]->TabVisible = false;}
// Делаем активной (видимой) первую страницу
RightPageBar->ActivePageIndex = 0;
wwwHOME->Navigate(L"https://portal.slav-ex.ru/default.aspx");
for (int i = 0; i < LeftToolBar->PageCount; i++){
LeftToolBar->Pages[i]->TabVisible = false;}
// Делаем активной (видимой) первую страницу
LeftToolBar->ActivePageIndex = 0;
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::sbExitClick(TObject *Sender){
// Выйти из программы
Form1->Close();
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::sbVPNAdminClick(TObject *Sender){
// показать окно Администрирования VPN
// показать окно инструментов для Администрирования VPN
tbAdminVPNTunnell->TabVisible = true;
RightPageBar->ActivePageIndex = 1;
LeftToolBar->ActivePageIndex = 1;
//первоначально скрыть таблицы
dbUchastok->Visible = false;
dbSvod->Visible = false;
dbISP->Visible = false;
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::sbConfigClick(TObject *Sender){
//показать окно Редактора Конфигураций по кнопке из главного меню
tsEditConf->TabVisible = true;
LeftToolBar->ActivePageIndex = 2;
RightPageBar->ActivePageIndex = 2;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbVPNEditClick(TObject *Sender){
// показать окно Редактирования VPN
// показать окно инструментов для Редактирования VPN
tbEditorVPNTunnell->TabVisible = true;
RightPageBar->ActivePageIndex = 3;
LeftToolBar->ActivePageIndex = 3;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::tbAdminVPNTunnellShow(TObject *Sender){
// показать окно инструментов для Администрирования VPN при смене вкладок
LeftToolBar->ActivePageIndex = 1;
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::tsEditConfShow(TObject *Sender){
// показать окно инструментов для Редактирования файлов при смене вкладок
LeftToolBar->ActivePageIndex = 2;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::tbEditorVPNTunnellShow(TObject *Sender)
{
// показать окно инструментов для Редактирования VPN при смене вкладок
LeftToolBar->ActivePageIndex = 3;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::tbGoGoShow(TObject *Sender){
// показать окно "Начни Работу" и пустой тулбар слева
tbGoGo->TabVisible = true;
LeftToolBar->ActivePageIndex = 0;
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::edFindAddrChange(TObject *Sender){
//поиск по адресу в Администрировании - VPN - Tunnel
AnsiString str = edFindAddr->Text;
AnsiString sqlPodraz = "";
if (!VarIsNull(dblcbVPN->KeyValue)) {
AnsiString strPodraz = dblcbVPN->KeyValue;
sqlPodraz = "PodrazKod = '" + strPodraz + "' and ";}
ADOUchastok->Close();
ADOUchastok->SQL->Clear();
ADOUchastok->SQL->
Add("Select * from Uchastok WHERE " + sqlPodraz + "Address LIKE '%"+str+"%' ORDER BY Address");
ADOUchastok->ExecSQL();
ADOUchastok->Open();
//ширина таблиц в dbUchastok
dbUchastok->Visible = true;
dbUchastok->Width = 850;
ADOUchastok->FieldByName(L"UchastokKod")->DisplayLabel = "Код участка";
ADOUchastok->FieldByName(L"Uchastok")->DisplayLabel = "Участок";
ADOUchastok->FieldByName(L"Address")->DisplayLabel = "Адрес";
ADOUchastok->FieldByName(L"Distan")->DisplayLabel = "Удалённость";
ADOUchastok->FieldByName(L"Primech")->DisplayLabel = "Примечание";
dbUchastok->Columns->Items[0]->Width=60;
dbUchastok->Columns->Items[0]->Visible=false;
dbUchastok->Columns->Items[1]->Width=100;
dbUchastok->Columns->Items[2]->Width=100;
dbUchastok->Columns->Items[3]->Width=250;
dbUchastok->Columns->Items[4]->Width=100;
dbUchastok->Columns->Items[5]->Width=200;
ShowScrollBar(dbUchastok->Handle,SB_BOTH,false);
ShowScrollBar(dbUchastok->Handle,SB_VERT,false);
// ширина таблиц в dbSvod
dbSvod->Visible = true;
dbSvod->Width = 850;
ADOSvod->FieldByName(L"AbonNomer")->DisplayLabel = "Договор";
ADOSvod->FieldByName(L"UchastokKod")->DisplayLabel = "Код участка";
ADOSvod->FieldByName(L"Public_ip")->DisplayLabel = "Внешний IP";
ADOSvod->FieldByName(L"Public_Mask")->DisplayLabel = "Внешняя Маска";
ADOSvod->FieldByName(L"Public_gw")->DisplayLabel = "Адрес шлюза ISP";
ADOSvod->FieldByName(L"VPN_ST")->DisplayLabel = "Адрес точки ST";
ADOSvod->FieldByName(L"Lan_ip")->DisplayLabel = "Адрес сети LAN";
ADOSvod->FieldByName(L"Lan_Mask")->DisplayLabel = "Адрес маски LAN";
ADOSvod->FieldByName(L"VPN_ip")->DisplayLabel = "Адрес шлюза LAN";
dbSvod->Columns->Items[0]->Width = 100;
dbSvod->Columns->Items[0]->Visible=false;
dbSvod->Columns->Items[1]->Width = 100;
dbSvod->Columns->Items[1]->Visible=false;
dbSvod->Columns->Items[2]->Width = 100;
dbSvod->Columns->Items[3]->Width = 100;
dbSvod->Columns->Items[4]->Width = 100;
dbSvod->Columns->Items[5]->Width = 100;
dbSvod->Columns->Items[6]->Width = 100;
dbSvod->Columns->Items[7]->Width = 100;
dbSvod->Columns->Items[8]->Width = 100;
ShowScrollBar(dbSvod->Handle,SB_BOTH,false);
ShowScrollBar(dbSvod->Handle,SB_VERT,false);
// ширина таблиц в dbISP
dbISP->Visible = true;
dbISP->Width = 850;
ADOISP->FieldByName(L"AbonNomer")->DisplayLabel = "Договор";
ADOISP->FieldByName(L"Name")->DisplayLabel = "Провайдер";
ADOISP->FieldByName(L"Addres")->DisplayLabel = "Адрес";
ADOISP->FieldByName(L"Telefon")->DisplayLabel = "Телефон";
ADOISP->FieldByName(L"Primech")->DisplayLabel = "Примечание";
dbISP->Columns->Items[0]->Width = 100;
dbISP->Columns->Items[1]->Width = 100;
dbISP->Columns->Items[2]->Width = 100;
dbISP->Columns->Items[3]->Width = 100;
dbISP->Columns->Items[4]->Width = 100;
ShowScrollBar(dbISP->Handle,SB_BOTH,false);
ShowScrollBar(dbISP->Handle,SB_VERT,false);
}
// ---------------------------------------------------------------------------
void __fastcall TForm1::ADOUchastokAfterScroll(TDataSet *DataSet){
//связка - ключ UchastokKod
if (ADOUchastok->Active) {
AnsiString str = DataSet->FieldByName("UchastokKod")->AsString;
ADOSvod->Close();
ADOSvod->SQL->Clear();
ADOSvod->
SQL->Add("Select * from Svod WHERE UchastokKod='"+str+"'ORDER BY Public_ip");
ADOSvod->Open();}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbSSHClick(TObject *Sender){
//открыть PUTTY по кнопке SSH
ShellExecute(Handle, "open", "putty.exe", AnsiString(" "
+dbSvod->SelectedField->Text).c_str(),NULL, SW_SHOW);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbPINGClick(TObject *Sender){
//выполнить команду PING в командной строке
ShellExecute( 0, NULL, "cmd.exe", AnsiString("/C ping "+dbSvod->
SelectedField->Text).c_str(), NULL, SW_SHOW);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbTRACERTClick(TObject *Sender){
//выполнить команду TYRACERT в командной строке
ShellExecute( 0, NULL, "cmd.exe", AnsiString("/C tracert "+dbSvod->
SelectedField->Text).c_str(), NULL, SW_SHOW);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbHTTPSClick(TObject *Sender){
//открыть в страничке HTTPS по выделенному адресу
RightPageBar->ActivePageIndex = 0;
wwwHOME->Navigate((L"https://"+dbSvod->SelectedField->Text).w_str());
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbHTTPClick(TObject *Sender){
//открыть в страничке HTTP по выделенному адресу
RightPageBar->ActivePageIndex = 0;
wwwHOME->Navigate((L"http://"+dbSvod->SelectedField->Text).w_str());
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ADOSvodAfterScroll(TDataSet *DataSet){
//связка - ключ AbonNomer
if (ADOUchastok->Active) {
AnsiString str = DataSet->FieldByName("AbonNomer")->AsString;
ADOISP->Close();
ADOISP->SQL->Clear();
ADOISP->SQL->Add("Select * from ISP WHERE AbonNomer='"+str+"'ORDER BY Name");
ADOISP->Open();}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbBrowserClick(TObject *Sender){
//показать мини-браузер
Form3->Show();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbOpenNMSClick(TObject *Sender){
//открыть страницу opennms - пульт мониторинга сети
Form4->Show();
Form4->CppWebBrowser1->
Navigate(L"http://172.23.48.198:8980/opennms/index.jsp");
Form1->SetFocus();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbBandthwidthClick(TObject *Sender){
//открыть страницу bandwidthd - загруженность локального канала
Form5->Show();
Form5->CppWebBrowser1->
Navigate(L"http://172.23.48.201/bandwidthd/index.html");
Form1->SetFocus();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbCloseAllClick(TObject *Sender){
//прячем все заголовки вкладок - клик по кнопке Закрыть всё в главном меню
for(int i=1;i<RightPageBar->PageCount;i++)
{RightPageBar->Pages[i]->TabVisible= false;}
//Делаем активной (видимой) первую страницу
RightPageBar->ActivePageIndex=0;
wwwHOME->Navigate(L"https://portal.slav-ex.ru/default.aspx");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbMyBloggClick(TObject *Sender){
//быстрый просмотр блога по кнопке Мой Блог в главном меню
RightPageBar->ActivePageIndex = 0;
wwwHOME->Navigate(L"http://sysadmin-solaris.blogspot.com/");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbCloseAllPC2Click(TObject *Sender){
//прячем все заголовки вкладок - клик по кнопке CloseAll в главной форме
for(int i=1;i<RightPageBar->PageCount;i++)
{RightPageBar->Pages[i]->TabVisible= false;}
//Делаем активной (видимой) первую страницу
RightPageBar->ActivePageIndex=0;
ADOSvodEdit->Cancel();
ADOUchEdit->Cancel();
ADOISPEdit->Cancel();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbADDClick(TObject *Sender){
//Добавить запись по кнопке "Добавить"
//добавить запись
ADOSvodEdit->Append();
ADOUchEdit->Append();
ADOISPEdit->Append();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbSAVEClick(TObject *Sender){
//Редактировать запись по кнопке "Редактировать"
//провести сохранение изменений
if(ADOSvodEdit->Modified==true)
ADOSvodEdit->Post();
if(ADOUchEdit->Modified==true)
ADOUchEdit->Post();
if(ADOISPEdit->Modified==true)
ADOISPEdit->Post();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbDELETEClick(TObject *Sender){
//Удалить запись по кнопке "Удалить"
//удалить запись
ADOSvodEdit->Delete();
ADOUchEdit->Delete();
ADOISPEdit->Delete();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbCancelClick(TObject *Sender){
//Отмена запись по кнопке "Отмена"
//отменить действие
ADOSvodEdit->Cancel();
ADOUchEdit->Cancel();
ADOISPEdit->Cancel();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbNewFindClick(TObject *Sender){
//кнопка Новый поиск и очистка предыдущего поиска
edFindAddr->Clear();
dbUchastok->Visible = false;
dbSvod->Visible = false;
dbISP->Visible = false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::spOpenfileClick(TObject *Sender){
//кнопка диалогового окна Открыть Файл
if(OpenTextFileDialog1->Execute()){
AnsiString FileName;
FileName = OpenTextFileDialog1->FileName;
reEditor->Lines->LoadFromFile(FileName);}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbSaveAsClick(TObject *Sender){
//кнопка диалогового окна Сохранит файл
if (SaveTextFileDialog1->Execute()){
reEditor->Lines->SaveToFile(SaveTextFileDialog1->FileName);}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CommandClick(TObject *Sender){
//открыть форму "Bridge - центр управления"
CommandForm->Show();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sbClosePC2Click(TObject *Sender){
//Действие закрыть текущую вкладку по кнопке Х, кроме начальной
UnicodeString sheet = RightPageBar->ActivePage->Name;
if (sheet != U"tbGoGo")
RightPageBar->ActivePage->TabVisible = false;
LeftToolBar->ActivePage->TabVisible = false;
}
//---------------------------------------------------------------------------
Барановская Т.П., Лойко В.И., Семенов М.И., Трубилин А.И. Архитектура компьютерных сетей. М., 2003.
Вишневский В.М. Теоретические основы проектирования компьютерных сетей. – М.: Техносфера, 2003 - 512 с.
Кульгин М. Технология корпоративных сетей. Энциклопедия. – СПб.: Питер, 2000.- 704 с.
Константайн Л., Локвуд Л. Разработка программного обеспечения. СПб.: Питер, 2004.
Когаловский, М.Р. Базы данных. Проектирование, реализация и сопровождение. – СПб: Вильямс, 2001.
94
а - зона максимальной досягаемости;
б - зона досягаемости пальцев при вытянутой руке;
в - зона легкой досягаемости ладони;
г - оптимальное пространство для грубой ручной работы;
д - оптимальное пространство для тонкой ручной работы.
1
2
3
5
6
4
Рис. 5.3 – Схема размещения периферийных устройств