2011年1月25日 星期二

PowerBuilder 12 MDI放置圖片


網上找到一個簡易在MDI上顯示背景圖片效果的程式,使用PB12來測試看看
1.建立一個Window,名稱為w_back,WindowType為child!,屬性設置如圖
2.於w_back貼上picture control,名為p_1
3.於w_back建立一window function
function : uf_set_background
argument: string as_image

p_1.Picturename=as_image

4.於w_back的resize event寫下
p_1.resize( this.width, this.height)

5.於w_back的activate event寫下
this.bringtotop=false // 測試結果,這行沒有作用

6.於MDI的open event寫下
w_back background
opensheet(background,this,0,layered!)
background.uf_set_background('Eclat_VN.jpg')
註: 因我用 .Net WindwoForm,直接使用OpenSheet(w_back, this)會出現錯誤

完成後,經測試,還有不少問題,要能實用,還需花點心思才行
使用的PB版本: PowerBuilder 12.1
Target: .Net Windows Forms