我是把IMAGE 控件放在一个第三方控件上的(这个第三方控件是放在PANEL上的),如果我把PANEL的DOCKSITE设置为TRUE,并不设置IMAGE为Transparent,播放位图很流畅,不闪烁;但是这个时候如果不设置IMAGE为Transparent,这样的话它就会把那个第3方控件给挡住……,如果过设置IMAGE为Transparent,这个时候换图就会闪烁的很厉害。 这个是为什么呢?
而我必须得让IMAGE为Transparent。
我想问一下大家,有没有什么方法可以实现IMAGE在换位图的时候能够不闪烁?我写的代码如下,还请大家多多指教。
var
BitMap_Temp : TBitMap;
begin
BitMap_Temp := TBitMap.Create;
if (i mod 24) = 0 then
BitMap_Temp.LoadFromFile( "Scan1.bmp ")
else if (i mod 24) = 1 then
BitMap_Temp.LoadFromFile( "Scan2.bmp ")
等等……
else
BitMap_Temp.LoadFromFile( "Scan24.bmp ");
BitMap_Temp.Transparent := True;
Form1.Image1.Picture.Bitmap := BitMap_Temp;
Inc(i);
end;
而我必须得让IMAGE为Transparent。
我想问一下大家,有没有什么方法可以实现IMAGE在换位图的时候能够不闪烁?我写的代码如下,还请大家多多指教。
var
BitMap_Temp : TBitMap;
begin
BitMap_Temp := TBitMap.Create;
if (i mod 24) = 0 then
BitMap_Temp.LoadFromFile( "Scan1.bmp ")
else if (i mod 24) = 1 then
BitMap_Temp.LoadFromFile( "Scan2.bmp ")
等等……
else
BitMap_Temp.LoadFromFile( "Scan24.bmp ");
BitMap_Temp.Transparent := True;
Form1.Image1.Picture.Bitmap := BitMap_Temp;
Inc(i);
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货