GUID nicht unique unter iOS / Android

[AndyDF]

Ich hab mir hierzu halt so etwas gebastelt:

Delphi-Quellcode:

class function TSysUtils.CreateGuidList(const ACount: Integer): IWGList<TGUID>;
{$IF DEFINED(MSWINDOWS)}
var
  i: Integer;
{$ENDIF}
begin
  Result := TWGList<TGUID>.Create;

{$IF DEFINED(iOS) or DEFINED(ANDROID)}
  while Result.Count < ACount do
  begin
    Sleep(5);
    Result.AddIfNotExists(TGUID.NewGuid);
  end;
{$ELSE}
  for i := 0 to ACount-1 do
    Result.Add(TGUID.NewGuid);
{$ENDIF}
end;

Muss jetzt nur jedes mal, wenn ich mehr als eine GUID benötigte daran denken, über die Funktion mir die GUID´s zu holen...

Ich gehe natürlich davon aus, dass irgendwann schon eine GUID kommt die noch nicht generiert wurde. Sonst macht mir die while-Schleife irgendwann ein Problem.