Unit wiaTile

Backwards Compatibility - when this is defined, this version (2.01) is compatible with 2.00 and 1.00 1.00 defined Transparent:Boolean, 2.00 defined Faded:Boolean, and 2.01 got rid of them both. Except that I did actually leave them in, and this switch controls whether to compile that code or not. {$DEFINE DEBUG} { Version 2.01 Modified exxieh@bath.ac.uk Now fades bitmap, by default, to clBtnHighlight Defaults to alClient alignment ----------------------------------------------------------------------// Copyright (C) 1996 Word in Action. All Rights Reserved. Copyright © 1996 by Ian Hickson. Project : Tile Component Company : Word in Action Files : wiaTile.pas, wiaTile.dcr, readme.txt, demo\*.* Overview: This file is a control that allows an image to be tiled and is released into the public domain for your own useage although Word in Action and Ian Hickson retain the Copyright. Authors : Jay Giganti, Ian Hickson EMail : Jay Giganti -- CompuServe ID: [72037,2225] Ian Hickson -- exxieh@bath.ac.uk 72037.2225@compuserve.com -- http://ourworld.compuserve.com/homepages/jrg wordinaction@hypercon.com -- http://www.hypercon.com/wordinaction/ Ian Hickson -- http://www.bath.ac.uk/~exxieh Please inform us of any comments, suggestions or improvements: *** Now for the stuff that we have unfortunately been driven to *** RIGHTS: Title, ownership rights, and intellectual property rights in and to the Software shall remain in Word in Action and/or its suppliers. The Software is protected by the copyright laws of the United States and international copyright treaties. This License gives you no rights to such content. DISCLAIMER: This code is for demonstration purposes only and should be used at your own risk. Since the Software is provided free of charge, the Software is provided on an "AS IS" basis, without warranty of any kind, including without limitation the warranties of merchantability, fitness for a particular purpose and non-infringement. The entire risk as to the quality and performance of the Software is borne by you. Should the Software prove defective, you and not Word in Action assume the entire cost of any service and repair. In addition, you must determine that the Software sufficiently meets your requirements. This disclaimer of warranty constitutes an essential part of the agreement. SOME STATES DO NOT ALLOW EXCLUSIONS OF AN IMPLIED WARRANTY, SO THIS DISCLAIMER MAY NOT APPLY TO YOU AND YOU MAY HAVE OTHER LEGAL RIGHTS THAT VARY FROM STATE TO STATE OR BY JURISDICTION. LIMITATIONS: LIABILITY -- UNDER NO CIRCUMSTANCES AND UNDER NO LEGAL THEORY, TORT, CONTRACT, OR OTHERWISE, SHALL Word in Action OR ITS SUPPLIERS OR RESELLERS BE LIABLE TO YOU OR ANY OTHER PERSON FOR ANY INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES OF ANY CHARACTER INCLUDING, WITHOUT LIMITATION, DAMAGES FOR LOSS OF GOODWILL, WORK STOPPAGE, COMPUTER FAILURE OR MALFUNCTION, OR ANY AND ALL OTHER COMMERCIAL DAMAGES OR LOSSES. IN NO EVENT WILL Word in Action BE LIABLE FOR ANY DAMAGES IN EXCESS OF Word in Action's LIST PRICE FOR A LICENSE TO THE SOFTWARE, EVEN IF Word in Action SHALL HAVE BEEN INFORMED OF THE POSSIBILITY OF SUCH DAMAGES, OR FOR ANY CLAIM BY ANY OTHER PARTY. THIS LIMITATION OF LIABILITY SHALL NOT APPLY TO LIABILITY FOR DEATH OR PERSONAL INJURY TO THE EXTENT APPLICABLE LAW PROHIBITS SUCH LIMITATION. FURTHERMORE, SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF INCIDENTAL OR CONSEQUENTIAL DAMAGES, SO THIS LIMITATION AND EXCLUSION MAY NOT APPLY TO YOU. ----------------------------------------------------------------------// Please note that I (Ian Hickson) am not related to Word in Action. But I also decline all responsability. ----------------------------------------------------------------------// Version Information [month/day] Date Ver Comments ======== ===== =========================================================== 01/26/96 1.00 Created this component 12/01/96 2.00 modificatios by Ian Hickson 12/07/96 2.01 bug fix for 2.00 (do I feel stupid or what) } {$A+,B-,F-,G+,I+,K+,N+,P+,T+,V+,W-,X+} {$IFNDEF DEBUG} {$D-,L-,Q-,R-,S-,Y-

Classes

TwiaTile -

Functions

Register -

Types

TwiaTileMode

Constants

Variables


Functions


procedure Register;


Types


TwiaTileMode = (tmFaded, tmTransparent, tmNormal);
WinTypes/WinProcs changed to Windows by Ian Hickson 7/9/96

Constants


Variables