首部 function GetCurrentDir: string; $[SysUtils.pas功能 返回當前操作目錄說明 [注意]調用檔案對話框會改變當前操作目錄參考 function System.GetDir例子 Edit1.Text := GetCurrentDir;