Changeset 659


Ignore:
Timestamp:
2008/11/09 15:32:30 (4 years ago)
Author:
egtra
Message:

Unicodeビルド時にGetDateTimeFormatsがうまくいかない問題を修正

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/ab5.0/ablib/src/Classes/System/DateTime.ab

    r559 r659  
    560560        GetDateFormat(LOCALE_USER_DEFAULT, 0, time, NULL, dateTimeFormats, dateFormatSize) 
    561561        dateTimeFormats[dateFormatSize - 1] = &H20 As TCHAR 'Asc(" ") As TCHAR 
    562         GetTimeFormat(LOCALE_USER_DEFAULT, 0, time, NULL, dateTimeFormats + dateFormatSize, timeFormatSize) 
     562        GetTimeFormat(LOCALE_USER_DEFAULT, 0, time, NULL, VarPtr(dateTimeFormats[dateFormatSize]), timeFormatSize) 
    563563        Return New String(dateTimeFormats, strLength) 
    564564    End Function 
Note: See TracChangeset for help on using the changeset viewer.