Korta unika ID:n på Pascal

Vad är Sqids?

Sqids är ett öppen-källkods-bibliotek som låter dig generera korta unika identifierare från nummer. Dessa ID:n är URL-säkra, kan koda flera nummer och innehåller inte vanliga svordomar. Läs mer .

Så här ser de ut:

https://example.com/Lqj8a0

Pascal

Snabb kodnings- och avkodningsexempel:

var
  Id: string;
  Numbers: TNumbers;
begin
  with TSqids.Create do
  try
    Id := Encode([1, 2, 3]); // '86Rf07'
    Numbers := Decode(Id); // [1, 2, 3]
  finally
    Free;
  end;
end;

Om ID:n är för korta kan du fylla på dem till en viss längd:

var
  Id: string;
  Numbers: TNumbers;
begin
  with TSqids.Create(10) do
  try
    Id := Encode([1, 2, 3]); // '86Rf07xd4z'
    Numbers := Decode(Id); // [1, 2, 3]
  finally
    Free;
  end;
end;

Skapa unika ID:n genom att blanda alfabetet:

var
  Id: string;
  Numbers: TNumbers;
begin
  with TSqids.Create('k3G7QAe51FCsPW92uEOyq4Bg6Sp8YzVTmnU0liwDdHXLajZrfxNhobJIRcMvKt') do
  try
    Id := Encode([1, 2, 3]); // 'XRKUdQ'
    Numbers := Decode(Id); // [1, 2, 3]
  finally
    Free;
  end;
end;