Помогите с кнопочкой и выводом результатом

[Crivel]

 procedure TForm1.Button1Click(Sender: TObject);
 var
  i : Integer;
num : String;
 begin
  num:='1234567890';
  for i:=1 to 7 do
   begin
    Edit1.Text:=num[Random(Length(num))];
   end;
 end;

Так должно работать

[diznt]

Crivel у меня выводиться тока одно число а как сделать несколько?

[Карась]

Edit1.Text := Edit1.Text + num[Random(Length(num))];

[diznt]

Ну вы программисты)!

Первый вопрос все еще в силе!

ЗЫ да у меня тож работает все норм

[Crivel]

diznt, у меня работает.

[Карась]

Сообщение от diznt

Ну вы программисты)!

Первый вопрос все еще в силе!

ЗЫ да у меня тож работает все норм

Какой вопрос?

[diznt]

И так я хочу сделать чтобы при нажатии на кнопочку выводились определенные результаты
К примеру

Жму на кнопку выводиться цифра 1 в поле
Второй раз жму на ту же кнопочку выводиться другая цифра к примеру 3
Третий раз жму на кнопку выводиться цифра 10

Но это токо пример))
Вот как это можно реализовать???

[Карась]

Тоесть при каждом нажатии на кнопку в Едите должна появляться рандомная буква/цифра? Или всёже идёт добавление к тексту едита?
Если да то это я написал в посте номер 6.

[diznt]

Нет я имею ввиду что не нужны не какие рандомные числа!

[Карась]

И так я хочу сделать чтобы при нажатии на кнопочку выводились определенные результаты
К примеру

Жму на кнопку выводиться цифра 1 в поле
Второй раз жму на ту же кнопочку выводиться другая цифра к примеру 3
Третий раз жму на кнопку выводиться цифра 10

И в чём заключаются эти "определёные результат"?