System.Random ...

[Steve9825679]

Morgen,

danke für die Tipps!
Eine System.Threading.Thread.Sleep(10) hat Wunder gewirkt

Hab jetzt eine Lösung auf GUID-Basis gebastelt:

Delphi-Quellcode:

function CreateID : System.String;
var y : System.Guid;
    x : array of System.String;
begin
  x:=(y.NewGuid.ToString+'-'+y.NewGuid.ToString).Split(['-']);
  &Array.Sort(x);
  result:=System.&String.Join('-', x);
end;

Schönen Tag noch, Steff