How to make a licensing system in delphi?

Question

Delphi

How to make a licensing system in delphi?
I give an example. When you start the program, a window appears, and the hwid of the computer is written in it. And the "authorize" button, when pressed, a request is sent to the database on the site, and if hwid = hwid in the database, then another form is launched. If not equal, then the "no license" window pops up.
Thank you in advance.

Answer 1

Add 3 units:
1 - authorization
is in the database: appears 2 - the window of the registered program
is not in the database: appears 3 - a window with a message about the need for a license and Application.Terminate;

Answer 2

It is best to use some ready-made tool. Here's a lot of advice: stackoverflow.com/questions/2290324/tool-for-licen...

Answer 3

In any case, your "license" will be grunted.