2009年12月8日早晨有一个想法:
每次打开IE上网时都要打开默认主页,
下载Delphi第三方控件的人很多,
若在组件中加入"修改IE默认主页"的代码,那么会提高博客访问量。
上午又有一个想法:
我开办的博客访问量都很高,有许多创业者也想提高访问量,
但是他们没有技术、经验,我可以写一篇文章,以1元人民币的价格出售,
会有人买吗?
如果你对我提高博客访问量的技术感兴趣,那么留言,若留言人数达到
5000人,那么我就写写。
每天都有许多新想法,要从这么多的想法中找出能赚钱的,真的很难!
为这困难、情况,感谢我的上主天主!
下面验证早晨的第一个想法:
“修改IE默认主页”必然要更改注册表,我编写了两个函数:
1. Function ISThisValue(VARName,Value:string):Boolean;
功能:判断IE默认主页是否和Value一样,一样的话返回true,否则返回false;
2. procedure IEHomePage(HomePageURL:string);
功能:为IE默认主页,改写注册表,把指定网页设置成IE默认主页
我编写了一个继承于TButton的组件:TClickBlogButton
把它放在[Standard]组件夹下面,当程序员把它托动到Form1时,
自动更改IE默认主页,即使不用按下F9,也能更改。
欢迎免费下载使用。
使用方法:
1、把这个组件安装到Delphi系统;
2、从[Standard]组件夹下面找到它,并添加到Form1;
3、运行IE,看看默认主页是否已经被更改;
本文作者:金海龙(天主教)
国际知名度请用 Google搜索:软件工程师 金海龙(天主教)
***************************************************
名称:ClickBlogButton.pas
大小:4.36KB
版本:1.0
使用环境:Win2000 + Delphi6
功能:自动更改IE默认主页
作者:金海龙(天主教)
性质:免费
类型:Delphi6第三方控件教学(实例程序)
发布日期:2009年12月8日
Google搜索:ClickBlogButton.pas
博客:http://bigengineer.blog.163.com
技术博客:http://bigengineer.blog.ccidnet.com
Sina发布:http://q.blog.sina.com.cn/bigengineer
更多下载:http://myhotdog.download.csdn.net/
百度知名度:http://hi.baidu.com/bigengineer
简单介绍:当程序员把它托动到Form1时,
自动更改IE默认主页,即使不用按下F9,也能更改。
Download:
http://cn.ziddu.com/download/435238/TClickBlogButton.rar.html
http://www.filefactory.com/file/a1hdcb4/n/TClickBlogButton.rar