Formatfunktion würfelt die Datentypen wahllos zusammen

[grenzgaenger]

Zitat von inherited:

Von welchem Typ sind die beiden Variablen?
@taaktaak: Sollte eigentlich auch ohne diese Klammern funktionieren.

Delphi-Quellcode:

ePercent.Text  := format('%.3f', [eHigh.value      //extended
                                 / items[0].Price  //currency
                                 * 100]) + '%';

mal davon abgesehen, dürften hier nur die kommastellen verschoben sein...

Zitat von taaktaak:

Bist du denn sicher, dass die beiden Variablen auch den von dir erwarteten Inhalt haben?

yep, bin ich. da ich da mit dem debugger drauf stand... aber was rauskommt ist einfach ein quatsch von einer %-zahl...

[edit=SirThornberry]Beiträge zusammengeführt - Mfg, SirThornberry[/edit]

[SirThornberry]

Könntest du dem Beitrag bitte einen aussagekräftigen Namen geben? "Format" sagt so gut wie nicht aus worum es bei deinem Problem geht.

[taaktaak]

Tja, ich habe das jetzt auch mal "nachgestellt"...

Delphi-Quellcode:

var a,b : Integer;

a:=600;
b:=400;
showmessage(format('%0.3f',[a/b*100])+'%');

Bei mir zeigt er 150,000% an - so wie es sein soll

[grenzgaenger]

Zitat von taaktaak:

Tja, ich habe das jetzt auch mal "nachgestellt"...

Delphi-Quellcode:

var a,b : Integer;

a:=600;
b:=400;
showmessage(format('%0.3f',[a/b*100])+'%');

Bei mir zeigt er 150,000% an - so wie es sein soll

theoretisch, sollt es so funktionieren, wie bei dir ... nur schafft das mein delphi nich...

daher hab ich jetzt eine funktion erstellt ...

Delphi-Quellcode:

 function _percent(value, base: double): string;
 begin
   result := format('%.3f%%',[value / base * 100]);
 end;

wenn ich dieser die variablen übergebe, funzt es...

tja, was soll man dazu noch sagen...

[alzaimar]

Zitat von grenzgaenger:

theoretisch, sollt es so funktionieren, wie bei dir ... nur schafft das mein delphi nich...

Du weisst, das das Problem nicht Delphi ist, sondern davor sitzt.

[Hawkeye219]

Hallo,

meiner Meinung nach ist in diesem Fall der Delphi-Compiler das Problem. Der wird nämlich durch die MixedMode-Operation (Currency und Extended) innerhalb der Format-Funktion offenbar so irritiert, dass er für den Ausdruck sowohl einen falschen Datentyp ermittelt als auch einen fehlerhaften Code erzeugt. Eine kleine Anpassung und Umstellung der Operanden liefert das erwartete Resultat:

ePercent.Text := format('%.3f', [(100.0 / items[0].Price * eHigh.value)]) + '%'; Auch die Berechnung außerhalb der Format-Funktion liefert mit dem Original-Ausdruck das richtige Resultat.

Gruß Hawkeye