Funktion geht nicht mehr...

Ein Blick in die Changes genügt:

Zitat

Removed: _StringAddThousandsSep() has been removed. Too many opinions on how the function should work means nobody is happy with it.

Func _DisplayMemorySize($DMSize)
Return StringReplace(String(Round($DMSize / 1024)), '.', ',') & ' MB (' & StringReplace(String(Round($DMSize * 1024)), '.', ',') & ' Bytes)'
EndFunc ;==>_DisplayMemorySize

Bei deiner Funktion verstehe ich aber das Round nicht, es wird doch nie eine Kommzahl zurückgegeben._StringAddThousandsSep ist somit Sinnlos.

Sinvoller wäre das:

Func _DisplayMemorySize($DMSize)
Return StringReplace(String(Round($DMSize / 1024,2)), '.', ',') & ' MB (' & ($DMSize * 1024) & ' Bytes)'
EndFunc ;==>_DisplayMemorySize

Aber falls du die Funktion mal brauchst: hier nachgebaut

Func _StringAddThousandsSep($STRING)
Local $sOut = '', $split = StringSplit($STRING, '.', 2)
If UBound($split) > 1 Then $sOut = ',' & $split[1]
If StringLen($split[0]) > 3 Then
Do
$sOut = '.' & StringRight($split[0], 3) & $sOut
$split[0] = StringTrimRight($split[0], 3)
Until StringLen($split[0]) < 4
If $split[0] <> '' Then
$sOut = $split[0] & $sOut
Else
$sOut = StringTrimLeft($sOut, 1)
EndIf
Else
$sOut = $split[0] & $sOut
EndIf
Return $sOut
EndFunc