delphi 获取文件版本等

自动获取Delph文件版本，版权等 type TFileVersionInfo=record FixedInfo:TVSFixedFileInfo;{版本信息} CompanyName:string;{公司名称} FileDescription:string;{说明} FileVersion:string;{文件版本} InternalName:string;{内部名称} LegalCopyright:string;{版权} LegalTrademarks:string;{合法商标} OriginalFilename:stri