Randomize

[alman12]

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

function GenerateNum:Integer;
begin
  Result:=Random(10);
end;
Edit1.Text:=IntToStr(GenerateNum);


...
// или что-то такое?
var
  str:String;
begin
  str:='123456'
  str:=Copy(str,1,2) + Copy(str,5,2); // 1256 
  Edit1.Text:=str; // how about that?

Так. Это запись Random числа в Edit, что вы хотите НЕ делать?

var
int : Integer;
i : Integer;

begin
for i := 1 to 1 do
begin
int := Randomrange(spinedit1.value,spinedi t2.value);

label1.Caption:=label1.caption +#13#10 + IntToStr(int);
end;
end;

исключить цифры введенные в edit1

[min@y™]

исключить цифры введенные в edit1

Как введены эти числа? Где значение Edit1.text?
Исключить откуда?

[alman12]

исключит цифры в Edit1

[min@y™]

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

исключит цифры в Edit1

Как введены эти числа?
Где значение Edit1.text?
Исключить откуда?

[alman12]

исключить из label1

[min@y™]

исключить из label1

Не понял. Объясни по-человечески.

[Foreseen]

Спецолимпиада какая то
Я понял так-если сгенерировалось число, нужное ТС, к примеру "2", которое он ввел в едит, то вывести его в лэйбл, если нет-то оставить то ли лейбл, то ли едит пустым.

[min@y™]

Спецолимпиада какая то

У меня так иногда начальство так задания даёт, а-ля кличко. Понять смогут не только лишь все, мало кто сможет это сделать.

[BDA]

ИМХО: Дан диапазон (задан спинэдитами) и список чисел (задан в эдите). Выдать случайное число, лежащее в диапазоне и отсутствующее в списке.

[min@y™]

и список чисел (задан в эдите)

В Edit не может содержаться список. Только одна строка. А вот если там несколько чисел, разделённых неким символом-разделителем, тогда эту строку можно преобразовать таки в список. Но в задании это не оговорено.