Пароль на папку

[execom]

Входим в свойства папки--> Вид-->снимаем галочку с "Скрывать расширения для зарегистрированных типов данных"! Далее переименовываем папку, которую надо защитить в имя типа winnt.dll и ставим ей скрытый атрибут после этого и иконку системного файла! Так же не мешает перенести эту замаскированную под системнвый файл папку куда-нибудь из корневого каталога! Я думаю далеко не каждый догадается входить в системный файл как в папку! И не какой парольне нужен!

[Verbi]

Папка > свойства> доступ> отменить общий доступ к этой папке. затем в закладке "Безопасность" убрать пользователей, которым должен быть запрещен доступ.
Я вот в спешке указал "ВСЕ" и теперь не могу папку открыть. Кстати, может кто подскажет как изменить права доступа.

[KWN, lnc]

а если типа...

var
 WndHandle: HWND;
begin
 WndHandle := FindWindow(nil, 'Program Files');
 if WndHandle <> 0 then
   SendMessage(WndHandle, WM_SYSCOMMAND, SC_CLOSE, 0);
end;

p.s. мож у кого исходник все же есть?

[Stilet]

KWN, lnc

Нет такой способ не поможет, тем паче не все программы можно так закрыть