diff --git a/rtl/objpas/sysutils/filutil.inc b/rtl/objpas/sysutils/filutil.inc index c2494cb9dd..3790066832 100644 --- a/rtl/objpas/sysutils/filutil.inc +++ b/rtl/objpas/sysutils/filutil.inc @@ -133,6 +133,8 @@ begin if Result then begin SymLinkRec.TargetName := UnicodeString(sr.TargetName); + SymLinkRec.Size := sr.Size; + SymLinkRec.Attr := sr.Attr; {$ifdef SYMLINKREC_USEFINDDATA} SymLinkRec.FindData := sr.FindData; {$endif} @@ -343,6 +345,8 @@ begin if Result then begin SymLinkRec.TargetName := ToSingleByteFileSystemEncodedFileName(sr.TargetName); + SymLinkRec.Size := sr.Size; + SymLinkRec.Attr := sr.Attr; {$ifdef SYMLINKREC_USEFINDDATA} SymLinkRec.FindData := sr.FindData; {$endif}