Changeset 192 for Include/Classes/System/String.ab

Timestamp:

Mar 28, 2007, 10:29:58 AM (17 years ago)

Author:

イグトランス (egtra)

Message:

Currencyを追加、その他修正

File:

• Include/Classes/System/String.ab (modified) (4 diffs)

Include/Classes/System/String.ab

@@ -240 +240 @@
         If AllocStringBuffer(textLengthW) <> 0 Then
             MultiByteToWideChar(CP_THREAD_ACP, 0, text, textLengthA, Chars, textLengthW)
+            Chars[textLengthW] = 0
         End If
 #endif
@@ -249 +250 @@
         If AllocStringBuffer(textLengthA) <> 0 Then
             WideCharToMultiByte(CP_THREAD_ACP, 0, text, textLengthW, Chars, textLengthA, 0, 0)
+            Chars[textLengthA] = 0
         End If
 #else
@@ -466 +468 @@
         memcpy(VarPtr(Remove.Chars[startIndex]), VarPtr(This.Chars[startIndex + count]), SizeOf (StrChar) * (m_Length - startIndex - count))
     End Function
-/*
+
     Static Function IsNullOrEmpty(s As String) As Boolean
         If s <> Nothing Then
@@ -475 +477 @@
         Return False
     End Function
-*/
+
     Const Function Replace(oldChar As StrChar, newChar As StrChar) As String
         Replace = Copy(This)