The original date in the edit field was initialized
dim aDate as new date
editfield.text = aDate.longdate
I thought this would dodge the particularities of the different OS date
formats. And it did take that long date one time and increment it. And
the date it generated looked to be the same format. ??
What I have done is to add a date property to the edit field and
manipulate the date
myEditField.myDate.TotalSeconds = myEditField.myDate.TotalSeconds -
86400
myEditField.text = myEditFIeld.myDate.LongDate
This should be less sensitive to the systems date settings.
Thanks,
Michael
On Aug 23, 2006, at 7:25 PM, Norman Palardy wrote:
in my little app if you use this in the push button
dim aDate as date
dim testBool as Boolean
testBool = ParseDate(invoiceDate.TEXT,aDate)
aDate.TotalSeconds = adate.TotalSeconds - 86400
#if TargetWin32
invoiceDate.text = aDate.ShortDate
#else
invoiceDate.text = aDate.LongDate
#endif
and thi in the window open (to initialize the text in the edit field)
dim aDate as date
#if TargetWin32
invoiceDate.text = aDate.ShortDate
#else
invoiceDate.text = aDate.LongDate
#endif
things work OK on both OS X and Windows (at least with the way my OS X
and Windows are configured - YMMV)
_______________________________________________
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>
