Delphi调用http源码实现网站手机号验证码功能

当前位置：首页 > 行业快讯 > Delphi调用http源码实现网站手机号验证码功能

Delphi调用http源码实现网站手机号验证码功能
来源：动力思维乐信　　时间：2016-01-08 11:31

　　对于用Delphi语言开发的网站，可以通过调用http源码来实现网站短信验证码功能，有不少人不知道该如何写代码，下面乐信小编提供Delphi调用http的源码供大家参考，具体可以根据自己的需要进行扩展。

　　unit Unit1;

　　interface

　　uses

　　Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

　　Dialogs, StdCtrls,Unit2;

　　type

　　TForm1 = class(TForm)

　　Button1: TButton;

　　Memo1: TMemo;

　　Edit1: TEdit;

　　Edit2: TEdit;

　　Edit3: TEdit;

　　procedure Button1Click(Sender: TObject);

　　private

　　{ Private declarations }

　　public

　　{ Public declarations }

　　end;

　　var

　　Form1: TForm1;

　　implementation

　　{$R *.dfm}

　　procedure TForm1.Button1Click(Sender: TObject);

　　begin

　　Memo1.Text:=Unit2.GetMyWebServericeSoap(false,'接口地址').Submit('用户名','密码','手机号码','您的验证码是：3567。请不要把验证码泄露给其他人。');