Unit AmLock |
TAmLockApp Component Author: Dr. Sumeet Kumar Last Modified: 9th August 1996 Inspired By: Chapter 11 in "Zen of Windows 95 Programming" by Lou Grinzo The code follows the structure suggested by Lou in the book - in fact I have copied the C++ code en bloc and then modfied it for Delphi and converted it to a component. Purpose: * To provide a component that allows the user to "Lock" the application with a password e.g. when leaving the computer for a while. * When the application is "Locked", it is iconized and the icon changed. All open documents are preserved intact. * The application cannot be restored unless the same password is reentered. Thus, it is possible to protect private/sensitive data from prying eyes while the user is away from the computer. As soon as he/she returns, it only remains to click on the icon, re enter the password and he/she can start working again without a break. Usage: 1. Drop the component onto the applications main form (from the Samples Page). 2. Load appropriate icons for the applications Locked and Unlocked states into the LockedIcon and UnlockedIcon properties. 3. On the Main form, in response to a menu selection, call the components OnLockUnlock to Lock the application. That's it - the component does the rest. Delph Versions: * 2.0 * should work with Delphi 1.0 also - I haven't tried it Constituent Files: * AmLock.pas & .dcr : the component unit and .dcr file * AmLckPwd.pas & .dfm: The Lock Password Form * AmUnLock.pas & .dfm: The Un Lock Password Form * Readme.txt Nature: FREEWARE - copy it, modify it, distribute it but please don't cahrge for it. A Request: Whether you like, love or hate this component, please let me have your feedback Also I would appreciate copies of any modifications/improvements you may make. My Email address: sumeet@giasbg01.vsnl.net.in About Myself: I am a General Surgeon addicted to programming. In the day I practice Surgery in Bangalore, India and by night I fool around with the computer. I have been developing clinic and hosiptal oriented software with MS Access 2.0 for the past 3 years and have switched to Delphi recently.
Classes |
Functions |
Register - ==========================================================
Types |
Constants |
Variables |
Functions |
Types |
Constants |
Variables |