рандом в делфи

[Izlom]

всем привет.
Я пишу прогу на делфи.
Цель проги: она показывает В СЛУЧАЙНОМ ПОРЯДКЕ цитаты, а отвечающий должен вписать автора.

Я организовал это в виде массива. Каждый раз прога выдает член массива со случайным коэфицентом.

Но вот какая проблема: я заметил, что при каждом запуске последовательность этих "случайных чисел" идет одна и та же. То есть можно просто зацчить последовательнось ответов.

Подскажите так и долно быть, или я что то не так делаю? Если все в порядке вещей, то как это можно исправить?

Заранее спасибо

[evg_m]

перед использованием Random необходимо инициализировать генератор


Delpi7 Random F1
To initialize the random number generator, add a single call Randomize or assign a value to the RandSeed variable before making any calls to Random.
Example

var
   I: Integer;
 begin
   Randomize;
   for I := 1 to 50 do begin
     { Write to window at random locations }
     Canvas.TextOut(Random(Width), Random(Height), 'Boo!');
   end;
 end;

[Izlom]

Сообщение от evg_m

перед использованием Random необходимо инициализировать генератор


Delpi7 Random F1
To initialize the random number generator, add a single call Randomize or assign a value to the RandSeed variable before making any calls to Random.
Example

var
   I: Integer;
 begin
   Randomize;
   for I := 1 to 50 do begin
     { Write to window at random locations }
     Canvas.TextOut(Random(Width), Random(Height), 'Boo!');
   end;
 end;

Понятно. Спасибо огромное