- 1PS提示：因為圖層已鎖定，無法編輯圖層的處理方法
- 2Adobe Illustrator CS5 序列號大全
- 3picacg蘋果版怎么找不到|picacg ios版是不是下架了介紹
- 4ACDsee注冊碼免費分享（含ACDsee18、ACDsee10等版本）
- 5蘋果iphone自動時間不準確的多種校正方法
- 6PDF瀏覽器能看3D文件嗎？PDF瀏覽器看3D文件圖文詳細教程
- 7Potato(馬鈴薯聊天)怎么注冊不了|Potato不能注冊處理方法介紹
- 8Potato(土豆聊天)怎么換頭像|Potato app更改頭像方法介紹
- 9ipad版office如何激活? office365激活的圖文說明教程
- 10最新的Adobe Illustrator CS4序列號大全
- 11Mac怎么通過設置VPN來登錄youtube等國外網站
- 12眼萌app怎么色弱測試 眼萌app色弱測試圖文說明教程
[摘要]圖像漸隱在Windows的多媒體程序設計中是一種常用的技術，主要用來制作程序片頭或者多幅圖像之間的切換等。利用圖像漸隱技術可以使程序具有動畫效果，從而增添程序的魅力。圖像漸隱實現的方法很多，例如利用調色板以及利用光柵映射模式等，而調色板方法無疑是其中最快速的一種。需要指出的是，這種方法只能在基于調...
圖像漸隱在Windows的多媒體程序設計中是一種常用的技術，主要用來制作程序片頭或者多幅圖像之間的切換等。利用圖像漸隱技術可以使程序具有動畫效果，從而增添程序的魅力。圖像漸隱實現的方法很多，例如利用調色板以及利用光柵映射模式等，而調色板方法無疑是其中最快速的一種。需要指出的是，這種方法只能在基于調色板的顯示模式下工作。在Windows的顯示模式中，只有256色模式是基于調色板的，這種模式是多媒體程序經常采用的。
在基于調色板的256色模式下，當一幅圖像顯示時，Windows把圖像的邏輯調色板載入，并通過調色板映射把邏輯調色板映射到系統調色板，圖像的每一像素的顯示顏色都映射自系統調色板的一個顏色索引值，每個索引對應一個24位的RGB全彩色值。當系統調色板改變時，當前引用系統調色板的窗口的像素顏色也隨之改變，而這種改變是系統在硬件刷屏中自動完成的，速度極快，這樣就為我們利用調色板實現圖像的動畫漸隱提供了引擎。實際上，利用這種技術可以實現多種動畫效果，圖像漸隱只是其中的一種。
在下面的例子中，首先在窗口的黑色背景上顯示一幅256色的DIB圖像，然后在系統時鐘消息進程中動態地修改圖像的邏輯調色板的顏色值，使每一個顏色值逐漸向背景顏色值趨近，漸隱的速度可以用時鐘的時間片間隔來控制。當漸隱開始時，可以看到整幅圖像逐漸變暗，最后消失在黑色的背景中，整個過程十分平滑，就如你在電影片頭中看到的一樣。
本例用Delphi 1.0在Windows 3.2下實現，下面給出程序的主要部分及注釋。
unit Bmp-Disaper;
interface
uses
SysUtils,WinTypes,WinProcs,Messages,Classes,Graphics,Controls,Forms,Dialogs,Ex
tCtrls,StdCtrls;
type
TForm1=class(TForm)
Image1:TImage;{顯示漸隱圖像}
Timer1:TTimer;{時鐘構件}
Panel1:TPanel;{顯示漸隱過程，已漸隱為背景色的顏色數}
Button1:TButton;{開始漸隱按鈕}
procedure Timer1 Timer(Sender:TObject);{始終控制過程}
procedure Button1 Click (Sender:TObject);{激發漸隱過程}
procedure FormCreate (Sender:TObject);{窗體構造過程}
private
PalDevice:Imteger;{調色板模式標志}
go:integer;{漸隱開始標志}
pal:arrar［0...255］ of TPaletteEntry;{邏輯調色板}
end;
var
Form1:TForm1;
implementation
{$R *.DFM}
procedure TForm1.Timer1Timer(Sender:TObject);
var
i,n:integer;
begin
if go=1 then{開始漸隱}
begin
for i:=0 to 255 do{調色板顏色值遞減}
begin
pal［i］.peFlags:=PC-RESERVED;{調色板動畫標志，一定得這樣設置}
if pal［i］.peRed>0 thenpal［i］.peRed:=pal［i］.peRed-1;
if pal［i］.peGreen>0 thenpal［i］.peGreen:=pal［i］.peGreen-1;
if pal［i］.peBlue>0 thenpal［i］.peBlue:=pal［i］.peBlue-1;
end;
SetPaletteEntries(Image1.Picture.Bitmap.Palette,0,256,pal);
{設置新的顏色到DIB調色板}
RealizePalette(Image1.Picture.Bitmap.Canvas.Handle);
{影射邏輯調色板到系統硬件調色板}
{計算已經漸隱消失的顏色數，如全數完成則終止漸隱過程，令go=0}
n:=0;
for i:=0 to 255 do
if(pal［i］.peRed=0) and (pal［i］.peGreen=0) and (pal［i］.peBlue=0)
then
n:=n+1
if n=256 then
begin
Panel1.Caption:=’OK’;
go:=0;
end
else
Panel1.Caption:=’n=’+IntToStr(n);
end;
end;
procedure TForm1.Button1Click(Sender:TObject);
begin
GetPaletteEntries(Image1.Pictrue.Bitmap.Palette,0,256,pal);
{獲得DIB圖像的調色板}
{判斷系統是否是基于調色板的顯示模式，如果是則開始漸隱過程}
PalDevice:=GetDeviceCaps(Canvas.Handle,RASTERCAPS) and RC-PALETTE;
if(PalDevice>0) the go:=1;
end;
procedure TForm1.FormCreate(Sender:TObject);
begin
Image1.Pictrue.Bitmap.LoadFromFile(’c:＼video10＼ts.bmp’);
{加載DIB圖像}
end;
end.
推薦資訊 總人氣榜
最新教程 本月人氣
- 1如何利Mcrypt擴展庫進行加密與解密
- 2如何使用C#創建一個3層的數據庫應用程序
- 3選購Web服務器
- 4在VC中動態使用FoxPro數據庫
- 5個人經驗：使用asp盡量減少服務器端的工作量
- 6ODBC to mySQL
- 7分發VFP應用時自動創建快捷方式
- 8轉－對于多線程
- 9.Net中如何設置IIS
- 10在PHP世界中選擇最合適的模板--比較PHPLIB Template與FastTemplate
- 11菜單項的動態裝入
- 12XML、Web服務與.NET框架(1)
- 1uc瀏覽器去廣告圖文說明教程：uc瀏覽器廣告過濾技巧使用方法_綠茶安卓網
- 2字符串根據多個字符進行分割的一種方法
- 3使用c#制作容易的留言板(1)
- 43星s5電信版支持4g嗎？3星galaxy s5電信版支持4g網絡嗎？
- 5nubia x6電信版什么時候上市？中興nubia x6電信版上市時間
- 6華為p7移動版什么時候上市？華為p7手機移動版上市時間
- 7聯想黃金斗士s8預約圖文說明教程(附聯想s8預約網址)
- 8聯想黃金斗士s8加持版與規范版的區別有哪一些？s8加持版/規范版區別
- 9美顏相機聲音如何關？美顏相機關聲音方法_綠茶安卓網
- 10陌陌如何舉報？陌陌舉報好友圖文說明教程_綠茶安卓網
- 11陌陌群聊如何@別人？陌陌群聊@別人方法_綠茶安卓網
- 123星s4手勢感應如何用？3星Galaxy s4手勢感應視頻圖文說明教程
