Einzelnen Beitrag anzeigen

Papaschlumpf73

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

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

  Alt 8. Nov 2024, 08:01
maaaaaaaaaaaaaaa ... der blöde VarType

OK, jetzt aber ... hoff' ich
Delphi-Quellcode:
  Memo1.Lines.Append('Typ: ' + VarType(V).ToString + ' ' + VarTypeAsText(VarType(V)));
  Memo1.Lines.Append('Val: ' + TVarData(V).VInt64.ToString + ' ' + TVarData(V).VUInt64.ToString);
  var Tmp: string;
  for var i := 0 to High(TVarData(V).RawData) do
    Tmp := Tmp + ' ' + TVarData(V).RawData[i].ToHexString;
  Memo1.Lines.Append('Bin: ' + Tmp);
Ergebnis:
Typ: 14 Decimal
Val: 7978126718202166279 7978126718202166279
Bin: 8000000E 00000000 F37E3C07 6EB7FFFA
  Mit Zitat antworten Zitat