File and Folder security demo in Delphi

a quick guide line:
unzip everything
create a test folder (eg: c:testdir)
remove all acounts access except SYSTEM
compile the service and the test app
run install.bat (only first time needed)
run start.bat
run myprogram.exe
enter a user
enter the path (should already be entered if using default c:testdir)
click on add user
check out the log file "c:logfile.log" for some messages ;) (you can disable the logging later if you don't want it, but it helps debug)
log in as another user and see that indeed it can access the folder and everything in it
log out and back in with your user
start myprogram.exe if you closed it
click on remove user
now log in with that user and you will see that indeed the user cannot access the folder

Note:
you can achive the "other user" stuff in winXP by "run as..." from the context menu in explorer, so that you will not have to log off nad back on again.
Also, if you combine this with the Security Locker you will have a pretty neat tool for keeping your stuff "safe". But remember that anyone with sufficient access can "crack" the mechanism so don't put too much base on the protection scheme provided by this demo.

Source code contains service with test application.

Source Code