Программа ZShell является эффективным средством для обеспечения безопасности данных компьютеров, удаленного администрирования системы, отслеживания действий пользователя, а также для централизованного ведения протокола. Программа идеально подходит для компьютерных клубов, Интернет-кафе и других предприятий с компьютерами общего пользования. Алгоритм системы является универсальным для программ такого типа, но может быть изменен с целью улучшения. Следует обратить внимание на возможность исправления с целью повышения надежности и стабильности системы, а также качества взаимодействия с пользователем. Возможно и повышение интеграции с другими прикладными программами, как, например, роутерами, файерволами, прокси-серверами, графическими и текстовыми редакторами, системами ведения баз данных. При этом необходимо учитывать желания пользователей и администраторов, а также все новое, что появляется в компьютерных технологиях.
Программа хорошо зарекомендовала себя на тестовых испытаниях и может быть запущена в работу.
1. Гладков С.А., Фролов Г.В. Программирование в Microsoft Windows: в 2-х ч. - М.:
2. Дирахвелидзе П., Марков Е. Программирование в Delphi 4 - М.: "bhv", 1997. - 560 c.
3. Куперштейн В. Современные информационные технологии в делопроизводстве и управлении - М.: "bhv", 1999. - 450 c.
4. Нортон Д. Написание драйверов под Windows: Пер. с англ. - М.: Мир, 1994. - 560 с.
"ДИАЛОГ-МИФИ", 1992. - 320 с., 288 с.
|
|
|
|
|
|
|
program ZShell;
uses
Forms,
Common in '..\Common.pas',
MainUnit in 'MainUnit.pas' {Form1},
PasswordUnit in 'PasswordUnit.pas' {Password},
CopyFilesUnit in 'CopyFilesUnit.pas' {CopyFiles},
DoplatiteUnit in 'DoplatiteUnit.pas' {Doplatite},
Datagram in '..\Datagram.pas',
ZShellExplorerOff in 'ZShellExplorerOff.pas',
SnapshotUnit in 'SnapshotUnit.pas',
Unit2 in '..\Unit2.pas' {Form2};
{$R *.RES}
begin
Application.Initialize;
CheckLicense;
Application.Title := 'ZShell';
Application.ShowMainForm:=false;
if previousrun then begin
Delay(200);
if previousrun then begin
Delay(600);
if previousrun then halt(0)
end
end;
Application.CreateForm(TForm1, Form1);
Application.CreateForm(TPassword, Password);
Application.CreateForm(TCopyFiles, CopyFiles);
Application.CreateForm(TDoplatite, Doplatite);
Application.CreateForm(TForm2, Form2);
form2.showmodal;
Form1.Show;
setcaption;
Application.Run;
end.
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.