function Exist(Path:string):boolean; if not Exist('c:\windows') then writeln('windows is not exist in c:\');