mkdir的錯誤判斷

1. var<br /> 2. path:string<br /> 3. begin<br /> 4. path := '';<br /> 5. try<br /> 6. mkdir(path);<br /> 7. except<br /> 8. showmessage('cannnot create this path!');<br /> 9. end;<br /> 10. end;<br /> 11. //你說上面的代碼可以捕捉到mkdir的錯誤嗎？答案是可以。下面的也可以，但需要加上{$I-}，上面預設的其實是{$I+}：<br /> 12. var<br /> 13. path:string<br /> 14. begin<br /> 15. {$I-}//<br /> 16. path := '';<br /> 17. mkdir(path);<br /> 18. if IOResult <> 0 then<br /> 19. showmessage('cannnot create this path!')<br /> 20. else<br /> 21. showmessage('created this path!');<br /> 22. end;