I forgot that LongDate is already a property of the Date class. So
the renamed function could be
Function DisplayDate(Extends Date As Date) As String
#if RBVersion < 2007.01
Return Date.ShortDate
#else
Return Date.AbbreviatedDate
#endif
End Function
Hans-Georg
Am 03.01.2007 um 20:30 schrieb Hans-Georg:
Function LongDate(Extends Date As Date) As String
#if RBVersion < 2007.01
Return Date.ShortDate
#else
Return Date.AbbreviatedDate
#endif
End Function
_______________________________________________
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>
