diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/gui/fpg_grid.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/gui/fpg_grid.pas b/src/gui/fpg_grid.pas index 3a8d4ced..b7800b55 100644 --- a/src/gui/fpg_grid.pas +++ b/src/gui/fpg_grid.pas @@ -203,7 +203,7 @@ var e: TFileEntry; x: integer; y: integer; - s: string; + s: Tfpgstring; img: TfpgImage; begin e := FFileList.Entry[ARow]; @@ -241,7 +241,7 @@ begin if e.EntryType = etDir then s := '' else - s := FormatFloat('###,###,###,##0', e.Size); + s := FormatFloat('### ### ### ##0', e.Size); x := ARect.Right - Font.TextWidth(s) - 1; if x < (ARect.Left + 2) then x := ARect.Left + 2; |