Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TurboPower OnGuard > ogNetCode (https://www.delphipraxis.net/92436-turbopower-onguard-ognetcode.html)

mischerr 19. Mai 2007 18:36


TurboPower OnGuard > ogNetCode
 
Hallo!

Ich möchte erreichen, dass eine Anwendung nur 1x innerhalb eines Netzwerkes gestartet werden kann/darf.

Die Instanz der Klasse wird zur Laufzeit erzeugt und ich bin mit ziemlich sicher, dass Key und Code ok sind (nutze auch andere OnGuard Mechanismen), aber bekomme es zZt einfach nicht hin, auf nur eine Instanz der Anwendung zu prüfen - MaxUsers gibt mir auch korrekt "1" zurück - CheckCode liefert jedoch immer ogValidCode und nie das gewünschte ogNetCountUsed. :?

Meine Frage dazu, die ich in der OnGuard-Doku nicht so eindeutig beantwortet bekomme:

Wo muss das NetworkAccessFile liegen? Auf einem Network Share?
In der Demo scheint's lokal zu liegen...

Oder mache ich sonst eine Fehler? :gruebel:


Gruss,
Michael


Ein Auszug aus dem Code:
Delphi-Quellcode:
var ogNetCode : TOgNetCode;

..

ogNetCode := TOgNetCode.Create(Self);
with ogNetCode do
begin
  AutoCheck := False;
  OnGetKey := OnGetLicenseKey; // Key zuweisen
  OnGetCode := OnGetNetworkCode; // Code zuweisen
end;

..

ogNetCode.FileName := 'users.net';
if not FileExists(ogNetCode.FileName) then
   ogNetCode.CreateAccessFile;
if ogNetCode.InvalidUsers>0 then
   ogNetCode.ResetAccessFile;
CodeStatus:= ogNetCode.CheckCode(false);


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:39 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz