怎样调用.bmp格式的图片(50)

  • 主题发起人 主题发起人 hanxin
  • 开始时间 开始时间
H

hanxin

Unregistered / Unconfirmed
GUEST, unregistred user!
怎样用代码调用.bmp格式的图片,使图片在界面上显示,有代码最好,恳请大家帮忙!
 
界面上添加一个image1组件~~procedure TForm1.FormCreate(Sender: TObject);begin image1.Picture.Bitmap.LoadFromFile('C:/4.bmp');end;
 
我原来没说清楚,我有三个.bmp格式的图片,要做一个模拟生产画面,在称量物料时让这三张图片顺序循环显示,以便实现动态显示,该怎么做?请高手帮忙!
 
制作一个gif动画~~添加一个WebBrowser1组件procedure TForm1.FormCreate(Sender: TObject);begin WebBrowser1.Navigate('c:/2.gif');end;
 
to de410没用过WebBrowser1组件,这个组件在哪可以找到
 
type tx=(first,second,three); var sx:tx;begin sx:= Succ(sx); if sx>three then sx:=first; case sx of three : img1.Picture.Bitmap.LoadFromFile('c:/3.bmp'); second :img1.Picture.Bitmap.LoadFromFile('c:/2.bmp'); first: img1.Picture.Bitmap.LoadFromFile('c:/1.bmp'); end;
 
用ttimer事件既可,每2秒调入一次!
 
在internet页面中最后一个就是~~
 
没事用什么WebBrowser。。。闲内存太多? 如果做成gif 可以用 gifimage。 用bmp 就用timer 加载就得了。
 
不要不停的读文件,要一次加载到内存中。
 
使用timer,img1.Picture.Bitmap.LoadFromFile的方式加载,如果怕麻烦,就在设计时用三个image,每个image中加载入一个图片,在timer时不断切换这三个image的visible,每一时刻只有一个可见,其他的不可见。
 
to sujing1982 gifimage控件在哪可以找到?是第三方控件吗?
 
to de410 使用webbrowser控件时,右边的边框怎么去掉呀?
 
to sujing1982 gifimage控件怎样加载gif格式的图片,能给我举个例子吗?谢谢了!
 
如何在Delphi中使用GifImagehttp://www.zuobaoquan.com/2009/05/17/delphi-gif-image/
 
干嘛那么复杂 用image就可以 放三个panel不就可以了
 
谢谢大家帮忙!
 
多人接受答案了。
 
后退
顶部