Page 1 of 1

MarqueeImageEvent

PostPosted: October 21st, 2011, 7:13 pm
by surfer007
Hi,

do you have a small example how to use the TMarqueeImageEvent?
I want to have a image in the scroller, but the image shall be loaded not from file, just assign it from a TImage.

At the moment i use <img src="favicon.ico" width="16" height="16" /> which works.
But sometimes the image is not shown so i think its maybe a path problem?

Trying with the Image Event like this is not working:

Code: Select all
procedure TForm1.RealTimeMarqueeImage(Sender: TObject;
  const URI: WideString; Image: TPicture);
begin
  Image := ImageStar.Picture;
end;


Thanks...

Re: MarqueeImageEvent

PostPosted: October 23rd, 2011, 5:03 pm
by Kambiz
Try this code

Code: Select all
procedure TForm1.RealTimeMarqueeImage(Sender: TObject;
  const URI: WideString; Image: TPicture);
begin
  Image.Assign(ImageStar.Picture);
end;

Re: MarqueeImageEvent

PostPosted: March 18th, 2013, 4:35 am
by profh
is it able to extrude one line upward, and stay 1 second, then the next line...
it looks cool.

thanks.

Re: MarqueeImageEvent

PostPosted: March 19th, 2013, 7:50 pm
by Kambiz
It's possible but you have to write your own controlling logic.