[Delphi 2010] Interner Fehler

[cookie22]

Zitat:

Zitat von Dezipaitor

Delphi-Quellcode:

var num6 : Extended; 
-..
num6 := round(Math.LogN(1, (num5))) / round(Math.LogN(1, 2));

Divison durch 0.

hmm wie gesagt, ich hab mir das zusammen gereimt. wie wäre es denn richtig.



edit: so hab eben bei em geschaut, da gibt es einen bug report. das passiert wenn man generics in eine andere unit auslagert. wenn ichs in die unit packe in der ichs aufrufe gehts.

[Dezipaitor]

Math.LogN(1, 2)

Stellt den Logarithmus von 2 zur Basis 1 dar.
Man kann einen Log zur beliebigen Basis einfach berechnen :

Delphi-Quellcode:

Log(basis, n) = logk(n) / logk(basis);

Rechne mal jeden einzelen Term aus mit beliebigen Werten für n, jedoch Basis = 1.
Dabei ist logk ein beliebiger Logarithmus (z.b. 2 (=ln) oder auch 10)

[cookie22]

Delphi-Quellcode:

num6 := LN(num5) / LN(2);

so?

[Dezipaitor]

Was macht denn die Zeile im Hinblick darauf, was die Funktion zurückliefern soll?

[cookie22]

steht doch weiter oben.

[Dezipaitor]

Diese Berechnung in der einen Zeile hat einen eindeutigen Sinn. Welcher ist das? Weißt du es?

[cookie22]

Delphi-Quellcode:

num6 := LN(num5) / LN(2);

ging hier um den natürlichen log. hatte das in math.pas gesucht und nicht gefunden. war in systems.pas.

so gehts alles in ordnung. :)