300分求多页面浏览器源码(300分)

  • 主题发起人 主题发起人 ivan526
  • 开始时间 开始时间
I

ivan526

Unregistered / Unconfirmed
GUEST, unregistred user!
我知道这对高手来说不难，不过我自己做的那个实在是惨不忍睹，
所以我想借鉴其他高手的代码。
谢谢了，我的分已经不多了，所以只能出300了。
 
代码: 
procedure TForm1.OpenData(const PageID: Integer);  // PageID 为页码
var
  J: Integer;
const
  The_PageSize = 5; // 每次显示5条记录
  strSQL = 'SELECT FirstName, LastName FROM Employees';
begin
  with ADOQuery1 do
  begin
    if not Active then
    begin
      Close;
      SQL.Text := strSQL;
      Open;
    end;

    Recordset.PageSize := The_PageSize;
    Recordset.AbsolutePage := PageID;
    for J := 1 to Recordset.PageSize do
    begin
      ListEmp(FieldValues['firstname'], FieldValues['lastname']);  // 一个显示的procedure
      Next;
      if Recordset.EOF then Break;
    end;
  end;
end;


以上代码使用SQL SERVER -> Northwind库 -> Employees表
通过了测试,你只要传入PageID就可以了,
另外,要提的一点是Recordset.PageCount
用户输入的PageID不一定是个有效值,(< 0, > PageCount, not a integer...)
你自己要判断了...
 
你可能理解错了我的意思了，我是说浏览器，就是上网用的那种，多页浏览器。
有吗？最好是完整代码。。 谢谢各位了：）
 
我的网站下载
http://www.datacn.com/acdown
 
Dream Web Browser 2003

这是我继电话录音精灵、SpeedCopy、Flash Explore 2002之后很长时间的又一作品，还是继承我一
贯的作风，本软件完全免费并开放源码：）

遵循GPL协议，免费，源代码公开，你可以修改代码或将它添加到自己的程序中去。
但修改后的程序源代码必须公开（详见GPL）。
如果你改进了程序，请给作者发一份代码。
作者保留版权（SQUALL[S&A SSC]）。

软件的雏形现在刚刚开发完毕，相信一定有不少的Bug，还请大家帮忙捉虫：）

求助：由于个人能力有限，软件中的一些资源不够丰富(搜索完全没有)，如果哪位朋友有兴趣帮忙制作的
话，请与我联系。（没有Money的哦，呵呵）

软件名称: Dream Web Browser 2003
软件版本: 0.56 Build 20021005 Beta
软件作者: SQUALL
作者邮箱: Squall@wz163.com
软件网站: http://sassc.126.com
软件语言: 多国语言支持
应用平台: Win9x/Win2000/WinXP + IE5.0以上
软件简介: 除浏览器的一般功能外，本软件具有以下特性：
1、多页面浏览(自适应标签栏)。
2、一拖即存(支持图片)。
3、网址过滤。
4、更大可视面积的全屏浏览(工具栏、标签栏智能弹出)。
5、最爱收藏让您拥有自已私人的收藏夹。
6、支持外挂工具，管理上网工具更加方便。
7、支持代理并有代理的管理功能。
8、支持地地址栏的快捷搜索。
9、拖动文本时用默认设置的搜索引挚搜索。
10、支持拖动打开链接。
11、丰富的页面下载控制。
12、方便的快速保存功能。
13、方便的清除浏览历史记录、历史记录可以进编辑。
还有更多的功能等着去发掘。

更新历史：
2002.9.30 0.54beta
增加按Ctrl键一拖即存，不用拖到指定位置就能保存了。
一拖即存智能判断是文本还是链接，避免保存多余的信息。
加强拖动打开功能，现在能拖动打开图片了。
修正中文语言包的一点问题。
换了个主程序图标。
修正遇自会自动关闭的页面时会有闪烁的问题。
修正了连续快速的添加黑名单时会出错的BUG。
匹配精度更高的过滤算法(不区分大小写)。
限至不能添加重复的过滤地址。
网址过滤管理加入上移下移功能。
启动画面换成Aries刚做好的，效果不错。
改进多国语言初始化部份代码。

2002.10.1 0.55beta
加入设置语言时提示重新启动程序。
修正IE5或以下版本使用前进、后退的菜单出错的Bug(此功能需IE5以上版本支持)
修正有些界字体在98下显示效果不好的问题。
修正98下拖动打开链接会有闪烁的问题。

2002.10.4 0.56beta
修正一些小Bug。
优化了部份代码。
重写了读取收藏部份的代码。
加入浏览栏搜索功能，支持群搜。
加入页面中键两种快捷方式：打开页面、全屏浏览。

2002.10.5 0.56beta
修正网址过滤不能过滤网页广告的BUG(会影正常的页面弹不出来)。
修正浏览栏中搜索不能被选中的BUG。
修正按Ctrl+Tab能切换页面，但标签栏不变的BUG。
修正了地址栏不能用快捷键复制、粘贴、剪切的BUG。
修正了地址栏输入网址时会打开网页的BUG。
暂时去掉中键功能(是滚轮时会出现滚轮鼠标的光标)。

2002.10.7 0.57beta(内部版本)
修正扩展工具栏的小问题。
修正拖动文本不能用默认快捷搜索打开的BUG。
把过滤器分为两部份：广告、弹出窗口。(广告过滤还有待加强)
加入自动过滤弹出窗口功能。
完成忽略脚本错误信息。
修正点击收藏条下链接出错的BUG。
 
to cxz9
在你的网站找不到那个浏览器软件，还有其他地址吗?
 
除了 EmbeddedWb 还有其他类似的组件吗？
 
关注中～～～～～～～～～～～～～～～～～～～～～
 
http://sassc.126.com这里找不到下载的
 
给我你的邮件地址我发给你一个。
 
cb-chen@163.com
谢谢您了
 
yckxzjj@163.com。
我也想要一份，学习学习！谢了！
 
wfzha@yiwu.com.cn
我也想要一份，谢了！

 
to admin
谢谢你了。
ivan526@21cn.com
如果我解决了问题，把分都给你了。
 
to cxz9:
已经收到，谢谢你了，好像你用了很多控件，能列出你用了的控件吗？
 
多人接受答案了。
 
您必须登录或注册才可回复。

Similar threads

Ray
[转]终于可以发布Delphi下收点OSGI精髓皮毛而设计的插件框架WisdomPluginFramework
回复
4
查看
4K
chlkuei
C
L
各位谁有多页浏览器的源代码！(300分)
回复
3
查看
131
lgdy520
L
山
500分求浏览器源代码（要求多页面）(300分)
2
回复
20
查看
306
wang_80919
W
山
发布多页面浏览器datacnie 原程序，差不多实现了myie的功能了(100分)
2
回复
31
查看
388
柳枫
柳
L
如何用DELPHI得到当前IE浏览器中的超级连接，并自动进入？？？？300分(300分)
回复
8
查看
269
晶晶
晶
后退
顶部