Image Reflection

[AP81]

Hi guys,

I have a TImage on a form which displays images at specified intervals. I am trying to get a transparent reflection working like in this image: http://users.tpg.com.au/jakeadam//prototype1.jpg

What I am doing is getting the image in the first TImage, assigning it to a bitmap, rotating it, then assigning it to the second TImage.

var
  Bitmap : TBitmap;
begin
  Bitmap := TBitmap.Create;

  Bitmap.Assign(imageTop.Picture.Graphic);
  RotateImg(Bitmap);
  ImageBottom.Picture.Assign(Bitmap);
  Bitmap.Free;

I am having trouble getting the transparency in the reflection. Anyone got an ideas on how to do this?

Thanks,
Adam

 

[whosrdaddy]

try this one:

http://www.efg2.com/Lab/Library/Delphi/Graphics/JimHargis_RotateBitMap.zip

-----------------------------------------------------
What You See Is What You Get
Never underestimate tha powah of tha google!

 

[AP81]

Thanks for the reply, but I have the rotating part sorted. It is just the transparency part which is the problem.

I've just done an alpha blend with a light grey bitmap which seems alright, so I think that I am on the right path.

 

[whosrdaddy]

look on this page and search a little bit, you will find what your need....

http://www.efg2.com/Lab/Library/Delphi/Graphics/ImageProcessing.htm

-----------------------------------------------------
What You See Is What You Get
Never underestimate tha powah of tha google!