程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> Delphi >> 自己制作網頁特效軟件

自己制作網頁特效軟件

編輯:Delphi
現在每天成千上萬的網民激情於沖浪,很多朋友喜歡在網上搭個小窩,建個網站。建網站離不開設計網頁,網頁要精彩離不開特效。現在網上有一款最受大家歡迎的特效軟件,名叫“新新網頁特效”,該軟件提供的特效最多最全,提供的特效最新最酷。其實這樣一款優秀的軟件,制作起來十分簡單,如果你也想動手的話,跟我來,五步包你“成品出廠”。

  第一步:

  1、安裝一套Delphi 6.0,最好是中文版。

  2、搜集各種刊物或者是下載各種特效代碼,都存為TXT文件。

  3、將這些特效文件分門別類存進相應的目錄中,如“鏈接類特效”、“時間類特效”、“文字類特效”等等,然後將這些目錄悉數放進一個Data目錄下。

  第二步:

  運行Delphi 6.0,新建一個工程,打開一個窗體,放置下列組件:Combobox。點擊“Iitems”屬性,設置特效類別,“Filelistbox”用於顯示特效名稱,“Memo”用於顯示特效代碼,“Webbrowser”用於特效預覽,最後放置兩個Button按鈕,並將其“Caption”屬性分別設置為“復制代碼”和“特效預覽”。調整好各組件在窗體中的位置。

  第三步:

  實現用“Filelistbox”顯示特效名稱,可以設置“Combobox”的“Onchange”事件,讓類別改變時顯示相應類別的特效文件名稱:

  filelistbox1.directory:=(ExtractFilePath(Application.Exename)+'\data\'+combobox1.Text+'\');

  在點擊特效名稱時,在“Memo”窗口上顯示該特效的代碼,可以設置“Filelistbox”的“Onclick”的事件:

  memo1.Lines.LoadFromFile (filelistbox1.FileName);
第四步:

  每一款特效軟件都離不開“復制代碼”和“特效預覽”這兩項最基本的功能,我們可以這樣實現,雙擊“復制代碼”按鈕,添加Onclick事件代碼:

  //當按下這個按鈕時

  memo1.SelectAll;

  //全選上特效代碼

  memo1.copyToClipboard;

  //將選上的特效代碼復制到剪貼板

  同樣雙擊“特效預覽”按鈕,添加Onclick事件代碼:

  Memo1.Lines.SaveToFile('c:\temp.htm');

  //將Memo1中的顯示代碼內容保存至一個臨時文件中

  webbrowser1.Navigate('c:\temp.htm');

  //讓預覽窗格顯示特效預覽

  第五步:

  點擊“Shift+Ctrl+S”保存,點擊“Ctrl+F9”編譯,OK,精彩軟件,新鮮出爐。

  這樣編出來的軟件有三個優點:

  1、這是你的作品,版權所有,不得翻錄。

  2、升級簡單,以後如果有新的特效,只需復制下來,並存為文本文件,並拷貝至相應的特效類別目錄下即可。

  3、短小精悍,上面提到的目前在網上大受歡迎的“新新網頁特效”就是這麼編出來的,看,這就是它的實現窗體。

  
  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved