Bitmap Mirror Rotate

The purpose of this unit is to provide a number of bitmap rotating/mirroring routines.

Usage

The 'Interface' part of the unit looks as follows (the documentation is self explaining):

interface

    uses
      Windows, Graphics;

    procedure FlipBitmap(Source, Dest: TBitmap);
    procedure MirrorBitmap(Source, Dest: TBitmap);
    procedure MirrorBitmapHorz(Source, Dest: TBitmap);
    procedure MirrorBitmapVert(Source, Dest: TBitmap);
    procedure RotateBitmap90(Source, Dest: TBitmap);
    procedure RotateBitmap180(Source, Dest: TBitmap);
    procedure RotateBitmap270(Source, Dest: TBitmap);
    procedure TumbleBitmapLeft(Source, Dest: TBitmap);
    procedure TumbleBitmapRight(Source, Dest: TBitmap);
    procedure TurnBitmap(Source, Dest: TBitmap);

Have fun!