Solved

Lock Windows XP through my application

Posted on 2007-11-28
6
800 Views
Last Modified: 2013-12-01
I need to write a Delphi application:

- After logging to Windows XP it must be the first program to run.
- When my program starts it will ask user for some authentication information.
- After validation, user will have access to windows during some pre-defined time.
After this time the user need to do another validation to get more time to work.
I want to protect my program being disabled by the user after he gets authenticated.

Thanks
0
Comment
Question by:jclobocar
6 Comments
 
LVL 26

Accepted Solution

by:
EddieShipman earned 100 total points
ID: 20368867
Well, you could create a screen shot of the desktop and put it in a borderless form and show that form on top of everything then popup a system modal window asking for the login credentials.
0
 
LVL 21

Expert Comment

by:ziolko
ID: 20371941
>>- After logging to Windows XP it must be the first program to run.

that's touhg since some services are starting during system startup

>> I want to protect my program being disabled by the user after he gets authenticated.

this is gonna be easier you can catch WM_CLOSE and return non-zero value but this will prevent only gracefull shutdown user always can run task manager and kill process.

In general the best solution for your problem would be creating your own GINA DLL (just like netware does) but this is hell lot of code

ziolko.
0
 
LVL 1

Author Comment

by:jclobocar
ID: 20372329
Where do I put in the information to start my program?
Is there an way of hidding my process in the task list?
How machines at cyber cafes does something like what I want?
0
Why You Should Analyze Threat Actor TTPs

After years of analyzing threat actor behavior, it’s become clear that at any given time there are specific tactics, techniques, and procedures (TTPs) that are particularly prevalent. By analyzing and understanding these TTPs, you can dramatically enhance your security program.

 
LVL 26

Expert Comment

by:EddieShipman
ID: 20373419
Most of them write GINAs. There is Delphi GINA code here:
http://knightgina.sourceforge.net/
0
 
LVL 5

Expert Comment

by:Steven-Fernandez
ID: 20476751
If you are the only user in XP you don't get the lock option.

This is a simple trick

Part 1:

Create a shortcut:

View Properties:

Change target to:

%windir%\system32\rundll32.exe user32.dll, LockWorkStation

Place it where ever you want.

Part2:

Add ShellApi to your uses section

 ShellExecute(0,
               nil,
               'c:\thelinkpath\lockit.lnk',
               nil,
               nil,
               SW_SHOWNORMAL);

This will lock the desktop on XP even if the option is not available.

Hope this helps.
0
 
LVL 5

Expert Comment

by:Steven-Fernandez
ID: 20644386
Did you try. I use it myself and it works perfectly.
0

Featured Post

Maximize Your Threat Intelligence Reporting

Reporting is one of the most important and least talked about aspects of a world-class threat intelligence program. Here’s how to do it right.

Join & Write a Comment

Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
I. Introduction There's an interesting discussion going on now in an Experts Exchange Group — Attachments with no extension (http://www.experts-exchange.com/discussions/210281/Attachments-with-no-extension.html). This reminded me of questions tha…
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…
You have products, that come in variants and want to set different prices for them? Watch this micro tutorial that describes how to configure prices for Magento super attributes. Assigning simple products to configurable: We assigned simple products…

708 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

17 Experts available now in Live!

Get 1:1 Help Now