Per Zufall eine Zahl erzeugen und dann ein Ereignis

[Frankfurtoder]

Du musst die Prozedur um eine Zahl zu generieren erst starten und dann deine Ereignisse in die Prozedur vom Timer legen.

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  randomize;
end;

procedure TForm1.Button1click(Sender: TObject);
begin
  Timer1.Interval := (random(3600)+60) * 1000; // 1 bis 60 Minuten
  Timer1.enabled := true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  //hier dein Ereignis
end;

Der Timer sollte also im Inspektor deaktiviert sein.