Timer1 soll ne Usereingabe sein

[Die Muhkuh]

Delphi-Quellcode:

var
 // se: String;
  time: Integer;
begin
  time:= StrToInt(Edit1.Text);
 // Randomize; // Das bitte ins OnCreate.
  timer1.interval:=Random(time)+(60000); // Die 60000 sind das 'mindeste'
end;