Got some very, very old code with getting a date from the preferences:
Dim theCFObject As CFObjectMBS =
theCFPrefs.CopyAppValue(NewCFStringMBS("Schedule_LastDate"),
NewCFStringMBS(MailArchiverBundleID))
dim temp as string = theCFObject.XML.Str
if theCFObject = nil then Return nil
dim theCFDate as CFDateMBS = NewCFDateMBS
theCFDate = CFDateMBS(theCFObject)
dim t2 as string = theCFDate.XML.Str
if theCFDate = nil then Return nil
dim theCFTime as CFAbsoluteTimeMBS
theCFTime = theCFDate.AbsoluteTime
if theCFTime = nil then Return nil
dim theGregDate as CFGregorianDateMBS
theGregDate = theCFTime.GregorianDate(nil)
if theGregDate = nil then Return nil
dim theDate as new Date
theDate.year = theGregDate.year
theDate.month = theGregDate.month
theDate.day = theGregDate.day
theDate.Hour = 0
theDate.Minute = 0
theDate.Second = 0
The code by itself is working fine. However, for testing I need to change the
value by hand in XCode. Then the change doesn't "take" and I still see the old
value in the debugger. Even after saving, quitting XCode, and double-checking
the value.
Any clue what is going on here?
Mit freundlichen Grüßen/Regards
Trixi Willius
http://www.mothsoftware.com
Mail Archiver X: The email archiving solution for professionals
_______________________________________________
Mbsplugins_monkeybreadsoftware.info mailing list
[email protected]
https://ml01.ispgateway.de/mailman/listinfo/mbsplugins_monkeybreadsoftware.info
