//垂直翻转procedure FlipVert(const Bitmap:TBitmap);var i, j: Integer; row1, row2, rowRGB: pRGBTriple; Width, Height: Integer;begin Height := Bitmap.Height; Width := Bitmap.Width; GetMem(rowRGB, Width * 3); for j := 0 to (Height div 2) - 1 do begin row1 := Bitmap.ScanLine[j]; row2 := Bitmap.ScanLine[Height - j -1]; CopyMemory(rowRGB, row1, Width * 3); CopyMemory(row1, row2, Width * 3); CopyMemory(row2, rowRGB, Width * 3); end; FreeMem(rowRGB);end;
上一页 [1] [2]
Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved. 闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)
鄂公网安备 42011102001154号
站长:MinTao ICP备案号:鄂ICP备11006601号-18