How to limit number of users in network-versions

I'm in need of source code for Delphi that sets a max. limit of
how many copies that may be run at a time in a Network. Ie. a 5
user version only allows 5 users to run it at once. 10 user version
allows 10 users to run it at once.

Would be greatly appreciated!