Solved

Image animation in button

Posted on 1998-08-18
4
273 Views
Last Modified: 2010-04-04
Hello!!
i want to put a little animation in my button at the right
side.
0
Comment
Question by:vis
  • 2
4 Comments
 

Accepted Solution

by:
Mariner080498 earned 50 total points
ID: 1337178
    First  you must use a "bitButon".
After this you must link a file with this button .
Becouse you want animatiion , I propose to use animated
 'gif ' files .


     Regards !




0
 
LVL 7

Expert Comment

by:Motaz
ID: 1337179
Hello Vis try this :

-first drop Image list then add to it for example 3 bitmpas.
-second drop bitbtn
-finally drop a timer then add this code to it's event handler :


procedure TForm1.Timer1Timer(Sender: TObject);
begin
 Count:=(Count mod 3)+1;
 BitBtn1.Glyph.FreeImage;
 BitBtn1.Glyph:=nil;
 ImageList1.GetBitMap(Count-1,BitBtn1.Glyph);
end;

Motaz..
0
 
LVL 7

Expert Comment

by:Motaz
ID: 1337180
Sorry I forget to check to the answer radio button so that my answer became as comment but it is answer. Vis which answer did you accept mine or Marinor's one ?.

Motaz
motaz1@yahoo.com
0
 
LVL 1

Expert Comment

by:skatan187
ID: 1337181
I know a unit to use animated gifs..
I am not planning to do it.. but I am sure that you can make
a new component wich can load animated glymps :)
get the source and the tgifimage component here:
http://www.dataweb.nl/~r.p.sterkenburg
0

Featured Post

3 Use Cases for Connected Systems

Our Dev teams are like yours. They’re continually cranking out code for new features/bugs fixes, testing, deploying, testing some more, responding to production monitoring events and more. It’s complex. So, we thought you’d like to see what’s working for us.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Delphi Dbf export problem to a Visual Foxpro application 6 190
Dev Express grid collapse 2 45
control image tags in a string ? 12 134
PHP preg_replace code convert to Delphi 14 57
The uses clause is one of those things that just tends to grow and grow. Most of the time this is in the main form, as it's from this form that all others are called. If you have a big application (including many forms), the uses clause in the in…
Have you ever had your Delphi form/application just hanging while waiting for data to load? This is the article to read if you want to learn some things about adding threads for data loading in the background. First, I'll setup a general applica…
This video shows how to quickly and easily add an email signature for all users on Exchange 2016. The resulting signature is applied on a server level by Exchange Online. The email signature template has been downloaded from: www.mail-signatures…
Nobody understands Phishing better than an anti-spam company. That’s why we are providing Phishing Awareness Training to our customers. According to a report by Verizon, only 3% of targeted users report malicious emails to management. With compan…

803 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question