自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(5)
  • 收藏
  • 关注

原创 编写一个单独的Web Service for Delphi7(步骤)

早段时间看了一篇好文章,对其整理成以下几步1新建一个SOAP Server Application,在提示输入接口时输入MyHello,把所有文件 保存在一个叫Ser的目录下,其中一个包含TWebModule1的文件保存为main.pas. 在MyHelloIntf.pas的IMyHello接口中加入function Welcome(name:string):string;stdcall;   在

2003-04-14 09:13:00 923

原创 用面向对象方法解决24点问题

算法思路 计算24点,可以抽象描述为:求代数系统的子系统的所有运算结果为24的运算。一般情况下有很多性质,如交换律,i+j=j+i,结合律,i+(j+k)=(i+j)+k等等,为了使我这个惰人写代码方便,我去掉所有规律(这样使运算量加几倍了,呵呵,相信可以用来烤机了),并加上一个一元运算符~,~I=I I属于SInteger,再加上一个似乎破坏了数学完美性的规则,SInteger中的元

2003-03-17 09:00:00 921

原创 简单分析TXMLDocument内部结构

 第一次对TXMLDocument感兴趣,也是第一次使用TXMLDocument的时候,当时,我在修改一个软件,只是想加一点功能,由于时间不多,我决定先做一个接口,再慢慢扩充,但如何使接口扩充性能好,能与各种工具混合,于是我想到了java用XML做配置的方法,语法很多想法来自C++,架构多来自java(上面哪部分想法也是抄自Java,哈哈),实现当然是用Delphi了,于是写了一个配置文件,发现T

2003-02-14 08:58:00 859

原创 用Delphi轻松实现背景播放

Delphi的VCL封装得很好,使用起来很方便,但在计算机世界中并没有完美的程序,本文介绍通过修改TMediaPlay代码实现在任意窗口播放   作者:testnet            日期:2002.11.28  TMediaPlay中有一个Display属性,它是TWinControl类型,TWinControl是第一个拥有窗口句柄(Handle)的VCL类,TMediaPla

2003-01-15 14:45:00 924

原创 一个很简单的加密算法

当时见到一张帖子即兴写了这段代码,还没认真调试过program Project1;{$APPTYPE CONSOLE}uses  SysUtils;const  Key=TESTNET;  Cryptograph=有些事还是不知为妙;//不能为0.5,相加为1  Percent1=0.21;  Percent2=0.79;var  s1:string;function GetKey(a

2003-01-13 17:10:00 1022

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除