- 博客(5)
- 收藏
- 关注
RSS订阅
原创 单机模式实现数据网络共享
自从有了云盘，单机模式实现数据网络共享非常方便，而且容易操作。比如A，B，C共3台电脑，A为主，B，C为辅。在3台电脑上都装上云盘（比如百度云同步盘、微云同步盘，共享一个账号），本地文件夹就可以同步共享了。但是3台电脑同时间对同一文件进行写操作，会出现冲突。但是同时间对同一文件进行读操作，不会有冲突。为此，在共享文件夹里面建一个主数据文件Master.dat，这个主数据文件，3台电脑都可以出直接读
2015-05-17 09:36:32
1005
原创 双色球红球序值对应码表及计算公式
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
14222
原创 Delphi不用DLL方式拦截全局外壳程序（Shell application）消息
拦截全局外壳程序窗体消息，一般都要用DLL创建WH_SHELL钩子，但有个非公开的API函数RegisterShellHookWindow，绑定一个handle句柄，然后注册SHELLHOOK消息后，就可以在handle句柄消息处理的过程中处理以下wParam值 HSHELL_WINDOWCREATED = $0001; // 系统级的窗体被创建 HSHELL_WINDOW
2010-05-22 09:14:00
1492
原创 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
2380
原创 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
2136
1
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人