随笔分类 - API 网络函数

一句话判断网络是否联通

摘要：uses WinInet; procedure TForm1.Button1Click(Sender: TObject); begin if InternetGetConnectedState(nil, 0) then ShowMessage('已连接'); end; 阅读全文

posted @ 2009-03-08 22:39 万一阅读(8749) 评论(17) 推荐(0)

用 API 提取、写入指定网站的 Cookie - 回复 "bangrj" 的问题

摘要：问题来源: http://www.cnblogs.com/del/archive/2009/02/27/1399526.html#1463307 本例效果图: 代码文件: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Di... 阅读全文

posted @ 2009-02-27 21:14 万一阅读(7797) 评论(10) 推荐(0)