Einzelnen Beitrag anzeigen

Duffy Duck

Registriert seit: 22. Feb 2005
56 Beiträge
 
Delphi 7 Enterprise
 
#1

wie einmaliger Lizenz key erstellen für mein proggi...

  Alt 18. Apr 2005, 11:52
Hallo Leute,

habe da eine Anfänger Frage für euch...

Ich habe mir eine kleine Anwendung erstellt und bin eigentlich soweit fertig damit. Ich habe im Google auf einer Seite gelesen dass es möglich wäre eine "CD Key" funktion einzubinden. Habe hier folgender Code gefunden:

Delphi-Quellcode:
function CDKey(Seed:String): String;
const Key1: Array[0..9] of Char = ('2','5','8','9','5','a','1','3','6','7');
Key2: Array[0..9] of Char = ('8','3','4','0','1','7','x','9','3','9');
v baergi ni: integer;
result := Seed + '-';
for i:= 1 to length(Seed) do
result := result + Key1[Ord(Seed[i])-48]; result := result + '-';
for i:= 1 to length(Seed) do
result := result + Key2[Ord(Seed[i])-48]; end; ...
if CDKey(Copy(Eingabe.Text,1,4)) = Eingabe.Text then
Caption := 'Richtigelse Caption := 'falscher Key';
Wie und wo muss ich nun dies einbinden damit ich einen CD Key erhalte und den auch eingeben kann?
Mir geht es hauptsächlich darum, um zu verstehen wie und wo dieser auch abgelegt wird.
Also zum bsp. wenn ich nun einen solchen Code (irgendwie erstelle, wie auch immer???) habe und den auch eingebe, wird dieser in der Windows Registry abgelegt? oder muss dieser jedesmal neu eingegeben werden wenn ich meine Applikation starte?

ThX schon mal

Duffy Duck
  Mit Zitat antworten Zitat