- Delphi一位图水平镜像的代码 2011-09-03 点击:465 评论:0
- Delphi一位图垂直镜像代码 2011-09-03 点击:415 评论:0
var I,J :integer; p,p1 :PByteArray; Bmp,Bmp1 :TBitmap;begin Bmp :=TBitmap.Create; Bmp.Assi...
procedure VertMirror(pBitMap:TBitmap);var bmp1: TBitmap; j: integer; p, p1: pByteArray;beg...