Delphi制作實現圖像的各種顯示效果,比如百葉窗、漸變、淡入淡出、水平交錯、雨滴效果等,用鼠標點擊“打開圖像”按鈕,可以選擇圖像文件導入到窗體中;點擊其它各個按鈕,可以實現圖像顯示特效,例如:點擊“推拉效果”,圖像將從窗體下方緩緩向上升起;點擊“垂直交錯”,圖片將從窗口上下同時出現,直到相互匯合,形成一幅完整的圖片;點擊“水平交錯”,圖片將從窗體的左右同時出現,直到相互匯合,形成一幅完整的圖片;點擊“雨滴效果”,圖像將像下雨一樣從上部向下滴落,直至形成完整的圖片;點擊“百葉窗效果”,將產生如下圖所示的效果;點擊“積木效果”按鈕,圖像將從上方以堆積的方式落下。
設計思路:在Delphi 中,實現一幅圖像的顯示是非常簡單的,只要在Form 中定義一個Image 控件,設置其picture 屬性,然後選擇任何有效的圖像文件進行load 即可。但這只是直接將圖形顯示在窗體中,毫無技巧可言。目前在許多學習軟件、游戲光盤中,經常會看到各種圖像顯示技巧,憑著圖像的移動、交錯、雨滴狀、百葉窗、積木堆疊等顯現方式,使畫面變得更為生動活潑,更能吸引觀眾。本文即是介紹如何在Delphi 中實現各種圖像顯示技巧。
設計步驟:
實現圖像顯示特效的操作很簡單,只需要對圖像分成不同的部分,緩存起來,然後逐步對圖像進行掃描即可。
1.新建工程
(1)啟動Delphi 6.0 程序。選擇“文件”菜單下的“新建”命令,從彈出的子菜單中選擇Application 選項,則出現新建工程的Form1 窗口。
(2)選擇“文件”菜單下的“工程另存為”命令,彈出Save Unitl As 對話框。在“保存在”列表框中選擇需要存放該窗口文件所在的目錄名;在“文件名”編輯框中填寫文件名,這裡填寫“Unit1”,點擊“保存”按鈕,保存上面的選項。
(3)執行上一步後,將彈出“工程另存為”對話框。在“保存在”列表框中選擇需要存放該工程的目錄名,最好和第(2)步選取相同的目錄;在“文件名”編輯框中填寫保存處理該工程的源代碼的文件名,這裡填寫“Project1”,點擊“保存”按鈕,保存上面的選項。
2.修改窗口
(1)激活Unit1 窗口,在“屬性”面板中設置該窗體的Caption 屬性為“圖像顯示特效”,Name 屬性為“Form1”。
(2)選擇“標准”頁上的Panel 選項,在窗體中添加1 個Panel 控件。在“屬性”面板中設置BevelOuter 屬性為“bvRaised”,BevelInner 屬性為“bvNone”,BevelWidth 為1,Align 屬性為“alTop”。
(3)選擇“標准”頁上的Button 選項,在Panel1 控件上添加8 個Button 控件,在“屬性”面板中設置其Caption 屬性分別為“打開圖像”、“垂直交錯”、“推拉效果”、“水平交錯”、“雨滴效果”、“百葉窗效果”、“積木效果”和“退出”。
(4)選擇“附加”頁上的Image 選項,在窗體中添加一個Image 控件,在“屬性”面板中設置其Align 屬性為“alClIEnt”,用鼠標點擊Picture 屬性右邊的按鈕,從彈出的對話框中導入合適的圖像文件。
(5)選擇“對話框”頁上的OpenPictureDialog 選項,在窗體中添加一個“屬性”控件,在Object Inspecter 面板中設置其Name 為“OpenPictureDialog1”,Options 屬性為“[ofHideReadOnly,ofEnableSizing]”。