现在每天成千上万的网民激情于沖浪很多朋友喜欢在网上搭个小窝建个网站建网站离不开设计网页网页要精彩离不开特效现在网上有一款最受大家欢迎的特效软件名叫新新网页特效该软件提供的特效最多最全提供的特效最新最酷其实这样一款优秀的软件制作起来十分简单如果你也想动手的话跟我来五步包你成品出厂 第一步 安装一套Delphi 最好是中文版 搜集各种刊物或者是下载各种特效代码都存为TXT文件 将这些特效文件分门别类存进相应的目录中如链接类特效时间类特效文字类特效等等然后将这些目录悉数放进一个Data目录下 第二步 运行Delphi 新建一个工程打开一个窗体放置下列组件Combobox点击Iitems属性设置特效类别Filelistbox用于显示特效名称Memo用于显示特效代码Webbrowser用于特效预览最后放置两个Button按钮并将其Caption属性分别设置为复制代码和特效预览调整好各组件在窗体中的位置 第三步 实现用Filelistbox显示特效名称可以设置Combobox的Onchange事件让类别改变时显示相应类别的特效文件名称 filelistboxdirectory:=(ExtractFilePath(ApplicationExename)+\data\+comboboxText+\); 在点击特效名称时在Memo窗口上显示该特效的代码可以设置Filelistbox的Onclick的事件 memoLinesLoadFromFile (filelistboxFileName); 第四步 每一款特效软件都离不开复制代码和特效预览这两项最基本的功能我们可以这样实现双击复制代码按钮添加Onclick事件代码 //当按下这个按钮时 memoSelectAll; //全选上特效代码 memocopyToClipboard; //将选上的特效代码复制到剪贴板 同样双击特效预览按钮添加Onclick事件代码 MemoLinesSaveToFile(c:\temphtm); //将Memo中的显示代码内容保存至一个临时文件中 webbrowserNavigate(c:\temphtm); //让预览窗格显示特效预览 第五步 点击Shift+Ctrl+S保存点击Ctrl+F编译OK精彩软件新鲜出炉 这样编出来的软件有三个优点 这是你的作品版权所有不得翻录 升级简单以后如果有新的特效只需复制下来并存为文本文件并拷贝至相应的特效类别目录下即可 短小精悍上面提到的目前在网上大受欢迎的新新网页特效就是这么编出来的看这就是它的实现窗体 |