IntToStr bereitet Probleme beim umstieg auf Delphi 12

[Delphi.Narium]

Einmal die Bereichsprüfung beim Kompilieren eingeschaltet, einmal ausgeschaltet.

[Kishmet]

In beiden Versionen ist der Code der Funktion IntToStr der Gleiche, auch drumherum:

Code:

{$IFOPT Q+}
  {$DEFINE __OVERFLOWCHECKS}
  {$OVERFLOWCHECKS OFF}
{$ENDIF}
function IntToStr(Value: Integer): string;
begin
  Result := _IntToStr32(Abs(Value), Value < 0);
end;

function IntToStr(Value: Int64): string;
begin
  Result := _IntToStr64(Abs(Value), Value < 0);
end;
{$IFDEF __OVERFLOWCHECKS}
  {$UNDEF __OVERFLOWCHECKS}
  {$OVERFLOWCHECKS ON}
{$ENDIF}

Sprich es hat sich nichts verändert. Das Verhalten tritt auch bei absolut neuen leeren Projekten auf die nichts anderes enthalten als:

Code:

ShowMessage(IntToStr($FFFFFFFFFFFFFFFF));

Oder möchtest du mir mitteilen das sich das auch tatsächlich Verändert hat? Falls ja, wo finde ich die passende Releasenote?

[Blup]

Die Konstante $FFFFFFFFFFFFFFF ist untypisiert und wird als (2^64 -1) interpretiert.

IntToStr() ist für Integer und Int64 deklariert.
Da ist die Meldung schon richtig.

Hier ist auch eine Typumwandlung notwendig:

Delphi-Quellcode:

const
  i: Integer = Integer($FFFFFFFF);
  i64: Int64 = Int64($FFFFFFFFFFFFFFFF);

Das ist übriegens die Überlaufprüfung, nicht die Bereichsprüfung.

[Kishmet]

Hi Blup,

Ja, habe ich auch grade festgestellt... und auch das an der besagten Stelle an der mein Problem auftaucht tatsächlich folgendes gemacht wird:

Code:

IntToStr(Meine_uInt64_Variable)

Aber uInt64 kann IntToStr gar nicht. Gibt es hier eine schlaue Lösung für? Denn Integer(Variable) ist an der Stelle ja einfach Falsch, oder? Und meine Frage bleibt tatsächlich bestehen... was genau hat sich geändert das es jetzt plötzlich Auswirkungen hat?

[Blup]

Die Funktion ist überladen:

function IntToStr(Value: Integer): string;
function IntToStr(Value: Int64): string;

Int64() wäre dann die richtige Umwandlung.

[Kishmet]

Aber auch int64(Meine_uInt64_var) könnte durchaus Informationsverlust bedeuten, oder übersehe ich gerade etwas?

[Kishmet]

Eigentlich ist das alles Schmutz weil es schlicht und ergreifend ein Fehler im Code ist und schon immer war... IntToStr, war schon immer die falsche Funktion an dieser Stelle. Mal schauen was für Fehler das jetzt nach sich zieht.

Mich würde immernoch interessieren was sich genau verändert hat, das dieser Fehler jetzt auftritt und vorher einfach ignoriert wurde, aber am Ende des Tages ist das egal.

Vielen lieben dank euch!

[Blup]

Nur wenn du tatsächlich Werte ab 2^63 oder größer hast.
Diese werden dann als negative Zahlen ausgegeben.
Also keine Verlust, eher eine Verfälschung.

[Delphi.Narium]

Ist denn in beiden Delphi die Bereichsprüfung eingeschaltet? (Kompileroptionen vergleichen.)

Alternativ im Quelltext:

Delphi-Quellcode:

{$R-}
// Hier der Code, der den Fehler verursacht
{$R+} // Optional: Reaktivieren der Bereichsprüfung am Ende

Zitat von Blup:

Die Funktion ist überladen:

function IntToStr(Value: Integer): string;
function IntToStr(Value: Int64): string;

Int64() wäre dann die richtige Umwandlung.

$FFFFFFFFFFFFFFFF (16 F) sind aber auch für Int64 zuviel.

[Kishmet]

@delphi.narium : Ja es hat sich nichts weiter verändert. Wenn dann eine Grundeinstellung irgendwo im Compiler (Also von RAD Studio selbst eine Defaulteinstellung die von 11 auf 12 geändert wurde) von der ich so nichts weiß. Alles andere (Sprich Code und Projekteinstellungen) ist identisch, wie gesagt auch mit neuen Projekten passiert genau das gleiche.