Código Delphi [-] if LongBool(GetFileAttributes('C:\Archivos de programa') and $400{FILE_ATTRIBUTE_REPARSE_POINT}) then MessageBox(0, 'LNK', nil, 0);
if LongBool(GetFileAttributes('C:\Archivos de programa') and $400{FILE_ATTRIBUTE_REPARSE_POINT}) then MessageBox(0, 'LNK', nil, 0);