知识大全用Delphi实现BP机、手机短讯精华篇[2]

Posted 2022-07-14 知

篇首语：无名，天地之始；有名，万物之母。本文由小常识网(cha138.com)小编为大家整理，主要介绍了知识大全用Delphi实现BP机、手机短讯精华篇[2]相关的知识，希望对你有一定的参考价值。

用Delphi实现BP机、手机短讯精华篇[2] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容，让我们赶快一起来看一下吧！

现在以国信寻呼为例它用GET请求就可以实现了发送按钮的程序代码如下

      procedure TForm    Button  Click(Sender: TObject);var callstr:string;begin callstr:=  //tips  gxspace  /cgi  bin/tips/webpaging?stn_id=  +callto  Text+  &page_no=  +tonumber  Text;case RadioGroup    ItemIndex of  :callstr:=callstr+  &pager_type=C  ;  :callstr:=callstr+  &pager_type=N  ;end;callstr:=callstr+  &firstname=  +firstname  text;case RadioGroup    ItemIndex of  :callstr:=callstr+  &title=    ;  :callstr:=callstr+  &title=    ;end; callstr:=callstr+  &msg=  +callmsg  Text+  &answer=null&B  =发送寻呼  ;NMHTTP    InputFileMode := FALSE;NMHTTP    OutputFileMode := FALSE;NMHTTP    ReportLevel := Status_Basic;If ifuseproxy  Checked thenBeginNMHTTP    Proxy := Edit    Text;NMHTTP    ProxyPort := StrToInt(Edit    Text);End;NMHTTP    Get(callstr);end;

有些寻呼(如润迅寻呼就不能用上面的GET请求实现它要用POST请求) 使用与上面相差不大如

下面是NMHTTP的POST用法

      NMHTTP    InputFileMode:=False;NMHTTP    OutputFileMode:=True; NMHTTP    ReportLevel:=Status_Basic;If ifuseproxy  Checked thenBeginNMHTTP    Proxy := Edit    Text;NMHTTP    ProxyPort := StrToInt(Edit    Text);End;With NMHTTP    HeaderInfo do BeginCookie := Edit    Text;LocalMailAddress := Edit    Text;LocalProgram := Edit    Text;Referer := Edit    Text;UserID := Edit    Text;Password := Edit      Text;End;

// 把要提交的数据先放在test txt文件中格式为stnid=A&pageno=

NMHTTP Post( // wocall /script/zbwebcall asp test txt );

file://NMHTTP的具体用法在Delphi安装目前\\Borland\\Delphi \\Demos\\FastNet\\Http下有个NMHTTP

使用的例子

以上都是用NMHTTP实现的其实用Delphi中的WebBrowser组件同样可以完成数据的提交使用是这

样的 Webbrowser OleObject Document FrontPage_Form submit();

说明 WebBrowser 是WebBrowser组件的名 Frontpage_Form 是用WebBrowser打开的网页中的表单名

网页中的表单是这机样的

      ＜FORM action=//message    cn/cgi  bin/ips/webpaging method=post name=FrontPage_Form  ＞              ＜/FORM＞

这样的实现方法就是用程序生成一个已经按用户输入信息生成一个网页然后通过WebBrowser Navigate(生成的网页) 最后提交到服务器Webbrowser OleObject Document FrontPage_Form submit();这样就完成了一次寻呼

四结束语

看到这里该明天网上的BP机手机短讯是怎么回事了吧！

cha138/Article/program/Delphi/201311/24876

摩托罗拉的里程碑一代现在用的是安卓2.1的系统，这个手机可以刷机成安卓2.2的系统吗？你好：这个手机是可以完美升级到安卓2.2的，因为当时刚出2.2的时候就首先推出了里程碑1代的2.2ROM了，而别的

知识大全用手机软体刷机可靠不有没有刷机过的朋友推荐一下手机应用刷机软体

用手机软体刷机可靠不有没有刷机过的朋友推荐一下手机应用刷机软体由于手机所支援的网路是由硬体所确定的，无法通过破解软体或者升级软体系统让手机支援其他运营商的网路的。想下个刷机软体来刷一下手机，不知道刷机

知识大全谁有手机刷机软件，安全可靠的，维修手机用的较多的

谁有手机刷机软件，安全可靠的，维修手机用的较多的三星手机刷机问题：1、三星官网没有手机刷机（fastboot模式\\工厂代码\\工程模式/rom/基带/recovery/水货修改中文）等相关资料提供。

知识大全安卓手机什么刷机软件好用

安卓手机什么刷机软件好用？每种软件其实功能都相差不大。看习惯用哪个，我习惯刷机大师。用什么刷机软件刷安卓手机最好？我现在用的是应用宝的电脑版本。它的工具箱里面有一键刷机t功能。方法与步骤；打开电脑，用

知识大全现在最好用的安卓手机刷机助手有哪几个啊

现在最好用的安卓手机刷机助手有哪几个啊？最好要比较稳定，安全，安卓刷机包比较多的！现在安卓手机刷机助手很多啊，奇兔刷机，刷机大师什么的。。根据我自己和身边那些基友们，他们都是比较喜欢奇兔刷机吧。因为奇

知识大全请问苹果手机已越狱要怎么设置主题啊。请详解

请问苹果手机已越狱要怎么设置主题啊。请详解？打开手机选A屏进入个性化点底部的分类进入模块分为：1.桌布（模块）2.图标（模块）3.拔号（模块）4.短讯（模块）5.桌面（模块）可以选择自己喜欢的模块类型

知识大全手机怎么刷机升级系统

手机怎么刷机升级系统？直要手机用着稳定没毛病就最好不要刷新，刷机后不一定就会变得性能强多少。手机怎么刷机怎么升级系统安卓手机升级其实就是我们说的刷机,通过重装安卓系统以解决一些系统问题工具/原料And

知识大全 iphone4更新固件失败后开不了机，手机上显示一根数据线和iTunes，用itunes

iphone4更新固件失败后开不了机，手机上显示一根数据线和iTunes，用itunes 以下文字资料是由(本站网www.cha138.com)小编为大家搜集整理后发布

知识大全如何给手机换系统，刷机一类的

求高手如何给手机换系统，刷机一类的！山寨机不能刷的，山寨的系统一半都是MTK只能用Java格式（就是字尾是jar）的软体，刷机改系统似乎只有见过手机windows系统可以刷安卓手机如何刷机，换系统no

知识大全最好的手机刷机软件是什么

最好的手机刷机软件是什么？那要看你是什么系统塞班最好的事稀饭破解的JAF特殊的比如C5-03必须用凤凰刷机了！具体去塞班论坛看看三星手机刷机软件最好的1、三星官网没有手机刷机（fastboot模式\\

知识大全 用Delphi实现BP机、手机短讯 精华篇[2]

知识大全用Delphi实现BP机、手机短讯精华篇[2]