DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: fhc2004
今日帖子: 16
在线用户: 14
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 hotyei (青出于蓝) ★☆☆☆☆ -
盒子活跃会员
2004/2/26 19:19:02
标题:
BIOS,我实现了“滚屏截图”啦!!! 浏览:2109
加入我的收藏
楼主: 我终于实现了滚屏截图,不过是的公司的电脑上,所以代码不能直接发上去。有空再发到盒子上。
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
作者:
男 zxdcj (月下舞者) ★☆☆☆☆ -
盒子活跃会员
2004/2/26 19:52:10
1楼: 萝卜兄,高明!
BIOS怎么还没来?
他会晕过去的啊~~~~保持低调
----------------------------------------------
-
作者:
男 hotyei (青出于蓝) ★☆☆☆☆ -
盒子活跃会员
2004/2/26 21:35:38
2楼: 会不会他现的已经晕了??要不他应该是一直的线的……
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/26 22:08:22
3楼: 水平和垂直同时吗?
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/26 22:17:22
4楼: 大哥: 
最近很忙啊,要面试 ,笔试
还要毕业论文 。
还要实习VC。
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 hotyei (青出于蓝) ★☆☆☆☆ -
盒子活跃会员
2004/2/26 22:17:42
4楼: 只是垂直,代码已经上传,正的等待审核。

bios你是使用 C++ 的 ?
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/26 22:19:59
5楼: 是工作需要!

福州人才招聘会:
50%:c#开发,java通信开发
20%:asp,vbscript,javascript,asp.net
20%:c++写unix底层短信服务器开发,
c++写LINUX操作系统底层管理,
模拟数字电路设计,印刷线路版设计,
机械设计!
10%:delphi数据库管理系统
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 hotyei (青出于蓝) ★☆☆☆☆ -
盒子活跃会员
2004/2/26 22:24:36
6楼: 的广东则不是,大多使用Delphi进行数据库开发的。但我使用的语言是这样的

Baise -> Turbo C -> BC++ 3.1 -> Watcom C++ -> VC++ 6.0 -> C++ Builder -> Delphi

使用 C++ 其实已经多年了,不过不好找工作。现的说起 C++,都忘记不少了。
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/26 22:26:46
7楼: C++是必须学习 大哥的代码传与何处啊!
不过 老外有很多概念和做法 偶都不是很理解

今天又发现CB的伪编译技术比D还强大的多,恐怖!
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/26 22:28:49
8楼: 偶要下了 明天再研究吧 首先感谢大哥一直以来的支持啊!
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 hotyei (青出于蓝) ★☆☆☆☆ -
盒子活跃会员
2004/2/26 22:30:23
8楼: 已经发布到演示文档去了,不过不大,我现在再贴上来。
此帖子包含附件:hotyei_2004226223022.rar 大小:173.8K
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/27 14:33:15
9楼: 感谢大哥!偶学习一下!
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/27 15:01:01
10楼: 大哥 偶看了你的程序了 
在此之前 偶的那个帖子中 ,http://bbs.2ccc.com/topic.asp?topicid=59149
奇奇怪大哥和CSDN上一个高手已经实现和大哥很接近
的效果,但这种程序碰到 屏幕上随意的控件时有时就不灵了,偶怎么看程序也看不出为什么?

如:(这正是偶要坚持讨论的难点所在)
此帖子包含附件:
JPEG 图像
大小:85.9K
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 jiaxing (jiaxing) ★☆☆☆☆ -
禁用账号
2004/2/27 17:09:24
11楼: ……
被禁用帐号,帖子内容自动屏蔽!
……

----------------------------------------------
-
作者:
男 jiaxing (jiaxing) ★☆☆☆☆ -
禁用账号
2004/2/27 17:12:19
12楼: ……
被禁用帐号,帖子内容自动屏蔽!
……

----------------------------------------------
-
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/27 17:12:44
12楼: 正常啊 在tool \environment option中的library页中设置编译路径就可以了!
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 blueway (舞雨) ★☆☆☆☆ -
盒子活跃会员
2004/2/27 17:15:45
12楼: delphi 没安装好???
----------------------------------------------
-
作者:
男 jiaxing (jiaxing) ★☆☆☆☆ -
禁用账号
2004/2/27 17:18:02
13楼: ……
被禁用帐号,帖子内容自动屏蔽!
……

----------------------------------------------
-
作者:
男 jiaxing (jiaxing) ★☆☆☆☆ -
禁用账号
2004/2/27 17:27:43
14楼: ……
被禁用帐号,帖子内容自动屏蔽!
……

----------------------------------------------
-
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/27 17:32:57
15楼: -
此帖子包含附件:
JPEG 图像
大小:72.6K
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 jiaxing (jiaxing) ★☆☆☆☆ -
禁用账号
2004/2/27 17:47:11
16楼: ……
被禁用帐号,帖子内容自动屏蔽!
……
此帖子包含附件:
GIF 图像
大小:11.1K
----------------------------------------------
-
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/27 19:04:42
17楼: 那偶也没办法了 重装吧
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 hotyei (青出于蓝) ★☆☆☆☆ -
盒子活跃会员
2004/2/27 22:14:34
18楼: 看来是只有重装了。

奇奇怪大哥的方法主要是计算大约每行的高度,而我的方法则是每滚动一行,就计算这行的高度,所以按道理更准确。我已经试过资源管理器的目录树和文件列表,以及TreeView,都可以正常截图。修正了一个Bug..再上传。。。

此帖子包含附件:hotyei_2004227221433.rar 大小:173.9K
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/27 22:18:28
19楼: 是否有水平方向大哥 偶认为这个不太容易因为
容器内部的所有内容实际宽高很难确定哦!
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/27 22:25:57
20楼: SI.nPos >= (SI.nMax - SI.nPage); //大哥 这个思考的依据是什么啊?
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 opq123 (opq123) ★☆☆☆☆ -
盒子活跃会员
2004/2/28 23:39:47
21楼: 试试这个

----------------------------------------------
-
作者:
男 opq123 (opq123) ★☆☆☆☆ -
盒子活跃会员
2004/2/28 23:52:25
22楼: : 试试这个

----------------------------------------------
-
作者:
男 hotyei (青出于蓝) ★☆☆☆☆ -
盒子活跃会员
2004/2/29 18:26:28
23楼: 只是因为当滚动条滚到最后时,他的位置并不一定就等于滚动条最大位置减去一个页面大小,所以加上 >=

SI.nPos >= (SI.nMax - SI.nPage); 

我发现宽度是像素值的,但高度就不一定是像素值,可能是行数,所以宽度比较容易得到。
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/29 19:27:23
24楼: ACanvas.MoveTo(0,RectHeight(ARect) div 2);
  ACanvas.LineTo(3,RectHeight(ARect) div 2);

这个用意是什么啊
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/2/29 19:30:05
25楼: function TForm1.NextLineHeight(AHandle: THandle; ARect: TRect): Integer;
var
  i : Integer;
  ABuf : TBitmap;
begin
  ABuf := TBitmap.Create;
  ABuf.Width := 3;
  ABuf.Height := RectHeight(ARect) div 2;

  Result := 0;
  BitBlt(ABuf.Canvas.Handle,0,0,3,RectHeight(ARect),GetDC(AHandle),0,0,SRCCOPY);
  for i := ABuf.Height -1 downto 0 do
  begin
    if ABuf.Canvas.Pixels[2,i] = TAGCOLOR then Break;
    Result := Result + 1;
  end;
  ABuf.Free;
end;

这个是 怎么想的啊?
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
作者:
男 hotyei (青出于蓝) ★☆☆☆☆ -
盒子活跃会员
2004/2/29 20:03:51
26楼: 给你一张图,画得很辛苦的。

此帖子包含附件:
JPEG 图像
大小:24.2K
----------------------------------------------
米软科技有限公司http://www.szmesoft.com
作者:
男 bios (阿贡) ★☆☆☆☆ -
盒子中级会员
2004/3/1 10:46:33
27楼: 大哥 真是太厉害 多多学习!偶对这种抽象的想象力还需要增强学习
,偶认为如何是 水平也加进来就难了,因为他们并不一定等长!
所以如何得到 内容本身正常的高度和宽度是个问题!
----------------------------------------------
按此在新窗口浏览图片
按此在新窗口浏览图片
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行179.6875毫秒 RSS