摘要: 1.添加网页到收藏夹的函数:procedure AddURL(Folder, Url, Title: string);var MyUrlFile: TextFile;begin if Folder[Length(Folder)] '\' then Folder := Folder + '\';... 阅读全文
posted @ 2015-07-14 22:47 EEEEEEEEEEEEEEEEEEE 阅读(398) 评论(0) 推荐(0) 编辑