引言:
实际工作中,需要编写一个Windows服务,以实现分布式呼叫计费控制功能,当然,这个项目是由偶来完成啦,经过了俩周的开发终于被偶一举搞掂!再经过多次测试-修复-登记缺陷-再测试之后,一切OK了!
哈哈…………:)
高兴之余,在Windo...
摘要:
报名机器人
昨天帮人报一个参加日语能力考试的朋友报名,无奈报名比较火暴,到处名额已满,需要不断重试碰运气。想到本科的时候,老师组织我们去上机,结果是帮人报tofel的名,那场景,如打仗一般,大家先对表,精确到秒。先把表单的数据填好,等时间一到,马上按提交按钮。早了不行,要重定向回来充填好几项数据耽误时间,晚了也不行,要不就是报满,要不就是服务器负荷太重处理不过来。记得当时前后花了半个小时,每人......
摘要:
program genbig5code;
{$apptype console}
uses
sysutils;
var
i, j: byte;
mbig5file: textfile;
begin
assignfile(mbig5file, c:\big5code.bin);
rewrite(mbig5file);
//big5字符集范围: 高位$a1~......
为Windows Service添加服务描述
实际工作中,需要编写一个windows服务,以实现分布式呼叫计费控制功能,当然,这个项目是由偶来完成啦,经过了俩周的开发终于被偶一举搞掂!再经过多次测试-修复-登记缺陷-再测试之后,一切ok了!
高兴之余,在windows服务浏览器中无意中发现,我的服务pp(指服务描述)后面怎么是空的!:(这玩意儿可是关键东东,也是公司形象问题嘛,何况要是没有它服务怪不好看的,是吧?哈哈.之后的工作就是浏览偶公司那正正版版的微软msdn,好不容易找到能够让偶修改的方法了.先说声“再见”,因为下面代码展示完后偶就要结束文章了,嘿嘿. 【程序编程相关:ShadowStarCodeFast使用】
哈哈…………:) 【推荐阅读:ShadowStarCodeFastV0】
void reconfigureservice(lpstr lpservicename, lpstr lpdesc) 【扩展信息:ShadowStarFastEditor】
方法:changeserviceconfig2函数,具体实现如下:
{ sc_handle schscmanager = ::openscmanager(null, null, sc_manager_all_access); if (schscmanager != null) { // need to acquire database lock before reconfiguring. sc_lock scllock = lockservicedatabase(schscmanager); if (scllock != null) { ...
下一页 摘要:
tnetimage类
源代码
// unetimge .pas 屏幕图像相关操作
{{
作者:蛐蛐
时间:2004.5.26
}
unit unetimage;
interface
uses
classes, windows, graphics, forms, jpeg, sysutils,
idtcpserver, idtcpclient,unetcomm......