The control system sexual achievements. [Delphi].[SQLite]