摘要:
以灰度化代码为例procedure Grayscale(const Bitmap:TBitmap);var X: Integer; Y: Integer; PRGB: pRGBTriple; Gray: Byte;begin for Y := 0 to (Bitmap.Height - 1) do begin PRGB := Bitmap.ScanLine[Y]; for X := 0 to (B... 阅读全文
posted @ 2009-01-13 19:58
小洋房
阅读(3926)
评论(1)
推荐(2)

浙公网安备 33010602011771号