[Mr.Serx]

Всем доброго времени суток!

Подскажите пожалуйста, как сделать так, что бы программа выписывала каждое число в [Memo1] введенное в от [Edit1] до [Edit2]

[m1sclick]

Код:

var i,j:integer;
begin
i:= strtoint(Edit1.Text);
j:= strtoint(Edit2.Text);
while i<=j do
begin
inc(i);
Memo1.Lines.Add(inttostr(i));
end;