15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby
За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.
На последнюю неделю приходится экзамен, где нужно будет показать свои навыки, взломав ряд уязвимых учебных сайтов, и добыть флаги. Успешно сдавшие экзамен получат сертификат.
Запись на курс до 25 апреля. Получить промодоступ ...
Так а что мешает менять этот атрибут программно. Перед изменениями снять его, затем опять поставить.
Сохранить то юзверь свои изменения не сможет, вернее сможет но в другой файл. Согласен, решение не очень красивое, так как изменения юзверь все таки может делать, сохранять не может. Вот еще вариант:
procedure TForm1.Button3Click(Sender: TObject);
var
ev:variant;
begin
W:=CreateOleObject('Word.Application');
W.visible:=True;
W.Documents.open('MyFile.doc');
ev:=wdAllowOnlyFormFields;
W.Documents.Item('MyFile.doc').Protect(ev);
end;
procedure TForm1.Button4Click(Sender: TObject);
begin
W.Documents.Item('MyFile.doc').Unprotect;
end;procedure TForm1.Open2Click(Sender: TObject);
begin
OLEContainer1.CreateObjectFromFile('MyFile.doc', False);
OleContainer1.DoVerb(ovPrimary);
end;
procedure TForm1.Protect1Click(Sender: TObject);
var
ev, w:variant;
begin
ev:=wdAllowOnlyFormFields;
w:=OleContainer1.OleObject;
w.Protect(ev);
end;
procedure TForm1.Unprotect2Click(Sender: TObject);
var
w:variant;
begin
w:=OleContainer1.OleObject;
w.Unprotect;
end;Обучение наступательной кибербезопасности в игровой форме. Начать игру!