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-TwiaTile -
Register -
TwiaTileMode
procedure Register;
TwiaTileMode = (tmFaded, tmTransparent, tmNormal);
WinTypes/WinProcs changed to Windows by Ian Hickson 7/9/96