04 2016 档案

摘要:procedure TForm1.Button1Click(Sender: TObject);var ts: TStrings; SysPath: string;begin ts := TstringList.Create; SysPath := ExtractFilePath(Applicatio 阅读全文
posted @ 2016-04-11 14:18 南国之恋 阅读(177) 评论(0) 推荐(0) 编辑
摘要:附数据库样本: <!--?xml version="1.0" standalone="yes"?--> 阅读全文
posted @ 2016-04-01 10:56 南国之恋 阅读(341) 评论(0) 推荐(0) 编辑