2
0
Эх сурвалжийг харах

* fixed copy(unicodestring,x,y) with x<>1 (second parameter of
JLString.subString() is end index, not total length to copy)

git-svn-id: branches/jvmbackend@19618 -

Jonas Maebe 14 жил өмнө
parent
commit
c42e4178c5

+ 1 - 1
rtl/java/justrings.inc

@@ -674,7 +674,7 @@ begin
      (Index+Size>Length(S)) then
    Size:=Length(S)-Index;
   If Size>0 then
-    result:=JLString(s).subString(Index,Size)
+    result:=JLString(s).subString(Index,Index+Size)
   else
     result:='';
 end;