From b35b69c607ad661206f3c49e3a4a6e36e1d34c6f Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Mon, 22 Mar 2010 22:36:36 +0100 Subject: Fix wrong size displayed when format set to system Fixes bug 2974194 http://sourceforge.net/tracker/?func=detail&atid=515901&aid=2974194&group_id=66829 --- UCoreUtils.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'UCoreUtils.pas') 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); -- cgit v1.2.3