[Иваська]

Добрый день. Скажите, можно ли совместить генератор случаных чисел Randomize или RandSeed (например такой:
procedure TForm1.Button1Click(Sender: TObject);

var RandSeed: LongInt;

begin

RandSeed:=random(10);

ShowMessage(IntToStr(RandSeed));

end с взятием данных из файла таким образом, чтобы из файла бралось случайное значение. При этом файл текстовый, а чтение использовать ReadLn, то есть чтобы читались не все строчки, а лишь одна случайная. Спасибо за помощ!!