Randomize и маски, ...сгенерировать записи... Опции

[Jill]

Подскажите, плз, как случайным образом сформировать запись с учетом ограничений (например, номер телефона, дату и т.д.)

Вот, собственно, и сабж

[klem4]

Можно вот так попробовать

   randomize;
   ord(s[0]) := 255;
   s[1] := '8';
   for i := 2 to 12 do s[i] := chr(ord('0') + random(10));
   insert('-', s, 2);
   insert('-', s, 6);
   insert('-', s, 10);
   insert('-', s, 13);

Вроде номера мобильника.

Сообщение отредактировано: volvo - 5.11.2006 23:21