用Delphi和Web Services开发短信应用程序
摘
要：本文通过使用Delphi和WebServices技术开发短信应用程序的实例详细的介绍了如何在Delphi中开发基于WebServices技术
的应用程序。
关键字：Delphi；WebService；短信应用程序开发
一提起基于WebServices技术的应用程序开发，一般人首先想到的开发工具是VS.net，其实作为快速应用程序开发工具
(RAD)的老大，Delphi从6.0就开始支持WebServices的开发和应用了，本文通过使用Delphi7.0调用新浪发送短信的
WebService进行短信应用程序开发这一实例详细的介绍在Delphi中如何开发基于WebServices的应用系统。
第一
步，准备工作，了解新浪短信WebService。新浪发送短信的WebService地址是http://smsinter.sina.com.cn
/ws/smswebservice0101.wsdl，该WebService就只有一个方法，即
stringsendXML(carrier,userid,password,mobilenumber,content,msgtype)。各个参数
全部为string类型，其含义基本如下（可能不正确）。
Carrier：运营商名称，好像可以随便输，建议输入“Sina”，如果
输入其他的值，消息发送的特别慢；
Userid：您在新浪无线上注册的手机ID，如果您没有在http://sms.sina.com.cn
上注册您的手机，你是无法使用本WebService发送短信的；
Password：您在新浪无线上注册手机时所使用的密码；
Mobilenumber：对方的手机号码；
Content：发送短消息的内容；
Msgtype：发送短消息的类型，我估计支持
彩信，不过我不知道怎么使用，似乎随便输什么都可以，我使用的是“Text”。
资费标准请参看新浪无线网站上的相关说明，应该是一条一角钱，不过也或者是一条两角线，具体不太清楚。由于其后台可能使用了消息队列机制，
在繁忙的时候，可能会有较长时间的延迟。
第二步，先
建立一个空白的应用程序。运行Delphi7，打开[File]->[New]->[Application]菜单，Delphi自动生成一
个默认的工程。将默认的窗体Form1改为sms，然后将改工程保存为smsdemo.prj。如下图所示：
图1
http://www.mscto.com
第三步，引入WebService。，打开[File]->[New]->[Other]菜单，在弹出的窗口中选择
WebServicesTab页面，然后选择其中的WSDLimporter选项，单击OK按钮弹出WSDLimporterWizard窗口，如图2所
示。在其上的LocationofWSDLFileorURL中输入：http://smsinter.sina.com.cn/ws
/smswebservice0101.wsdl（注意，千万不能输�
相关文档：
由于需要在窗体中设定一个日期时间，出去通用型考虑，采用了TDateTimePicker控件。
因为这个控件的默认状态只能显示日期，造成使用上的不便，所以需要做如下的设定：
在控件的format属性栏里设置如下值：yyyy-mm-dd hh:mm:ss；
设定完成后的时间为当前的系统时间，不能通过弹出日历设定，只能在文本框中设定。 ......
转:DELPHI 中如何提升进程令牌
近一段时间在用DELPHI写个程序,当我写到一个结束其他进程的模块的时候有时不成功,那是因为其他进程,如病毒进程的权限高,通过常规的结束进程的函数行不通,要首先提高自身程序的权限,再结束其他进程
在网上也看到了一些提升进程令牌的函数但都不怎么好用,最后我还是从一个黑客后门程序的源代� ......
这是一个实例：
procedure TMainForm.Button1Click(Sender: TObject);
var
arr:array of array of string;
begin
setlength(arr,2,3);
arr[1,2]:='this is a test';
setlength(arr,0,0);
setlength(arr,4,5);
showmessage(arr[1,2]);
end;
声明一个二维数组的方法是� ......
最近开发程序需要使用TList功能，转载此文章，以作参考。
看了这里标题，大家可能以为我会谈TListBox控件，那就错了。我要谈的是Delphi提供给我们的具有列表性质的类：TstringList、TList和TObjectList。TstringList用来存放字符串，TList存放指针，而TObjectList则存放对象(Object)。
在我们使用Delphi 的过程中，有很多 ......
