[RusSTEEL]

Код генератора чисел от 1 до 10. Как сделать чтобы выбранное число записывалось в Едит?

Код:

for i := 1 to 1 do
  begin
    int := 1 + Random(10);    
    ShowMessagePos('!!!ЗНАЧЕНИЕ!!!! = '+IntToStr(int), 500,400);