strlst:TStrings;
strlst:=TStringList.create;
for i:=0 to 20 do
begin
imglst[i]:=tbitmap.create;
imglst[i].loadfromfile()
end;
strlst:=TStringList.create;
for i:=0 to 20 do
begin
imglst[i]:=tbitmap.create;
imglst[i].loadfromfile()
end;
解决方案 »
- delphi7操作excel2003出现:EIntfcasterror ‘interface not supported’
- 繁體系統下開發的軟件在簡體系統下亂碼,要怎么做
- 关于查询字段的问题
- 如何能限制别的一个程序的使用时间呢,有什么好办法没有?
- 一个BUG还是Delphi本身的代码优化?
- 关于数据库备份?
- 关于异常捕捉问题
- 在线等待:!!!!急!!怎么直接在dbgrid点机每列记录名称时,就可以排序!!!
- 【激情点击】->->->->->->->->->->给回复是12:00:00整的回复人100分<-<-<-<-<-<-<-<-<-<-<-<-也许就是你,赶快参与吧:)
- 请问:为什么不是主窗体的窗体按最小化按钮不会缩小到屏幕下面的任务栏?如何解决?
- 请教!关于如何动态改变窗体图标的问题
- 小弟以前用clientdateset提交到后台很好,可是今天。。。
TBitmap 好像只能操作BMP??
??????????????????????????????
我认为应该用BitBlt直接贴上去,比较快,不容易闪烁,还有,可以用TPaintBox控件,利用双缓冲技术(大富翁和这里都可以搜索到)。
消除闪烁最好方法是用Canvas.Draw()或BitBlt直接画,
然后再用新的覆盖,若移动效果,则要先用窗体背景色覆盖原画面,
然后再在心位置上画新画面。