android xml文件写入,将XML文件写入android

----formshow

newpath := '/storage/sdcard0/DCIM/100ANDRO/GRJKDAGLGXYSF';

if not TDirectory.Exists (newpath) then begin

TDirectory.CreateDirectory (newpath); //Create a folder

end;

newpath := newpath + '/';

----存入本机

var

filename:string;

newfile:Tfilestream;

begin

filename := 'update_sf_' + formatdatetime('yyyy-MM-dd',now) + gxyglkId;

newfile := TFile.Create (newpath + filename);

newfile.Free;

clientdatasetlocal.SaveToFile(newpath + filename,dfXML);

end;

---创建文件

var

newpath:string;

newfile:Tfilestream;

begin

newpath := '/storage/sdcard0/DCIM/100ANDRO/GRJKDAGLF';

if TFile.Exists (newpath + '/update.xml') then begin

ShowMessage ('File exists');

end

else begin

newfile := TFile.Create (newpath + '/update.xml'); //Create a file (stream)

newfile.Free; //Clear Stream

// SpeedButton5Click (Self); //Close the window

// TotalWork (path,True); //Update the list

end;

---创建文件路径

var newpath:string;begin newpath := '/storage/sdcard0/DCIM/100ANDRO/GRJKDAGLF'; showmessage(newpath); if TDirectory.Exists (newpath) then begin ShowMessage ('Folder Exists!'); end else begin TDirectory.CreateDirectory (newpath); //Create a folder ShowMessage ('Folder created!'); // SpeedButton5Click (Self); //Close the window // TotalWork (path,True); //Update the list end;

总结

以上是编程之家为你收集整理的将XML文件写入android全部内容，希望文章能够帮你解决将XML文件写入android所遇到的程序开发问题。

如果觉得编程之家网站内容还不错，欢迎将编程之家网站推荐给程序员好友。

本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。

小编个人微信号 jb51ccc

喜欢与人分享编程技术与工作经验，欢迎加入编程之家官方交流群！