文件名称:delphi图片旋转.rar
文件大小:476KB
文件格式:RAR
更新时间:2023-03-18 09:53:33
delphi 图片旋转
delphi 图片旋转 左转90 右转90 顺时针,逆时针旋转 type TForm3 = class(TForm) btn1: TButton; img1: TImage; btn2: TButton; btn3: TButton; btn4: TButton; btn5: TButton; procedure btn1Click(Sender: TObject); procedure btn2Click(Sender: TObject); procedure btn3Click(Sender: TObject); procedure btn4Click(Sender: TObject); procedure btn5Click(Sender: TObject); private { Private declarations } TmpBitMap, desMap: TBitmap; procedure RotateL(Bitmap: TBitmap); procedure RotateR(aBitmap: TBitmap); public { Public declarations } end;
【文件预览】:
uMain.dfm
UCutFigure_JPG.pas
uMain.dcu
xz.dproj.local
UCutFigure_JPG.dcu
uMain.pas
xz.res
xz.identcache
xz.dpr
xz.exe
xz.dproj