Einzelnen Beitrag anzeigen

Papaschlumpf73

Registriert seit: 3. Mär 2014
Ort: Berlin
442 Beiträge
 
Delphi 12 Athens
 
#19

AW: Int64 spinnt oder ich. HILFE!!!!

  Alt 7. Nov 2024, 08:28
$914800050C81C3F9
$914800050C81C400

Die Art der Änderung sieht auch komisch aus.
Was man sonst so für Probleme kennt, scheint es hier nicht zu sein (gedrehtes Bit, abgeschnittene Bytes, ...)


Passiert es hier auch?
Delphi-Quellcode:
var A, B: Int64; C: String; V: Variant;
begin
  A := -7978126718202166279;
  V := DM.ADOCon.Execute('SELECT CAST(-7978126718202166279 as bigint)').Fields[0].Value;
  B := Int64(V);
  C := VarToStr(V);
  Memo1.Lines.Append('A: ' + A.ToString);
  Memo1.Lines.Append('B: ' + B.ToString);
  Memo1.Lines.Append('C: ' + C);
end;
Ergebnis:
A: -7978126718202166279
B: -7978126718202166272
C: -7978126718202166279
  Mit Zitat antworten Zitat