Einzelnen Beitrag anzeigen

Benutzerbild von turboPASCAL
turboPASCAL

Registriert seit: 8. Mai 2005
Ort: Sondershausen
4.274 Beiträge
 
Delphi 6 Personal
 
#2

Re: Seriennummern funktionsweise

  Alt 25. Feb 2007, 08:29
Zitat von Bassel:
Ich hab schon ein bisschen was gehört aber habe trotzdem keinen Plan.
Dann nutze weiter Google.

Im Grunde ist es einfach:

Zusammensetzung:

* Name zB. des Users
* Erstellungsdatum
* Modell oder Versionsnummer

Generation:

Delphi-Quellcode:
MeineIDZumBeispiel = 47110815;

Seriennummern := ( (length(UsernameString) + length(DatumString) + length(VerNumString)) div 3) + MeineIDZumBeispiel;
Matti
Meine Software-Projekte - Homepage - Grüße vom Rüsselmops -Mops Mopser
  Mit Zitat antworten Zitat