Показать сообщение отдельно
  #1  
Старый 11.08.2010, 02:51
Аватар для RoboStudent
RoboStudent RoboStudent вне форума
Прохожий
 
Регистрация: 05.08.2010
Адрес: Москва
Сообщения: 16
Репутация: 10
По умолчанию Всегда одинаковые "случайные" фразы

Здравствуйте!
Не могу разобраться с одной странной особенностью:

PHP код:
procedure TForm1.Button1Click(SenderTObject);
const
  
alphabet='abcdefghijklmnopqrstuvwxyz';
var
  
tempstring;
  
i:integer;
begin
  temp
:='';
  for 
i:=1 to 8 do
   
temp:=temp+alphabet[random(length(alphabet)+1)+1];
   
memo1.Lines.Add(temp);
end
Генерируются случайные фразы, вставляются в memo1, но!
Если перезапустить программу и начать генерацию, все фразы
генерируются в том же самом порядке, что и в прошлый запуск
программы.
И еще - программа иногда генерирует не восьмизначные, как задумано,
а и трёх и пятизначные и даже иногда однозначные.

От чего всё это зависит?

Заранее благодарю!
Ответить с цитированием