Código Delphi [-] if GetFileAttributes(PChar('c:\')) <> DWORD(-1) then ShowMessage('Existe');
if GetFileAttributes(PChar('c:\')) <> DWORD(-1) then ShowMessage('Existe');