引言：
M 作 者: cn_prince(欢喜王子) 2001-06-11 20:58:55 :0 :0
[回复] [打包] [转贴]
我尚无缘得见新版本的Delphi。
摘要：function getcpuspeed: comp;
{ function to return the cpu clock speed only.}
{ usage: messagedlg(format(%.1f mhz, [getcpuspeed]),
mtconfirmation, [mbok], 0); }
var
t: dword;
mhi, mlo, nhi, ......
摘要：procedure tform1.getversioninfo;
const
n_info = 10;
infostr : array [1..n_info] of string =
(companyname, filedescription, fileversion, internalname,
legalcopyright, legaltrademarks, original......
用Delphi 5创建Web Services
m 作 者: cn_prince(欢喜王子) 2001-06-11 20:58:55 :0 :0 【程序编程相关:
在delphi中使用xml文档有两种方】 【推荐阅读:
怎样做sql server数据库的还原
】
[回复] [打包] [转贴] 【扩展信息:
[red]如何使用Delphi设计强大】
我尚无缘得见新版本的delphi.据可靠消息称,它提供对soap--web services的基础--的全面支持,而扔弃了borland midas.
为什么这只软件大鲨会对web services如此钟情?他们的动机很容易明白.web services意味着不用再卖产品,而是卖服务.不再会有盗版.版权受到完全保护:制造商独家保有软件.与消费者签订的合同将会是长期的.而且如同上瘾一半,用户用得越多,就越是想用.对于大企业来说这就是白花花的银子.用户忠诚与集权.从坏处想,web services也有可能使客户的交流与日常生活被主宰--新资本主义革命的混合体以及"大哥"--噩梦.
有人希望那只是刺激的白日梦.只有在未来才能看到web services在社会中所起的作用.但无庸置疑,它们已经使业界产生了极大的改变,就像pc与internet的出现一样.而我们,开发人员,必须做好准备.
这里有一个简单的例子--执行某个数学计算,x+y什么的.（这是一个高度抽象的例子;你可以把它投射到真实世界中）.以前,要完成这个任务,用这样的代码:
function havesum (x: integer; y: integer): integer;
begin
result:=x+y;
end;
后来,人们发明了oop（面向对象编程）.于是我们就有了一个包括两个整数值与一个getsum方法的thavesum类,然后用它创建一个对象实例.在设计层面上,这显得既雅致又高效（此出就不再继续讨论oop的好处了）.跟着是微软的com.对象不再只是被创建,更是一个生命体.程序设计变成协调所有这些生命体,完成某种任务,而非单纯做一个工匠的工作.
问题在于这些生命体并非都易于伺候,但microsoft office仍然实现了这一策略.理论上com被设计为可以接收远程调用,如果一个办公室里有20个用户想知道x+y到底等于几,我们就只需要创建一个ihavesum com,然后分发.销售.回答所有这些用户的问题.
现在,web services之梦来了:不分发产品,而是分发服务.如果谁要求服务,就要呼叫分发者执行,并且为服务付钱.软件用户与软件产品完全隔绝,他只关心产品给出的结果（而那就是在已然过去了的"黄金时代"里,购买或合法拷贝的真正原因）.
简单的delphi 5例子
web services的两大柱石--http与xml已经为delphi开发者所熟知了....
下一页 摘要： 本 文 将 向 大 家 介 绍 怎 样 编 写自 己 的 信 箱 监 视 程 序， 程 序 将 直 接 调 用winsock 函 数 来 进 行网 络 通 信。 除 了 具 备winsock 编 程 知 识 之 外， 还 必 须 了 解pop3 协 议。 下 面 是 对pop3 的 一 个 粗 略 的 介 绍， 读 者 可 以 参 看rfc 1225 更 为 详 细 地 了 解 该 协 议。 ......
