a亚洲精品_精品国产91乱码一区二区三区_亚洲精品在线免费观看视频_欧美日韩亚洲国产综合_久久久久久久久久久成人_在线区

首頁 > 編程 > Delphi > 正文

Delphi技巧--有“背景”的窗體

2019-11-18 18:55:36
字體:
來源:轉載
供稿:網友
許多網頁都有背景圖案,這樣可以使頁面看起來更加醒目。不過在Delphi里你也可以設計這種類型的窗體。馬上會想到的一個方法就是使用image構件,然后指定一幅圖片就可以啦。這樣做當然是可行的,但是一幅可以充滿整個窗體的BMP圖,要占用很多的內存空間,這樣就劃不來了。最好的辦法是只下載一幅很小的BMP圖,然后把它粘貼到整個窗體上。

  ?ぁ≌飫鏤頤揮脅捎?Image構件,而是使用了Bitmap構件,用它來下載一幅很小的位圖。?な紫仁竊詿疤宓?Public部分加入變量定義:Bitmap:TBitmap;然后在窗體的OnCreate事件中生成此對象,代碼如下:

  PRocedure TForm1.FormCreate(Sender:Tobject);

  begin Bitmap:=TBitmap.Create;??

  Bitmap.LoadFormFile('1.bmp');//圖文件1.bmp只有1KB大小??

  end;

  第三步是在窗體的OnPaint事件中把位圖的圖案粘貼到整個窗體上。添加代碼如下:??procedure TForm1.FormPaint(Sender:Tobject)var x,y:integer;begin y:=0;while y
  do begin X:=0;

  while X
  do begin cancas.Draw(X,Y,Bitmap);??

  X:=X+Bitmap.Width;

  end;

  Y:=Y+Bitmap.Heigth;

  end;end;?おぁ∽詈蟛灰?忘了在窗體的OnDestory事件中釋放Bitmap對象。具體代碼:Bitmap.Free;好了,這樣窗體顯示時就會像網頁那樣帶有背景,而且并沒占多大的內存空間。

上一篇:在Delphi中使用IP控件

下一篇:Delphi:易混淆的概念

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
學習交流
熱門圖片

新聞熱點

疑難解答

圖片精選

網友關注

主站蜘蛛池模板: 91久久| 亚洲精品久久久久久久久久久久久 | 91精品久久久久久久91蜜桃 | av在线三级 | 欧美日韩亚 | 国产精品久久 | 久久一视频 | 国产亚洲精品精品国产亚洲综合 | h视频在线免费 | 欧美日韩国产一区二区 | 精品国产乱码久久久久久88av | 国产情侣一区二区三区 | 91福利电影在线观看 | 精品国产污污免费网站入口 | 一级免费大片 | 欧美精品久久久久久久 | 久久精品国产77777蜜臀 | 欧美14一18处毛片 | 精品免费在线 | 精品国产欧美一区二区三区不卡 | 国产精品九九九 | 日本视频免费高清一本18 | 91精品国产综合久久婷婷香蕉 | 色黄网站 | 国产高潮好爽受不了了夜色 | 亚洲一区久久久 | 成人在线播放网站 | 日韩中文视频 | 福利精品 | 精品免费在线 | 在线一区 | 成人在线欧美 | 日韩欧美一级精品久久 | 日本黄a | 成人精品 | 五月综合久久 | 国产高清一级毛片在线不卡 | 欧美国产日本 | 国产精品中文字幕在线 | 亚洲在线观看免费视频 | 亚洲精品在线观看免费 |