摘要：
校验码辅导讲座
老顽童（原创）
二进制数据经过传送、存取等环节，会发生误码（1变成0或0变成1），这就有如何发现及纠正误码的问题。所有解决此类问题的方法就是在原始数据（数码位）基础上增加几位校验（冗余）位。
一、码距
一个编码系统中任意两个合法编码（码字）之间不同的二进数位（bit）数叫这两个码字的码距，而整个编码系统中任意两个码字的的最小距离就是该编码系统的码距。
如图1所示的一个......
摘要：
7.2.1 windows的dde原理 windows的dde机制基于windows的消息机制。两个windows应用程序通过相互之间传递dde消息进行dde会话(conversation)，从而完成数据的请求、应答、传输。这两个应用程序分别称为服务器(server)和客户(client)。服务器是数据的提供者，客户是数据的请求和接受者。dde会话由客户程序启动。客户程序把一条消息(wm_dde......
对齐到网格
var
igridsize : integer = 16;
procedure tform1.formpaint(sender: tobject);
var
i, j : integer;
begin
self.doublebuffered := true;
for i := 0 to self.width do
for j := 0 to self.height do
if (j mod igridsize = 0) and (i mod igridsize = 0) then
self.canvas.pixels[i, j] := clnavy;
end;
procedure tform1.shape1mousedown(sender: tobject; button: tmousebutton;
shift: tshiftstate; x, y: integer);
begin
if button = mbleft then
begin
self.ioldx := x;
self.ioldy := y;
end;
end;
procedure tform1.shape1mousemove(sender: tobject; shift: tshiftstate; x,
y: integer);
begin
if ssleft in shift then
begin
shape1.left := shape1.left + x - ioldx;
shape1.top := shape1.top + y - ioldy;
end...
下一页 摘要：
类 别:com & activex(一) 使用动态创建的方法首先创建 excel 对象,使用comobj:var excelapp: variant;excelapp := createoleobject( excel.application );1) 显示当前窗口:excelapp.visible := true;2) 更改 excel 标题栏:excelapp.caption := ......
