• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号
登陆 注册

Delphi2007已内部支持GIF动画了

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

以前要在 Delphi 中显示 GIF 动画，一种办法是使用第三方组件，别一种方法就是使用 WebBrowser 组件。在 Delphi 2007 中，其内部已支持 GIF 了（可能在 Delphi 2005 和 Delphi 2006 中已支持了，未确认）。
关于 GIF 的相关类是 TGIFImage，在 GIFImg 单元中，看下面的代码，窗体中的 GIF 就动起来了：

 


uses GIFImg;

procedure TForm1.FormCreate(Sender: TObject);
begin
// 先在窗体上放一个 TImage 组件：Image1；
  Image1.Picture.LoadFromFile('C:\Example.gif');
// AnimationSpeed 设定动画速度，值越大，速度越快；
  TGIFImage(Image1.Picture.Graphic).AnimationSpeed := 500;
  TGIFImage(Image1.Picture.Graphic).Animate := True;
end;



 
                    
            
                

                  
 		
                      

                    

                     
                                        
                    
 
                       
                    
                    
 
                      





鲜花




握手




雷人




路过




鸡蛋







 
                    

                    
                     
                    
                    
 
                    
                  

                   
                  
                   
                  
                

                 
                
                
                
                 
                 
                

  
 
    该文章已有0人参与评论
    
请发表评论

    
  

  
 
    
     
    
        
    
    
    










                













                



    
    
    

   
    
         

    
全部评论

     
    
    
        

    

              

  




 
                     
                

            

            
                    

    	

            
            

                

                    
专题导读

                    
More+

                    

                

                

                    
                    
                

            


                        

                

                	
上一篇：

                    matlab练习程序（zs图像细化）发布时间：2022-07-18                    
下一篇：

                    MATLAB图像处理学习笔记4发布时间：2022-07-18                    

                

            

                        
            

                

                    
热门推荐

                    
More+

                    

                

                

                    
                    

                    

                

                
            

            
            

                

                    
热门话题

                    
More+

                    

                

                

                    
                

            

            
            

                

                    

                    
                

            

            
            

                

                    
阅读排行榜

                    

                    

                

                

                    
                

                
            

            
            

                

                    
                    
                

            

        

    	












	

    
    

    	

        	

            	

                	
                

            	

                	

                    

                    	
扫描微信二维码

                        
查看手机版网站

                        
随时了解更新最新资讯

                    

                    

                

            	

                	

                    	
139-2527-9053

                        
在线客服（服务时间 9:00～18:00）

                        在线QQ客服
                    

                    
地址：深圳市南山区西丽大学城创智工业园

                    
电邮：jeky_zhao#qq.com

                    
移动电话：139-2527-9053

                

                

            

        

        
        

        	
Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap