unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; procedure Button1Click(Sender: TObject); end; var Form1: TForm1; implementation {$R *.dfm} uses MsXML; procedure TForm1.Button1Click(Sender: TObject); var req: IXMLHTTPRequest; begin req := CoXMLHTTP.Create; //较早的版本或许是 req := CoXMLHTTPRequest.Create; req.open('Get', 'http://del.cnblogs.com', False, EmptyParam, EmptyParam); req.send(EmptyParam); Memo1.Text := req.responseText; end; end.
使用 IXMLHTTPRequest 简单获取网页源代码
原创JLee79 ©著作权
文章标签 IXMLHTTPRequest 文章分类 XML/XSL 前端开发
下一篇:系统默认语言与系统支持的语言列表
-
python file指针划到第三行
当我们读取文件内容时,并不能重复的读取,比如一个blogCblog.txt文件里有blogCblog内容,用两个read()方法读取blogCblog.txt的内容,会发现,第一个返回文件内容,第二个返回‘’。并不能重复读取,如果我想重复读取呢?怎么解决。 其实这跟文件指针有关,当我们对文件操作时,文件内部会有一个文件指针来定位当前位置,如图: 当op
python file指针划到第三行 python file.seek 文件指针 txt文件 os模块