Class TSeatChecker (unit Sccomps) |
TComponent
TMethod defines the two methods of software licensing -- by user (seat- } { based) or by total number of users (concurrent use-based).
Constructors |
TSeatChecker
Functions |
Make sure that a seat is not being held first.
Properties |
Events |
Variables |
Constructors |
Public declarations
TSeatChecker
Functions |
if-then
Finally, record the current status
Protected declarations
Make sure that a seat is not being held first.
initialize Status to be standing (i.e. not occupying a seat).
Depending on the value of Value, call the SitDown or the StandUp method. I do this so that I can test my application in design-mode, i.e. if I want to reserve a seat, I just change the value in the Object Inspector. This is the beauty of component-oriented programming.
This is your basic property access method. You may wish to add some extra functionality to it, such as checking to see that a lurch table exists in the specified database, and creating one if it does not.
Properties |
Published declarations
Username is the name of the user checking for a seat.
DatabaseName is the name of the application database. It is important to } { set this to the database being used by the application, otherwise the } { whole purpose of TSeatChecker is defeated.
Status indicates whether the application holds a seat or not.
Events |
Variables |
Private declarations