G'Day!
On 4/01/2007, at 9:09 PM, Tom Benson wrote:
in the mean time, you could simply override ParseDate() with a
function of your own, which performs RB's flawed internal function
and then replaces the leading 0 with a 2.
You should be able to simply delete your overridden function once
REAL fix this, as long as they do that within the next 993 years of
course.
- Tom
Phew! Glad I saw this, I was literally just about to upload a release
built with 2007r1!!
I am not sure how to override ParseDate, but here is the function I
am going to use (which covers a bit of the 80s too) which I got
thanks to a bit of help from the Betas list.
Function ParseDate_Fix(Text as String, ByRef ParsedDate as Date) As
Boolean
Dim result as Boolean
result = ParseDate(Text, ParsedDate)
If result = true then
#If TargetMacOS
If ParsedDate.year < 100 then ParsedDate.year =
ParsedDate.year + 2000
If ParsedDate.year > 2080 then ParsedDate.year =
ParsedDate.year - 100
#endif
return true
Else
return false
End If
End Function
cya
Ben
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
