TCustomResizeBitmap

type TCustomResizeBitmap = class(TPersistent)

protected

  FOwner: TControl;

  FBorderWidth: Integer;

  FBorderHeight: Integer;

  FDrawMode: TDrawMode;

  FResampleMode: TResampleMode;

  FResampleFilter: TResampleFilter;

  FEnable: Boolean; deprecated ;

  FFillLeft: Boolean;

  FFillTop: Boolean;

  FFillRight: Boolean;

  FFillBottom: Boolean;

  FFillCenter: Boolean;

  procedure SetFBorderHeight();

  procedure SetFBorderWidth();

  procedure SetFDrawMode();

  procedure SetFEnable();

  procedure SetFFillBottom();

  procedure SetFFillCenter();

  procedure SetFFillLeft();

  procedure SetFFillRight();

  procedure SetFFillTop();

  procedure SetFResampleFilter();

  procedure SetFResampleMode();

public

  constructor Create();

  destructor Destroy; override;

published

  property BorderWidth: Integer; [rw]

  property BorderHeight: Integer; [rw]

  property DrawMode: TDrawMode; [rw]

  property ResampleMode: TResampleMode; [rw]

  property ResampleFilter: TResampleFilter; [rw]

  property Enable: Boolean; [rw]

  property FillLeft: Boolean; [rw]

  property FillTop: Boolean; [rw]

  property FillRight: Boolean; [rw]

  property FillBottom: Boolean; [rw]

  property FillCenter: Boolean; [rw]

end;

TCustomResizeBitmap

TObject