summaryrefslogtreecommitdiff
path: root/packages/fcl-base
diff options
context:
space:
mode:
authormarco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2>2011-01-23 17:54:58 +0000
committermarco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2>2011-01-23 17:54:58 +0000
commit890170f72c9b2d1a0d81826035b755c76926a39f (patch)
treea2f9ccd0c593e0b11bccdd7b683c8eb9a54e484d /packages/fcl-base
parent4d72d75d728aa263b7011f7347f1401f7458cb1d (diff)
downloadfpc-890170f72c9b2d1a0d81826035b755c76926a39f.tar.gz
patch from #18541 add comments field
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@16804 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/fcl-base')
-rw-r--r--packages/fcl-base/src/win/fileinfo.pp1
1 files changed, 1 insertions, 0 deletions
diff --git a/packages/fcl-base/src/win/fileinfo.pp b/packages/fcl-base/src/win/fileinfo.pp
index 951dbd7141..f1e56fceae 100644
--- a/packages/fcl-base/src/win/fileinfo.pp
+++ b/packages/fcl-base/src/win/fileinfo.pp
@@ -110,6 +110,7 @@ var struSize : Dword;
begin
ts := TStringList.Create;
try
+ ts.add('Comments');
ts.add('CompanyName');
ts.add('FileDescription');
ts.add('FileVersion');