程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> C語言 >> C++ >> 關於C++ >> 用CB制作具有HTML風格的動態按鈕

用CB制作具有HTML風格的動態按鈕

編輯:關於C++

在浏覽網頁時,各種各樣制作精美的動態按鈕常常令人驚羨不已。這種按鈕平常默默無聞,當鼠標經過時,立即一躍而出,在鼠標變為手形的同時,圖形也變得更加亮麗,有的還發出特有聲音,將你的注意力瞬間抓了過去;而當鼠標移開之後,一切又恢復原樣,以免分散你對新焦點的注意。如果我們能用C++ Builder實現這種效果,那麼一定會給所開發的應用程序增色不少。

在C++Builder中,適合制作動態按鈕的構件是SpeedButton。雖然SpeedButton可以通過1個16×64像素的位圖來顯示按鈕處在抬起、禁止、按下與保持按下的不同狀態,但要實現HTML風格的按鈕,還得要通過編程來實現。

選擇1副所鐘意的位圖取名為start.bmp。用圖形制作軟件(如photoshop)將其轉換為黑白圖形存為start1.bmp。這2個位圖分別是按鈕在鼠標經過時及平時顯示的圖形。同時還選取1個聲音文件(不要太長),假設其名為crush.wav。

打開純文本編輯軟件(如notepad),輸入以下內容:

crush WAV crush.wav

start BITMAP start.bmp

start1 BITMAP start1.bmp

保存為資源文件mysrc.rc。

啟動Builder,打開新工程,將資源文件mysrc.rc添加進項目中。你也可以通過BIN目錄下的brcc32.exe將RC文件編繹為RES文件,然後用 #program resource "*.res" 語句將其聯編進項目中。本文采用更簡單的前一種方法。

在當前窗體上加入新的SpeedButton,取名為StartSpeedButton。屬性按下表設置:

Caption 空

Cursor crHandPoint

Flat true

Hint 單擊以…..

Glyph None

Showhint true

注意:在設計階段,按鈕的Glyph屬性最好不要先行指定為start1.bmp。

打開所對應的頭文件,在其中的private項中增加

Graphics::TBitmap *start,*start1;//定義位圖

Char *chWavHandle;//定義聲音句柄

在主表單的CPP文件的表單創鍵事件(onCreate)所對應的函數中先初始化位圖,

start=new Graphics::TBitmap();

start1=new Graphics::TBitmap();

初始化後再載入位圖

start->Handle=LoadBitmap(Hinstance, "start");//從內存中載入位圖

start1->Handle=LoadBitmap(Hinstance, "start1");

載入聲音文件

HRSRC temp=FindResource(Hinstance,"crush", "WAV");//從內存中載入聲音

HGLOBAL h=LoadResource(Hinstance,temp);

ChWavHandle=(char *)LockResource(h);

先在浮動按鈕上顯示普通的黑白圖形

StartSpeedButton->Glyph->Assign(start1);

在初始工作完成後,好的習慣應及時釋放所占用的資源。在主表單的OnDestroy事件所對應的函數中加入

delete chWavHandle;

delete start1,start;

至此,第一步已經結束,試著運行一下,鼠標形狀變化、按鈕突起及動態提示已經有了,最後再讓我們來完成圖形變化及聲音提示。

在做這部分工作之前,可回想一下浏覽網頁的情況。我們的動態按鈕的響應步驟應該是:鼠標移入按鈕時,圖形由黑白變為彩色,同時發出聲響(以後稱之為點亮按鈕);移出時圖形再變回黑白,但此時不發出聲響。因此應讓程序知道什麼時候鼠標正好移入、什麼時候正好移出。

在頭文件的private項中增加狀態變量

bool blStart;

在主表單文件的OnCreate中為其設置初始值

blStart=true;//在TRUE狀態下,一旦發生OnMouseMove事件就可以點亮按鈕

選中SpeedButton按鈕,在其OnMouseMove事件所對應的函數StartSpeedButtonMouseMove()中增加

if(blStart)//可以點亮按鈕

 {
   StartSpeedButton->Glyph->Assign(start);//變為彩圖
   // 通過chWavHandle句柄調用內存中聲音文件
   SndPlaySound(chWavHandle,SND_MEMORY|SND_SYNC);
   blStart=false;// 再發生OnMouseMove事件不可以點亮按鈕
   }

當然,還必須在鼠標離開按鈕時再將圖形恢復為黑白。如何才能知道鼠標離開呢?比較原始的辦法自然是用鼠標的坐標位置來判斷,但這樣很費力。一個巧妙的招數是用包含(在位置上)此按鈕的其它部件的OnMouseMove事件來判斷(注意:選用的外圍部件相對於此按鈕來說需有足夠的縱深,否則,一旦鼠標移動太快,有可能會漏過OnMouseMove事件而發生紊亂。確決的辦法是,再加上更外圍的部件的OnMouseMove事件來雙保險)。

以按鈕的外圍部件是主表單MainForm為例,在其OnMouseMove事件所對應的函數MainFormMouseMove()中加入

if(!blStart)//鼠標正好由按鈕內移出

StartSpeedButton->Glyph->Assign(start1);// 圖形恢復黑白

blStart=true;//為鼠標重新進入按鈕作准備

最後在主表單CPP文件前部加入為SndPlaySound提供聲明的頭文件

#include

編繹運行,哈哈,一切正如所想的,我的按鈕也具備了HTML風格,你還不趕緊行動。

注:以上程序在 Builder 4.0/win98環境下運行通過。這裡所說的主表單也可以是包含動態按鈕的表單。

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved