delphi 7 用 APRO 做一个发短信的程序
在网上看到一点资料：
出于好奇和兴趣就做着试试： 但是运行不起来，请看最下边
昨天实现了用 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进行属性关联。关联完毕后，即可编写代码。
双击“选择设备”按钮，写一行代码：
apdtapidevice1.selectdevice;
双击“发送”按钮，写以下的代码：
if apdcomport1.selectdevice=0 then
apdtapidevice1.selectdevice;
apdcomport1.open:=true;
apdGSMphone1.smsaddress:=edit1.text;
apdGSMphone1.smscenter:=edit2.text;
apdGSMphone1.smsmessage:=edit3.text;
try
apdGSMphone1.sendmessgae;
showmessage('成功');
except
showmessage('失败');
end;
apdcomport1.open:=false;
好了，程序已经完成了，下面就是编译并且运行，发短信时记得填入短信中心的号码，这个号码如果不知道，可以去你的手机上找，肯定有的。
以上是资料
我做好以后运行程序，发送手机号码：15851354584（这个号码是我随便写的，运行时用的实际手机号码）手机中心用的是手机里查到的：13800510500 发送内容随便写：1234
单击发送后出现 device selected 选择框，我选择了direct to COM2 点击OK 然后要等到很长一段时间，程序才提示发送失败。
请教各位大神，我这个程序出错在哪里，为什么不能发送，还需要其他什么硬件条件嘛？？？？最好大家写清楚点，谢谢各位了
[解决办法]
direct to COM2 我想这个COM2就是了吧，不过不知道为什么不成功
