2011年11月10日

自动更新代码

摘要: unit u_main;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Buttons, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient, IdFTP, C... 阅读全文

posted @ 2011-11-10 19:41 舟山牙医 阅读(330) 评论(0) 推荐(0)

Delphi中关于文件、目录操作的函数

摘要: Delphi中关于文件、目录操作的函数 Delphi中关于文件、目录操作的函数 来源:大富翁 关于文件、目录操作 Chdir('c:\abcdir'); // 转到目录Mkdir('dirname'); //建立目录Rmdir('dirname'); //删除目录GetCurrentDir; //取当前目录名,无'\'Getdir(0,s); //取工作目录名s:='c:\abcdir';D... 阅读全文

posted @ 2011-11-10 17:57 舟山牙医 阅读(1456) 评论(0) 推荐(0)

[Delphi]CopyFile函數詳解

摘要: [Delphi]CopyFile函數詳解 2007-07-20 15:41:40| 分类: 学习 | 标签: |字号大中小 订阅 今天在翻以前的delphi筆記的時候看到了這個函數的使用,但是記錄的很少.以前好像沒怎么用過這個函數.所以就想來試試.到網上去搜這個函數的詳解,竟然沒有找到.所以,自己今天在test的時候,順便把這個函數的基本使用方法給記錄下.方便以后再用,也方便和我一樣的菜鳥們學習.... 阅读全文

posted @ 2011-11-10 17:55 舟山牙医 阅读(18423) 评论(0) 推荐(0)

多线程下载

摘要: unit GetMM;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection,IdTCPClient, IdHTTP;constUrl='[url]ht... 阅读全文

posted @ 2011-11-10 17:48 舟山牙医 阅读(600) 评论(0) 推荐(0)

用 Delphi 下载网络文件

摘要: procedureTForm1.Button2Click(Sender:TObject);varMyStream:TMemoryStream;beginIdAntiFreeze1.OnlyWhenIdle:=False;//设置使程序有反应. MyStream:=TMemoryStream.Create;try//下载我站点的一个ZIP文件IdHTTP1.Get('http://www.138so... 阅读全文

posted @ 2011-11-10 17:42 舟山牙医 阅读(248) 评论(0) 推荐(0)

导航