表單背景的繪製(Windows表單每次都會重繪其表單背景,所以我們可以通過攔截表單重繪背景的訊息(WM_ERASEBKGND),並自訂方法來實現重繪表單背景)

來源:互聯網
上載者:User

標籤:pen   重寫   too   www.   .com   height   ali   ras   ken   

核心思想:由於Windows表單每次都會重繪其表單背景,所以我們可以通過攔截表單重繪背景的訊息(WM_ERASEBKGND),並自訂方法來實現重繪表單背景。通過TImage組件也可以實現,但是重寫WM_ERASEBKGND訊息的效率更高一些,所以還是推薦使用這種方法。

(2)聲明重繪背景訊息響應函數

void fastcall OnWMEraseBkgnd(TWMEraseBkgnd& Msg); 


(3)添加訊息映射

BEGIN_MESSAGE_MAP
//攔截重畫背景的事件
MESSAGE_HANDLER(WM_ERASEBKGND,TWMEraseBkgnd,OnWMEraseBkgnd); 
END_MESSAGE_MAP(TForm);


(4)編寫自繪背景訊息響應函數的代碼

void fastcall TFormMain::OnWMEraseBkgnd(TWMEraseBkgnd& Msg)
{
    //重畫背景
    TCanvas* canvas = new TCanvas;
    canvas->Handle = Msg.DC;
    int cx = ClientWidth/bmpFormBK->Width + 1;
    int cy = ClientHeight/bmpFormBK->Height + 1;
    for (int i=0; i<cy; i++)
    for (int j=0; j<cx; j++)
    {
        canvas->Draw(j*bmpFormBK->Width, i*bmpFormBK->Height,bmpFormBK); Msg.Result = true;
    }
    delete canvas;
}

 

http://www.cnblogs.com/songsu/articles/1336653.html

表單背景的繪製(Windows表單每次都會重繪其表單背景,所以我們可以通過攔截表單重繪背景的訊息(WM_ERASEBKGND),並自訂方法來實現重繪表單背景)

相關文章

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.