Delphi7: функция random + timer

[Kostya1981]

Здравствуйте. Не могу реализовать следующую простую програмку:

Необходимо создать генератор случайного числа, который бы через определенный интервал времени повторял бы генерацию, но уже от предыдущего случайного числа, а не от заданного.

Вобщем пробую следующее:
procedure TForm1.Timer1Timer(Sender: TObject);
var
n:integer;
begin
n:=100+random(5)-random(5); // 100 - это стартовое число,
// от которого необходимо генрерировать // в диапозоне -5 до 5 (чтоб и в плюс и в минус могло).
n:=n+(random(5)-random(5)); // пытаюсь программе сказать,
// что последующие числа должна генерировать
// от предыдущего случайного значения.
Label1.Caption:=inttostr(n); //чтоб показать.

end;
end.

Но она меня не понимает и начинает генерировать сново от 100. Т.е. мне нужно чтобы при запуске было с интервалами времени: 102 --> 107 --> 101 --> 97 --> 95 --> 89 -->82 и т.д. А оно в место этого: 100-->103-->101-->98-->102-->100-->101 и т.д.

Вот! Я с чистой совестью заявляю, что пробовал по вскому, даже с goto, но кроме возврата к 100 или зависаний ничего добиться не могу. И я понимаю, что процедура просто с самого начала повторяется, но как это исправить не знаю.

[crystalbit]

Так очевидно же, что он у тебя всегда сначала от 100 идёт, а потом от этого числа. И при повторном вызове снова от 100.
Объяви n глобально и сделай от 100 только один раз, на OnCreate формы, например.

[Kostya1981]

'n' глобально, oncreate... - ладно это вопрос уже скорее к книжкам, спасибо большое - понял в каком направлении двигаться, будем изучать и пробовать.

[Alt]

Это, вообще-то, фундаментальные знания. Кто тебя программированию учил?))