| 技术论坛 |
|
|
| ≡技术区≡ ① |
| DELPHI技术 |
| lazarus/fpc/Free Pascal |
| 移动应用开发 |
| Web应用开发 |
| 数据库专区 |
| 报表专区 |
| 网络通讯 |
| 开源项目 |
| 论坛精华贴 |
| ≡发布区≡ ② |
| 发布代码 |
| 发布控件 |
| 文档资料 |
| 经典工具 |
| ≡事务区≡ ③ |
| 网站意见 |
| 盒子之家 |
| 招聘应聘 |
| 信息交换 |
| 论坛信息 |
|||
|
| 导航： | 论坛 -> DELPHI技术 斑竹:liumazi,sephil | |||||
| 作者： |
|
2015/5/14 1:39:50 | ||||
| 标题： |
|
加入我的收藏 | ||||
| 楼主： | unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, System.Net.URLClient, System.Net.HttpClient, System.Net.HttpClientComponent, Vcl.StdCtrls; type TForm1 = class(TForm) //Delphi自带原生HTTP控件 NetHTTPClient1: TNetHTTPClient; Memo1: TMemo; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); var m_Stream: TStringStream; begin m_Stream := TStringStream.Create('', TEncoding.UTF8); // 访问百度 NetHTTPClient1.Get('http://www.baidu.com', m_Stream); Memo1.Text := m_Stream.DataString; end; end.
QQ群:325010556 欢迎加入。 |
|||||
| 作者： |
|
2015/5/14 9:05:34 | ||||
| 1楼： | 和indy的有什么区别啊？ ---------------------------------------------- - |
|||||
| 作者： |
|
2015/5/14 9:22:53 | ||||
| 2楼： | indy会被报毒.. ---------------------------------------------- delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行. |
|||||
| 作者： |
|
2015/5/14 9:42:59 | ||||
| 3楼： | 楼主, 怎么支持进度条呢? ---------------------------------------------- delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行. |
|||||
| 作者： |
|
2015/5/14 10:06:56 | ||||
| 4楼： | to 楼上的，indy被报毒是因为你没改user-agent ---------------------------------------------- QQ: 9717005 我的Blog：http://www.cnblogs.com/anydelphi/ |
|||||
| 作者： |
|
2015/5/14 10:49:20 | ||||
| 5楼： | to 楼上的,怎么改才不报毒? ---------------------------------------------- delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行. |
|||||
| 作者： |
|
2015/5/14 10:59:55 | ||||
| 6楼： | 为啥我用 INDY 就不报毒？ 360 金山 百度 管家，我都没贿赂过啊。 难道他们怕我了？ ---------------------------------------------- (C)(P)Flying Wang |
|||||
| 作者： |
|
2015/5/14 14:50:32 | ||||
| 7楼： | Indy太臃肿，EMB估计打算放弃它，新版的DELPHI不断地在增加Net库，这个HTTPClient原生支持Https，目前除了不支持TimeOut外，没发现什么问题。 ---------------------------------------------- Delphi4Linux Delphi三层/FireDAC 技术群：734515869 http://www.cnblogs.com/rtcmw |
|||||
| 作者： |
|
2015/5/14 18:46:29 | ||||
| 8楼： | to 楼上的, 进度条也木有. ---------------------------------------------- delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行. |
|||||
| 作者： |
|
2015/5/14 19:02:19 | ||||
| 9楼： | @uesdays 进度条可参考他的Demo HttpDownload Studio\16.0\Samples\Object Pascal\RTL\HttpDownload ---------------------------------------------- 一个热爱delphi的人,Golang GUI库。 --我的博客-- |
|||||
| 作者： |
|
2015/5/15 15:41:54 | ||||
| 10楼： | Studio\16.0\Samples\Object Pascal\RTL\HttpDownload 没这路径... ---------------------------------------------- delphi界写python最强, python界写delphi最强. 写自己的代码, 让别人去运行. |
|||||
| 作者： |
|
2015/5/16 12:26:31 | ||||
| 11楼： | 不错 ---------------------------------------------- 还可以更好 |
|||||
| 作者： |
|
2015/5/16 16:42:01 | ||||
| 12楼： | 我在OSX上用会发生奇怪的AV错误。 同样的代码在Win下就OK，换成Indy就没错了，想不明白。 ---------------------------------------------- - |
|||||
| 作者： |
|
2016/8/24 17:10:23 | ||||
| 13楼： | 请问怎么post TStream数据？我试了都不行的，是不是这个控件有BUG? ---------------------------------------------- - |
|||||
| 信息 |
| 登陆以后才能回复 |
