- 博客(5)
- 收藏
- 关注
原创 单机模式实现数据网络共享
自从有了云盘,单机模式实现数据网络共享非常方便,而且容易操作。比如A,B,C共3台电脑,A为主,B,C为辅。在3台电脑上都装上云盘(比如百度云同步盘、微云同步盘,共享一个账号),本地文件夹就可以同步共享了。但是3台电脑同时间对同一文件进行写操作,会出现冲突。但是同时间对同一文件进行读操作,不会有冲突。为此,在共享文件夹里面建一个主数据文件Master.dat,这个主数据文件,3台电脑都可以出直接读
2015-05-17 09:36:32 1022
原创 双色球红球序值对应码表及计算公式
sheet1:array [1..28] of integer=(0,201376,371287,513793,632548,730828,811558,877338,930468,972972,1006621,1032955,1053304,1068808,1080436,1089004,1095192,1099560,1102563,1104565,1105852,1106644,11
2011-12-25 01:25:18 14512
原创 Delphi不用DLL方式拦截全局外壳程序(Shell application)消息
拦截全局外壳程序窗体消息,一般都要用DLL创建WH_SHELL钩子,但有个非公开的API函数RegisterShellHookWindow,绑定一个handle句柄,然后注册SHELLHOOK消息后,就可以在handle句柄消息处理的过程中处理以下wParam值 HSHELL_WINDOWCREATED = $0001; // 系统级的窗体被创建 HSHELL_WINDOW
2010-05-22 09:14:00 1505
原创 DelPhi下用CDO发送邮箱实例(授权码CDO发送邮箱的解决办法)
相对用第三方控件,CDO发送邮件还是很简洁方便的注:CDONTS为CDO的子集,仅支持WinNT/Win2K,WinXP以上请用CDO; 单元引用ComObj; procedure TForm1.Button1Click(Sender: TObject);varVCDOMessage:oleVariant;begin vCDOMessage:=CreateOleObje
2010-05-06 08:40:00 2400
原创 BASE64编码基于十进制的实现方法
一、BASE64编码的原理 BASE64编码 的原理很简单,其方法是,将输入数据流每次取6 bit(每bit代表1位二进制),不足6bit的补0,这样,每3个8位字节将编码为4个6位字节(3×8 → 4×6);不满4个字节的以“=”填充。其实这4个六位字节 仍然是8位,只不过高两位被设置为0。当一个字节只有6位有效时,它的取值空间为0 到 2的6次方减1 即63,也就是说被转换的Base64编码
2004-07-31 20:23:00 2180 1
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人