Jika anda ingin membuat
bilangan random di Delphi ? source berikut merupakan source sederhana yang bisa anda kembangkan selanjutnya. Gunakan prosedur randomize untuk inisialisasi generator nomor random dan fungsi untuk membuat nomor random. parameter fungsi random menunjukkan jarak untuk random jumlah.
jika parameter ini 100 maka random jumlah akan terbentuk berkisar diantara 0 dan 99.
procedure TForm1.Button1Click(Sender: TObject);begin Randomize; Label1.Caption:=IntToStr(Random(100));end;random 100 dapat anda ganti dengan bilangan yang lain misalnya 200, 1000 atau yang lainnya.