Содержание
Random (Max : Integer) : Integer
Случайное число.
Функция Random возвращает случайное число в диапазоне от 0 до Max-1.
Procedure OnCreate;
Begin
Warning('Сегодня ваш цвет '+['красный','синий','зеленый'][Random(3)]);
End;
справка