P := Bitmap.Scanline[y]; x := 0; while x <= Bitmap.width*3 -1 do begin P[x] := 200; //Blue P[x+1] := 200; //Green P[x+2] := 200; //Red inc(x,3) end;
快速图象处理
原文：http://www.cnblogs.com/yzryc/p/6373602.html
