T toplucky Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-15 #2 api函数 var yourdir : PChar; begin .. setcurrentDirectory() .. end;