|
@@ -1,4 +1,3 @@
|
|
|
-
|
|
|
Strict
|
|
|
|
|
|
Import "bmk_config.bmx"
|
|
@@ -1493,12 +1492,22 @@ Function FindEOL:Int(Text:String, substr:String, start:Int = 0)
|
|
|
End Function
|
|
|
|
|
|
Function Concat4:String(a1:String, a2:String, a3:String, a4:String)
|
|
|
+?bmxng
|
|
|
Local s:TStringBuffer = New TStringBuffer(128)
|
|
|
+?not bmxng
|
|
|
+ TStringBuffer.initialCapacity = 128
|
|
|
+ Local s:TStringBuffer = New TStringBuffer
|
|
|
+?
|
|
|
Return s.Append(a1).Append(a2).Append(a3).Append(a4).ToString()
|
|
|
End Function
|
|
|
|
|
|
Function Concat5:String(a1:String, a2:String, a3:String, a4:String, a5:String)
|
|
|
+?bmxng
|
|
|
Local s:TStringBuffer = New TStringBuffer(128)
|
|
|
+?not bmxng
|
|
|
+ TStringBuffer.initialCapacity = 128
|
|
|
+ Local s:TStringBuffer = New TStringBuffer
|
|
|
+?
|
|
|
Return s.Append(a1).Append(a2).Append(a3).Append(a4).Append(a5).ToString()
|
|
|
End Function
|
|
|
|