Delphi图像处理中ScanLine的使用
一般我们在Delphi中进行图像处理时采用Pixels像素点赋值的方法，Delphi代码如下：
var
x,y:Integer;
cColor:TColor;
begin
for y:=0 to Image1.Height-1 do
for x:=0 to Image1.Width-1 do
cColor:=Image1.Canvas.Pixels[i,j];
end;
但是这种方法有个缺点，处理速度很慢，小图像还可以，对于大点的图像来说就太慢了。
Delphi提供了一种扫描线ScanLine方法是对图像的一行进行扫描，获取本行中各像素的内存地址。众所周知，内存操作肯定会比常规的像素点赋值速度快很多，所以将大大提高图像的处理速度。
Delphi代码如下：
var
P:array[0..100] of PByteArray;//像素数组
y:Integer;
begin
for y:=0 to Bmp.Height-1 do
begin
P[y]:=Bmp.ScanLine[y];//将图片所有像素值存入P
end;
end;
这样就将一个图像的所有像素都存入了P这个数组
在SysUtils单元中可以看出PByteArray实际上是一个Byte类型的数组
所以我们声明的P:array[0..100] of PByteArray;实际上可以看成是一个二维数组
P数组就是一个图像像素的缓冲区，它的一维是图像Y坐标，二维是图像的X坐标。
这样，如果我们要对图像的某个像素赋值，例如将第一行、第二列的像素赋值为白色，可用下面的Delphi代码
var
P:array[0..100] of PByteArray;//像素数组
x,y:Integer;
begin
for y:=0 to Bmp.Height-1 do
begin
P[y]:=Bmp.ScanLine[y];//将图片所有像素值存入P
end;
y:=0;//第一行
x:=1;//第二列
P[y][x*3]:=255;//像素的第一字节
P[y][x*3+1]:=255;//像素的第二字节
P[y][x*3+2]:=255;//像素的第三字节
end;
上面的代码中，我们使用的图像是24位色的(TPixelFormat:=pf24bit)，也就是一张真彩色的图片，pf24bit的图像中，每个像素在内存中占用三个字节，分别表示RGB值的分量，所以我们可以对三个字节直接赋值
在其它类型的图像中就不一定能这样赋值了
TPixelFormat:=pf1bit的图像(单色图)中每像素用1位来表示，所以要使用位操作来给像素赋值
TPixelFormat:=pf4bit的图像中每像素用4位来表示，也要使用位操作来给像素赋值
TPixelFormat:=pf8bit的图像中每像素用8位来表示，可以使用Byte类型的值给像素赋值，不过这类图像比�
相关文档：
Delphi操作注册表步骤如下：
-------------------------------------
1）在Uses中添加Registry单元；
2）声明TRegistry对象；
3）创建TRegistry对象；
4）指定根键；
----------------try------------------
5）打开需要操作的主键；
6）读写操作；
7）保存并关闭主键；
--------------finally----------------
......
开发步骤：
1、创建ActiveX Library工程。
2、创建COM Object。
3、创建Type Library，并创建相应接口。
4、创建接口对应的函数和实现。
具体如下：
1、创建ActiveX Library工程。
new|other|activeX|activeX library
Delphi会自动生成框架代码，直接编译的话就可以得到一个dll文件了；
如果想编译出来的是ocx文 ......
开发步骤：
1、创建ActiveX Library工程。
2、创建COM Object。
3、创建Type Library，并创建相应接口。
4、创建接口对应的函数和实现。
具体如下：
1、创建COM Object。
new|other|activeX|com object
在Class Name(本例里类名里填Object，可按自己需要填写) 填写类名.(Instancing:实例创建方式,Threading Model:� ......
一提起基于Web Services技术的应用程序开发，一般人首先想到的开发工具是Vs.net，其实作为快速应用程序开发工具(RAD)的老大，Delphi从6.0就开始支持Web Services的开发和应用了，本文通过使用Delphi 7.0调用新浪发送短信的Web Service进行短信应用程序开发这一实例详细的介绍在Delphi中如何开发基于Web Services的应用系统� ......
分类
运算符
操作
操作数
结果类型
范例
算术运算符
+
加
整数，实数
整数，实数
X + Y
-
减
整数，实数
整数，实数
Result - 1
*
乘
整数，实数
整数，实数
P * InterestRate
/
实数除
整数，实数
实数
X / 2
div
整数除
整数
整数
Total div UnitSize
mod
取模
整数
整数
Y mod 6
......
