昨天实现了用 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进行属性关联。关联完毕后，即可编写代码。
双击“选择设备”按钮，写一行代码：
双击“发送”按钮，写以下的代码：
好了，程序已经完成了，下面就是编译并且运行，发短信时记得填入短信中心的号码，这个号码如果不知道，可以去你的手机上找，肯定有的。
