Forudsigelig randomize

Hej Eksperter.

Jeg har nu rodet mig ud i noget arbejde, der involverer en hel del brug af Randomize-funktionen. F.eks. bruger jeg følgende:

Randomize;
rnd:=(Random(10) + 1);

Jeg har en timer, der kører den med et bestemt interval og skriver resultatet på skærmen. Her kan jeg se at resultat kan forudsiges. Der er nemlig en kraftig tendens til at den trækker 3 fra det forrige resultat. F.eks får jeg talrækken:
10-7-4-1-8-5-2-9-6-3-10...
I mit program er det meget vigtigt at resultat ikke kan forudsiges.

Ligeledes får jeg et problem med følgende:

Randomize;
rnd:=(Random(100) + 1);

Her varierer resultat kun mellem tallene 70-100. Og ofte er der den tendens at jeg f.eks får talrækken:
93-76-92-75-91-74-90-73...

Er der nogen af jer der kan hjælpe mig med få mig Randomize, til at være rigtig random?
På forhånd tak.