diff options
| -rw-r--r-- | UCoreUtils.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/UCoreUtils.pas b/UCoreUtils.pas index d65eed4..304e7a8 100644 --- a/UCoreUtils.pas +++ b/UCoreUtils.pas @@ -166,7 +166,7 @@ begin if f < 0 then f := ConfSizeFormat; case f of 0 : begin // System default formatting - p := g_strdup_printf('%''lu', Int64(Value div Base)); + p := g_strdup_printf('%''llu', Int64(Value div Base)); if p = nil then begin DebugMsg(['FormatSize(0): sprintf() failed, using old format function.']); Result := FormatFloat('###,###,##0', Value div Base); |