diff options
author | Graeme Geldenhuys <graemeg@gmail.com> | 2010-08-22 13:50:33 +0200 |
---|---|---|
committer | Graeme Geldenhuys <graemeg@gmail.com> | 2010-08-22 13:50:33 +0200 |
commit | 540e3d91366a97c817775f2b99ccb41b9f00497d (patch) | |
tree | e32e7142df9ac42e8cb41d6630582ccd037d190c | |
parent | fed01ba7093a63b588418f775942be46f7104720 (diff) | |
download | fpGUI-540e3d91366a97c817775f2b99ccb41b9f00497d.tar.xz |
docview: INF header information. Added file size to the details.
-rw-r--r-- | docview/src/frm_main.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/docview/src/frm_main.pas b/docview/src/frm_main.pas index 64a07ecb..4defc759 100644 --- a/docview/src/frm_main.pas +++ b/docview/src/frm_main.pas @@ -436,8 +436,8 @@ begin with sl do begin Add('<b><u>Filename:</u></b> <red>' + f.Filename + '<black>'); - Add(''); Add('<b>Title:</b> ' + f.Title); + Add('<b>File size:</b> ' + IntToStr(fpgFileSize(f.Filename)) + 'bytes'); Add('<b>Dictionary count:</b> ' + IntToStr(f.DictionaryCount)); Add('<b>Topic count:</b> ' + IntToStr(f.TopicCount)); Add('<b>Index count:</b> ' + IntToStr(f.Index.Count)); |