Skip to Content
Delphi in a Nutshell
book

Delphi in a Nutshell

by Ray Lischner
March 2000
Intermediate to advanced
576 pages
18h 13m
English
O'Reilly Media, Inc.
Content preview from Delphi in a Nutshell

Name

Randomize Procedure

Syntax

procedure Randomize;

Description

Call Randomize once at the start of a program to start the sequence of pseudorandom numbers at a different number each time you run the program. Randomize sets the RandSeed variable to a value based on the time of day. Randomize is a real procedure.

Tips and Tricks

  • When testing a program, do not call Randomize. That way, you will get the same sequence of pseudorandom numbers every time you run the program, and you can compare results between runs. After testing, add the call to Randomize so that each time the program runs, it starts the sequence of pseudorandom numbers differently.

  • Do not call Randomize more than once in the same program. Doing so destroys the randomness of the pseudorandom numbers.

  • Randomize uses the time of day to initialize RandSeed. If the program runs at the same time every day, you should find a different way to initialize RandSeed.

Example

unit RandomDice;
interface
...
function Die: TDieRoll;
function Dice: TDiceRoll;
implementation
...
initialization
  Randomize;
end.

See Also

Random Function, RandSeed Variable
Become an O’Reilly member and get unlimited access to this title plus top books and audiobooks from O’Reilly and nearly 200 top publishers, thousands of courses curated by job role, 150+ live events each month,
and much more.

Read now

Unlock full access

More than 5,000 organizations count on O’Reilly

AirBnbBlueOriginElectronic ArtsHomeDepotNasdaqRakutenTata Consultancy Services

QuotationMarkO’Reilly covers everything we've got, with content to help us build a world-class technology community, upgrade the capabilities and competencies of our teams, and improve overall team performance as well as their engagement.
Julian F.
Head of Cybersecurity
QuotationMarkI wanted to learn C and C++, but it didn't click for me until I picked up an O'Reilly book. When I went on the O’Reilly platform, I was astonished to find all the books there, plus live events and sandboxes so you could play around with the technology.
Addison B.
Field Engineer
QuotationMarkI’ve been on the O’Reilly platform for more than eight years. I use a couple of learning platforms, but I'm on O'Reilly more than anybody else. When you're there, you start learning. I'm never disappointed.
Amir M.
Data Platform Tech Lead
QuotationMarkI'm always learning. So when I got on to O'Reilly, I was like a kid in a candy store. There are playlists. There are answers. There's on-demand training. It's worth its weight in gold, in terms of what it allows me to do.
Mark W.
Embedded Software Engineer

You might also like

Delphi High Performance

Delphi High Performance

Primož Gabrijelčič
Delphi Cookbook

Delphi Cookbook

Daniele Teti

Publisher Resources

ISBN: 1565926595Errata Page