Zufallszahlengenerator?

[braingrenade]

Moin Leute !

Kennt ihr einen Zufallszahlen algorithmus ?

Wenn nicht , wisst ihr vielleicht wie ich an die Source von randomize komme ?

[sakura]

Den Code von Random erhälst Du, wenn Du eine Version von Delphi hat, welche höher als Personal ist. Da sind diese Sourcen enthalten. Ansonsten gibt es keine Möglichkeit diesen zu erhalten, da die unter Copyright stehen ;-)

...:cat:...

[neolithos]

Wo find ich bei meiner D7 Prof den SourceCode von Random?
Habe SysUtils durchsucht und nur Randomize gefunden.

[urs.liska]

Wahrscheinlich so:
im Editor 'Random' eingeben, über F1 den Hilfetext aufrufen, da sollte die Unit stehen.

Viel Erfolg
Urs

P.S. ich kann mir vorstellen, dass Dir das auch nichts hilft und Random einfach eine Windows-Funktion aufruft. Na, einen Versuch ist's Wert

[neolithos]

Random sollte in System (muss mich berichtigen) stehen. System ist aber nicht vollständig...

Delphi-Quellcode:

unit System; { Predefined constants, types, procedures, }
             { and functions (such as True, Integer, or }
             { Writeln) do not have actual declarations.}
             { Instead they are built into the compiler }
             { and are treated as if they were declared }
             { at the beginning of the System unit.     }

[braingrenade]

hmm..

ich kuck mal.

[urs.liska]

Na das entspricht ja ungefähr meinem Verdacht ;-)
Dann bleibt Dir wohl nichts übrig, als in der 'richtigen' Literatur zu suchen. Also nach Büchern oder Texten zu "Algorithmen" zu suchen. Wenn es Dir Ernst ist mit dem Problem, dann wäre das vielleicht sowieso ratsam, da (soweit ich gelesen habe) die üblicherweise verwendeten Standardalgorithmen nicht sehr "zufällig" sind. Richtigen Zufall kann man elektronisch keinesfalls erzeugen, aber ich denke, dass es sicher mehr oder weniger gute Annäherungen gibt.

Viel Glück
Urs

P.S. habe gerade noch vergeblich in einer alten CD-ROM 'Algorithmen in C++' geschaut, da war aber nichts dabei

[braingrenade]

Bei mir gibt's keine System.pas :(
Das war wahrscheinlich was sakura gemeint hat !

Weiß vielleicht jemand ne mathematishe Formel ?

[neolithos]

Formel kenn ich nicht die arbeiten aber mit der Aktuellenzeit als Startwert (das macht Randomize). Laut System. Doch für was die das brachen weiß ich nicht.

[Meflin]

auch random ist kein wirklicher zufall,
da der zufall auf der systemzeit basiert.
allerdings kenne ich auch keinen alternativ-algo...

*MFG*