Автор работы: Пользователь скрыл имя, 12 Мая 2013 в 19:10, курсовая работа
Рассматривая проблемы, связанные с защитой данных в сети, возникает вопрос о классификации сбоев и несанкционированности доступа, что ведет к потере или нежелательному изменению данных. Это могут быть сбои оборудования (кабельной системы, дисковых систем, серверов, рабочих станций и т.д.), потери информации (из-за инфицирования компьютерными вирусами, неправильного хранения архивных данных, нарушений прав доступа к данным), некорректная работа пользователей и обслуживающего персонала. Перечисленные нарушения работы в сети вызвали необходимость создания различных видов защиты информации.
panel9.Visible:=false;
panel10.Visible:=false;
panel11.Visible:=false;
end;
procedure TForm1.Button14Click(Sender: TObject);
begin
panel12.Visible:=false;
panel7.Visible:=true;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
panel12.Visible:=true;
panel13.Visible:=false;
panel14.Visible:=false;
panel15.Visible:=false;
panel16.Visible:=false;
end;
procedure TForm1.Button10Click(Sender: TObject);
begin
panel14.Visible:=true;
panel13.Visible:=false;
panel15.Visible:=false;
end;
procedure TForm1.Button17Click(Sender: TObject);
begin
panel14.Visible:=false;
panel13.Visible:=false;
end;
procedure TForm1.Button9Click(Sender: TObject);
begin
panel15.Visible:=true;
panel14.Visible:=false;
panel13.Visible:=false;
end;
procedure TForm1.BitBtn7Click(Sender: TObject);
begin
panel15.Visible:=false;
panel12.Visible:=true;
panel13.Visible:=false;
panel16.Visible:=false;
end;
procedure TForm1.Button11Click(Sender: TObject);
begin
panel13.Visible:=true;
end;
procedure TForm1.Button16Click(Sender: TObject);
begin
panel13.Visible:=false;
end;
procedure TForm1.Button12Click(Sender: TObject);
begin
panel14.Visible:=true;
panel13.Visible:=false;
end;
procedure TForm1.Button13Click(Sender: TObject);
begin
panel15.Visible:=true;
panel13.Visible:=false;
end;
procedure TForm1.Button15Click(Sender: TObject);
begin
panel16.Visible:=true;
panel13.Visible:=false;
end;
procedure TForm1.Button6Click(Sender: TObject);
begin
panel17.Visible:=true;
panel13.Visible:=false;
panel14.Visible:=false;
panel15.Visible:=false;
panel16.Visible:=false;
panel18.Visible:=false;
panel19.Visible:=false;
end;
procedure TForm1.BitBtn11Click(Sender: TObject);
begin
panel17.Visible:=false;
end;
procedure TForm1.BitBtn12Click(Sender: TObject);
begin
panel18.Visible:=false;
end;
procedure TForm1.BitBtn13Click(Sender: TObject);
begin
panel19.Visible:=false;
end;
procedure TForm1.BitBtn10Click(Sender: TObject);
begin
panel19.Visible:=true;
end;
procedure TForm1.BitBtn9Click(Sender: TObject);
begin
panel18.Visible:=true;
end;
procedure TForm1.BitBtn16Click(Sender: TObject);
begin
panel20.Visible:=false;
end;
procedure TForm1.BitBtn17Click(Sender: TObject);
begin
panel21.Visible:=false;
end;
procedure TForm1.BitBtn18Click(Sender: TObject);
begin
panel22.Visible:=false;
end;
procedure TForm1.BitBtn14Click(Sender: TObject);
begin
panel21.Visible:=true;
end;
procedure TForm1.BitBtn15Click(Sender: TObject);
begin
panel22.Visible:=true;
end;
procedure TForm1.Button5Click(Sender: TObject);
begin
panel20.Visible:=true;
panel22.Visible:=false;
panel21.Visible:=false;
end;
end.
ПРИЛОЖЕНИЕ Б
(обязательное)
Программа, способная заменить специалиста-эксперта в решении выбора сетевого протокола для передачи информации на предприятии.
Суть программы состоит в следующем, что программа ведет диалог с пользователем, после которого выводит результат в котором указывается протокол.
Информация о работе Выбор криптопротокола для политики безопасности