Einzelnen Beitrag anzeigen

Benutzerbild von cherry
cherry

Registriert seit: 14. Nov 2005
561 Beiträge
 
RAD-Studio 2009 Ent
 
#1

IADsLargeInteger TO TDateTime

  Alt 17. Dez 2009, 07:15
Mooorgeeen.

Ich gebs auf... Ich kriegs nicht auf die Reihe das Attribut pwdLastSet (IADsLargeInteger) in ein lesbares TDateTime zu konvertieren.
Bis jetzt hab ich 100te Beispiele angeschaut aber nichts scheint zu klappen.

Ich hab bis jetzt so was hier:

Delphi-Quellcode:
function GetDateTimeFromLargeInteger(largeIntValue: IADsLargeInteger): TDateTime;
var
  int64Value: Int64;
begin
  // Convert large integer to int64 value
  int64Value := largeIntValue.HighPart;
  int64Value := int64Value shl 32;
  int64Value := int64Value or largeIntValue.LowPart;
  // return datetime
  result := FileDateToDateTime(int64Value);
end;
Danke schon mal.
Ist das nur mein Gefühl, oder ist die ganze Welt verrückt geworden!?
  Mit Zitat antworten Zitat