Delphi IDHTTP控件:GET/POST 请求

 

最近一直在使用IDHTTP,下面是一些关于 GET、POST 请求基本使用方法的代码

一、GET 请求

 1 procedure GetDemo;
2 var
3 IdHttp : TIdHTTP;
4 Url : string;//请求地址
5 ResponseStream : TStringStream; //返回信息
6 ResponseStr : string;
7 begin
8 //创建IDHTTP控件
9 IdHttp := TIdHTTP.Create(nil);
10 //TStringStream对象用于保存响应信息
11 ResponseStream := TStringStream.Create('');
12 try
13 //请求地址
14 Url := 'http://dict.youdao.com/';
15 try
16 IdHttp.Get(Url,ResponseStream);
17 except
18 on e : Exception do
19 begin
20 ShowMessage(e.Message);
21 end;
22 end;
23 //获取网页返回的信息
24 ResponseStr := ResponseStream.DataString;
25 //网页中的存在中文时,需要进行UTF8解码
26 ResponseStr := UTF8Decode(ResponseStr);
27 finally
28 IdHttp.Free;
29 ResponseStream.Free;
30 end;
31 end;

如果Get需要添加请求参数,则直接在地址后添加,各参数间用&连接

如:http://dict.youdao.com?param1=1&param2=2

二、Post 请求

 1 procedure PostDemo;
2 var
3 IdHttp : TIdHTTP;
4 Url : string;//请求地址
5 ResponseStream : TStringStream; //返回信息
6 ResponseStr : string;
7
8 RequestList : TStringList; //请求信息
9 RequestStream : TStringStream;
10 begin
11 //创建IDHTTP控件
12 IdHttp := TIdHTTP.Create(nil);
13 //TStringStream对象用于保存响应信息
14 ResponseStream := TStringStream.Create('');
15
16 RequestStream := TStringStream.Create('');
17 RequestList := TStringList.Create;
18 try
19 Url := 'http://f.youdao.com/?path=fanyi&vendor=fanyiinput';
20 try
21 //以列表的方式提交参数
22 RequestList.Add('text=love');
23 IdHttp.Post(Url,RequestList,ResponseStream);
24
25 //以流的方式提交参数
26 RequestStream.WriteString('text=love');
27 IdHttp.Post(Url,RequestStream,ResponseStream);
28 except
29 on e : Exception do
30 begin
31 ShowMessage(e.Message);
32 end;
33 end;
34 //获取网页返回的信息
35 ResponseStr := ResponseStream.DataString;
36 //网页中的存在中文时,需要进行UTF8解码
37 ResponseStr := UTF8Decode(ResponseStr);
38 finally
39 IdHttp.Free;
40 RequestList.Free;
41 RequestStream.Free;
42 ResponseStream.Free;
43 end;
44 end;

Post请求在网页中多使用List形式提交参数。

不过在一些API中规定了POST的请求格式为 JSON 格式或 XML,这是需要注意发起请求前需要先设置 ContentType 属性,使用Stream方式提交

已上面代码为例:

提交 JSON 格式:IdHttp.Request.ContentType :='application/json';

提交 XML 格式: IdHttp.Request.ContentType :='text/xml';

如未按要求格式提交,一般会返回 HTTP 1.1 / 415

Delphi IDHTTP控件:GET/POST 请求的更多相关文章

  1. HTTP 常见异常状态及Delphi IDHTTP 控件处理方式

    以下部分为网上查找,部分为工作中整理 200:请求成功 202:请求被接受,但处理尚未完成 302:请求到的资源在一个不同的URL处临时保存     处理方式:重定向到临时的URL(IDHTTP处理方 ...

  2. Delphi WebBrowser控件的使用(大全 good)

    Delphi WebBrowser控件的使用 WebBrowser控件属性:1.Application      如果该对象有效,则返回掌管WebBrowser控件的应用程序实现的自动化对象(IDis ...

  3. <总结>delphi WebBrowser控件的使用中出现的bug

    Delphi WebBrowser控件的使用中出现的bug:  1.WebBrowser.Visible=false:Visible属性不能使WebBrowser控件不可见,暂时用 WebBrowse ...

  4. 修改Delphi工具控件的默认字体

    修改Delphi工具控件的默认字体: 注册表: Delphi 6:    HKEY_CURRENT_USER\Software\Borland\Delphi\6.0Delphi 7:    HKEY_ ...

  5. Delphi TcxtreeList控件说明 转

    Delphi TcxtreeList控件说明   树.cxTreeList 属性: Align:布局,靠左,靠右,居中等 AlignWithMargins:带边框的布局 Anchors:停靠 (akT ...

  6. delphi按钮控件的default属性

    delphi按钮控件的default属性用于设置默认命令按钮,.设置为true时,按[Enter键]相当于用鼠标单击了该按钮 .窗口中如果有多个按钮的default是true的话,就根据tabinde ...

  7. Delphi fmx控件在手机滑动与单击的问题

    Delphi fmx控件在手机滑动与单击的问题 (2016-03-08 10:52:00) 转载▼ 标签: it delphi 分类: Delphi10 众所周知,fmx制作的app,对于象TEdit ...

  8. Delphi maskedit控件的掩码含义及用法方法

    Delphi maskedit控件的掩码含义及用法方法   1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 2 ...

  9. Delphi StringGrid控件的用法

    Delphi StringGrid控件 组件名称:StringGrid         ●固定行及固定列:  StringGrid.FixedCols:=固定行之数;  StringGrid.Fixe ...

随机推荐

  1. python 打开文件对话框 filedialog tkinter GUI 编程

    - -读取文件的gui编程 # _*_ coding:utf-8 _*_ import tkinter from tkinter import filedialog def openfiles2(): ...

  2. 常用到的photoshop实用设计功能都在这了!

    常用到的photoshop实用设计功能都在这了!赶快收藏学起来,需转不谢~ ​ 编辑:千锋UI设计

  3. Spring ApplicationContext(六)BeanPostProcessor

    Spring ApplicationContext(六)BeanPostProcessor 产生回顾一下 ApplicationContext 初始化的几个步骤:第一步是刷新环境变量:第二步是刷新 b ...

  4. String... to 可变参数的使用

    public class testMail { public static void fun(int... x) { for(int i = 0;i < x.length;i++) { Syst ...

  5. XXE总结

    0x00 目录 0x01 XML基础 定义:一种标记电子文件使其具有结构性的标记语言,可以用来标记数据.定义数据类型,是一种允许用户对自己的标记语言进行定义的源语言. XML文档结构包括XML声明.D ...

  6. [Hbase]Hbase章2 Hbase读写过程解析

    写数据 Hbase使用memstore和storefile存储对表的更新.数据在更新时首先写入hlog和memstore,memstore中的数据是排序的,当memstore累计到一定的阀值时,就会创 ...

  7. 将hibernate框架融入到spring框架中

    第一步:首先创建表: create table  user( id int(2) primary key,name varchar(20),password varchar(20)); 第二步:建立d ...

  8. java学习第六周

    这是暑假学习的第六周,在这周我练习了老师给的例题,还是有一些地方看不懂,这周我对那些不懂的地方用看视频来进行解答,以及进行第二次复习. 下周我会对Java进行更加详细的复习,做好笔记,在LeetCod ...

  9. shell脚本清空redis库缓存

    前提: 现在做的一个业务系统,用了redis做缓存. 系统做了缓存,通常在系统正常使用的过程中,可以节省很多系统资源,特别是数据库资源. 但是,在开发.测试或者系统遇到问题的时候,也有很麻烦的事情. ...

  10. 859. Buddy Strings

    class Solution { public: bool buddyStrings(string A, string B) { int lenA=A.length(); int lenB=B.len ...