|
VFP中的圖像框(image) 發(fā)布日期:2010/5/2 10:23:00 來源: 作者: 點(diǎn)擊:189
- 一.圖像框:用于顯示圖片文件,以加強(qiáng)程序的界面效果.在圖像框中使用的圖片文件的格式通常為.BMP格式或.JPG格式. 二.圖像框的常用屬性:如下表 屬性 作用 top 距父對象上方的距離 left 距父對象左方的距離 height 對象的高度 width 對象的寬度 enabled 設(shè)置對象是否可用 visible 設(shè)置對象是否可見 picture 指定對象中顯示的圖片
三.例:設(shè)計(jì)一個(gè)程序,要求按順序顯示圖片,并可放大,縮小圖片,暫?;蜻B續(xù)顯示圖片.運(yùn)行界面如圖51
1.新建表單,添加一個(gè)圖像框image1,一個(gè)選項(xiàng)按鈕組optiongroup1,一個(gè)計(jì)時(shí)器控件timer1(運(yùn)行時(shí)不可見,可放置于表單的任意位置),三個(gè)命令按鈕command1,command2及command3 2.設(shè)置對象屬性: ★ 將三個(gè)命令按鈕command1~command3的caption屬性依次設(shè)為"縮小按鈕","放大按鈕"及"結(jié)束按鈕"; ★將單選按鈕組optiongroup1中的兩個(gè)單選按鈕option1和option2的caption依次設(shè)為"連續(xù)顯示"和"暫停顯示"(設(shè)置方法見第五章第九節(jié)) ★計(jì)時(shí)器控件timer1的屬性:enabled屬性設(shè)為.T.,interval屬性設(shè)為300(300毫秒即3秒,每3秒顯示一幅圖片,此處如改為100則為每隔1秒顯示一幅圖片) 3.編寫代碼: ★表單的load事件: public xh &&定義全局變量,用于存放圖片文件的主名 xh=1 &&賦初值 ★單選按鈕"連續(xù)顯示"的click事件代碼(向單選按鈕組中某個(gè)單選按鈕添加代碼的方法見第五章第九節(jié)): thisform.optiongroup1.option2.value=.f. this.value=.t. xh=1 thisform.timer1.enabled=.t. ★單選按鈕"暫停顯示"的click事件代碼(向單選按鈕組中某個(gè)單選按鈕添加代碼的方法見第五章第九節(jié)): thisform.optiongroup1.option2.value=.f. this.value=.t. thisform.timer1.enabled=.f. ★計(jì)時(shí)器控件timer1的timer1事件: xh=xh+1 if xh>3 xh=1 endif xh0=alltrim(str(xh)) xp=xh0+".jpg" thisform.image1.picture="&xp" ★"縮小按鈕"的click事件010: thisform.image1.height=thisform.image1.height/1.2 thisform.image1.width=thisform.image1.width/1.2 ★"放大按鈕"的click事件: thisform.image1.height=1.2*thisform.image1.height thisform.image1.width=1.2*thisform.image1.width ★"結(jié)束按鈕"的click事件: thisform.timer1.enabled=.f. thisform.release 4.說明:制作此例時(shí),須自己找三個(gè).jpg格式的文件(可從網(wǎng)上下載),將它們分別重命名為1.jpg,2.jpg,和3.jpg,然后將它們復(fù)制到默認(rèn)目錄中.
原文鏈接:http://airfire./article/airfire-2-1279379.html
|