Zufallsbild: Seltsame Konstruktionen

[Delphi-Narr]

Hallo,
ich habe in meinem Programm die Funktion eingebaut, ein Zufallsbild zu erzeugen.
Doch ich sehe häufig seltsame Konstruktionen. Z.B. eine Ellipse in einem Rechteck (Liegen genau ineinander), obwohl beide Aufrufe separat geschehen...
Weiß jemand, wodurch das hervorgerufen wird?

Hier meine Aufrufe:

Delphi-Quellcode:

          5:begin
                 randomize;
                 Bild.canvas.Rectangle(Random(Bild.width), 
                                       Random(Bild.height),
                                       Random(Bild.width), 
                                       Random(Bild.height));
            end;
          6:begin
                 randomize;
                 Bild.canvas.ellipse(Random(Bild.width), 
                                     Random(Bild.height), 
                                     Random(Bild.width),
                                     Random(Bild.height));
            end;

Liebe Grüße!