[-Kaizer-]

Всем привет!
Пожалуйста подскажите, как в Дельфи задать рандомный выбор из задаваемых значений, аналогично php'ному rand(знач.1, знач.2, знач.3)?

Нужно что-то вроде:
a := rand('apple', 'parrot', 'tomato');

Заранее большое спасибо!