Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Delphi DLL) Generate a Random Firebase Push IDGenerates a random Firebase Push ID. (According to the algorithm described at https://gist.github.com/mikelehen/3596a30bd69384624c11, and at https://www.firebase.com/blog/2015-02-11-firebase-unique-identifiers.html)
uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Prng; ... procedure TForm1.Button1Click(Sender: TObject); var prng: HCkPrng; pushId: PWideChar; i: Integer; begin // Demonstrates how to generate a random Firebase Push ID. // This example requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. prng := CkPrng_Create(); for i := 1 to 10 do begin pushId := CkPrng__firebasePushId(prng); Memo1.Lines.Add(pushId); end; CkPrng_Dispose(prng); end; |
© 2000-2023 Chilkat Software, Inc. All Rights Reserved.