J
jialiguo
Unregistered / Unconfirmed
GUEST, unregistred user!
FileName := 'E:/out/1baseinfo(2008/2/1)';
if uppercase(Rightstr(FileName,4))<>'.TXT' then
FileName := FileName+'.TXT';
AssignFile(BasicInfoFile, FileName);
文件名称中存在/不行怎么解决
还不想日期格式写成yyyy-mm-dd的
因为是英国的
if uppercase(Rightstr(FileName,4))<>'.TXT' then
FileName := FileName+'.TXT';
AssignFile(BasicInfoFile, FileName);
文件名称中存在/不行怎么解决
还不想日期格式写成yyyy-mm-dd的
因为是英国的