Вот мой вариант (Belphi 10.1 Berlin).
Все в OnCreate формы (лучше бы вынести в файл проекта, но для упрощения демонстрации так лучше). Все, что на форме - это просто для отладки.
Ну а все функции в отдельном модуле - KeyUtils.pas. При появлении новоко клиента, получаешь у него ключ и добавляешь в массив ValidKeys, пересобираешь и отсылаешь клиенту новую версию.
|