Algorithmus für eine Serialnummer

[Furtbichler]

Das Problem mit den Namen wäre z.B. "Hans Meyer", den es doch öfter gibt und dann identische Serials erzeugt. Ich würde wirklich eine GUID nehmen:

Delphi-Quellcode:

uses Sysutils;

var
   NewGUID: TGUID;
begin
   CreateGUID(NewGUID);
   writeln (GUIDToString(NewGUID));
end;