Delphi通过调用Http接口实现短信发送的功能
来源：程序员人生 发布时间：2015-08-19 08:23:30 阅读次数：2975次
通过验证码短信http调用接口，您可以很快速的在网站或app中集成手机号验证功能，该源码只是核心代码，具体可以根据您的实际需求进行扩大。
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,'http://106.ihuyi.com/webservice/sms.php').Submit('用户名','密码','手机号码','您的验证码是：2647。请不要把验证码泄漏给其他人。');
end;
end.
自助申请帐户地址：http://www.ihuyi.com/product.php
完全接口文件地址：http://www.ihuyi.com/upload/file/cu-fa-jie-kou.rar
生活不易，码农辛苦
如果您觉得本网站对您的学习有所帮助,可以手机扫描二维码进行捐赠
