![]() |
Re: zehnerpotenzen
Ich hab schon mehrere Tage so verschwendet.
|
Re: zehnerpotenzen
kleiner Nachtrag: Log von 0 ist nicht definiert - daher sollte bei 0 kein Logarithmus berechnet werden:
Delphi-Quellcode:
Function EngineerFormat(Const F : Double;Const Digits : Byte) : String;
Var P : Integer; Begin If (Abs(F) > 0.0) Then P:=Trunc(Log10(F) + 500) - 500 Else P:=0; Result:=Format('%s*10^%d',[FloatToStrF(F / Power(10,P),ffFixed,15,Digits - 1),P]); end; |
Re: zehnerpotenzen
Für die ganz Faulen gäbe es auch noch FloatToStrF mit ffExponent (und ggf. StringReplace "E" -> "*10^") :stupid: .
|
Re: zehnerpotenzen
ah thx - ich werd mich damit jetzt noch etwas spielen
ich mach grad so ne physicunit und die soll mir halt alel möglichen sachen ermöglichen zum berechnen - danke auf jeden Fall an alle :) |
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:41 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz