D7+Indy 9.0代码如下:
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
IdHTTP, StdCtrls;type
TForm1 = class(TForm)
idhtp1: TIdHTTP;
btn1: TButton;
mmo1: TMemo;
Edit1: TEdit;
procedure btn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.btn1Click(Sender: TObject);
var
s :string;
begin
s:=idhtp1.Get(edit1.text);
mmo1.Text :=s;
end;end.访问如http://www.0591qs.cn/div/article.php?type=blog&itemid=1
http://blog.enet.com.cn/article.php?type-blog-cid-9-itemid-4437.html
这两个网页就无法完全得到网页的代码,而且每运行一次得到的代码位置都不一样,感觉像是还没完全读入过程就已经中止一了样,可是像其它网站甚至新浪网这样的大网站又都能正常得到全部代码,我去看了好多人的,又都没问题!请问这是什么原因,如何解决!
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
IdHTTP, StdCtrls;type
TForm1 = class(TForm)
idhtp1: TIdHTTP;
btn1: TButton;
mmo1: TMemo;
Edit1: TEdit;
procedure btn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.btn1Click(Sender: TObject);
var
s :string;
begin
s:=idhtp1.Get(edit1.text);
mmo1.Text :=s;
end;end.访问如http://www.0591qs.cn/div/article.php?type=blog&itemid=1
http://blog.enet.com.cn/article.php?type-blog-cid-9-itemid-4437.html
这两个网页就无法完全得到网页的代码,而且每运行一次得到的代码位置都不一样,感觉像是还没完全读入过程就已经中止一了样,可是像其它网站甚至新浪网这样的大网站又都能正常得到全部代码,我去看了好多人的,又都没问题!请问这是什么原因,如何解决!
解决方案 »
- delphi空日期的显示问题
- 查找adoquery中数据的办法、!!!
- 本人初学Delphi,有一些问题想问,请各位赏脸进来看看
- 现在的it业动荡不安,初学都问一个非技术问题,请各位大哥指路!!!!
- 请问高手,DELPHI程序怎样远程连接ORACLE数据库服务器!
- 高分求教!!!!! 求教Intraweb+RaveReport+RaveServer框架,实现Web报表的打印!
- 我创建了一个tline类(从tgraphicsControl继承),我想在line上画一个箭头。
- 关于线程和MDI的问题
- 一个又急又小的问题,请帮忙解决! 在线等待。
- 东进语音卡8路内线,同时只能1路拨外线??怎么解决??急急急
- 关于C/S系统,突然网络中断,在对数据操作时出错?怎么解决?
- DBListBox1Click无效
idhttp get()判断是否完全读完的根据是什么啊?