谁能给我一个简单的发短信的软件!!!!!!急!!!!!!!

Question

谁能给我一个简单的发短信的软件!!!!!急!!!!!!!

Answer 1

http://www.delphijs.net/down/view.asp?id=3063
这个看看行不行

Answer 2

用 delphi 实现发送短信2007-05-05 09:36昨天实现了用 java 发送短信，今天就实现用 delphi 发，其实原理都一样，但是看起来好像用 delphi 更简单一些。一、准备工作
请参看 java 发短信的准备工作（点击进入）二、开发环境准备
下载 delphi7 或 delphi2007 均可，我用的是后者，不过 delphi7 一样可以使用 APRO，不用担心版本问题。三、控件准备
下载 TurboPower Async Professional，也就是 APRO 控件，注意版本，必须是 4.0.2 以上的，不然没有发短信控件。将这个控件安装到 delphi 中，会多出 APRO 面板，看到面板时，表明安装成功。四、软件开发
从控件面板中找到 TApdCommPort，TApdTApiDevice，TApdGSMPhone控件，把它们拖到窗体中。然后放入 TLabel，TEdit，TButton，界面如图所示：
然后将TApdCommPort，TApdTApiDevice，TApdGSMPhone进行属性关联。关联完毕后，即可编写代码。双击“选择设备”按钮，写一行代码：双击“发送”按钮，写以下的代码：好了，程序已经完成了，下面就是编译并且运行，发短信时记得填入短信中心的号码，这个号码如果不知道，可以去你的手机上找，肯定有的。 

Answer 3

这儿还有一个// 中文格式编码，s为Unicode String 
function Encode2(var s:WideString):String; 
var 
i,len:Integer; 
cur:Integer; 
t:String; 
begin 
Result:=‘'; 
len:=Length(s); 
i:=1; 
while i<=len do 
begin 
cur:=ord(s[i]); 
//BCD转换 
FmtStr(t,‘％4.4X',[cur]); 
Result:=Result＋t; 
inc(i); 
end; 
end; 
小 结 
以上介绍了PDU格式的短信息编码。建议英文信息长度不超过140个字符，中文信息不要超过54个汉字。如果使用能够支持文本方式的手机进行发送，实现起来更简单。如发送“Hello World!”，用如下的AT指令即可： 
AT＋CGMF=1AT＋CGMS=“13650246680”,129 
>Hello World!<^Z>

Answer 4

这儿还有一个源码
http://download.csdn.net/source/189872

Answer 5

http://www.codesky.net/showhtml/9896.htm
这个
我测试过了，可以