Class TTileImage (unit Tiles)

Inherits from

TImage

TTileImage

Constructors



Functions

procedure MYPaint(MyCanvas: TCanvas);


procedure SetTile(Value: Boolean);

{$R BUTTONS.

procedure WMPaint(var Message: TWMPaint);


Properties

property Tile : Boolean


Events

Variables

fTile : Boolean;



Constructors


Functions


procedure MYPaint(MyCanvas: TCanvas);


procedure SetTile(Value: Boolean);

{$R BUTTONS.RES} { TileImage


procedure WMPaint(var Message: TWMPaint);


Properties


property Tile : Boolean


Events


Variables


fTile : Boolean;