The propose of this component is to display a REAL TRANSPARENT image
and detect when your mouse cursor is on top of the transparent
part or not.
My name's Nuno Antunes and I'm from Portugal (sorry about the
english).
Most of the code presented in this component was copied from
the TAnimated component made by L. David Baldwin (greetings).
Why a REAL TRANSPARENT IMAGE?
Because most of the components that circle the net and say
that are Transparent, are not. Most of them replaces the selected
color (known as transparent) with the color of the form or panel
that's behind. If you have a bitmap in the back, you are unable to
see it.
This component has been tested on top of BMPs, GIFs and PCXs and
works fine. You are now able to see the grafic thats behind your
component.
In my programs I needed to know when the
mouse is over the picture or is over the transparent part.
With this in mind I've created a property called
< CursorOverImage > that gives the value in that moment.
The best place to test this property is on the events
I've used this component in Delphi 1, but I suppose that it works
fine in Delphi 2.
Any questions please feel free to e-mail me.
Like it was then, this component is freeware and should be distributed
as such.
When distribuiting this component leave this message intact, and if you
use it for any purpose give credit to the authors.
If you improve the component please tell the authors, they would like
to know.
Check my other component TIPS, you can find it on my homepage
http://www.rumos.pt/~nma/
or in the Delphi Super Page
http://sunsite.icm.edu.pl/delphi/
TTranImage -
Register -
procedure Register;