前往Shuct.Net首页

Shudepb PB反编译专家长时间以来,为业内同类软件事实上的唯一选择.细节,彰显专业.态度,决定品质.

关于PowerBuilder的搜索

PowerBuilder+Kodak Image Edit Control实现图片鼠标拖动、放大效果 - 在路上... - BlogJava 在路上... posts - 33, comments - 44, trackbacks - 0, articles - 2 导航 BlogJava 首页 新随笔 联系 聚合 管理 公告 时光荏苒,岁月流逝,仅以此纪念那一段走过来的开发岁月,希望哪天回首时,仍能想起一幕幕难忘的日子。 一个新的尝试,开始、而不知何时结束... [BlogJava分站] <2007年4月> 日一二三四五六2526272829303112345678910111213141516171819202122232425262728293012345 常用链接 我的随笔 我的评论 我的参与 最新评论 留言簿(5) 给我留言 查看公开留言 查看私人留言 随笔分类 Extjs相关 ILOG规则引擎 JAVA相关(21) PowerBuilder(1) 分享(2) 系统部署(2) 随笔档案 2013年10月 (1) 2013年9月 (1) 2013年4月 (1) 2012年3月 (1) 2012年1月 (6) 2011年12月 (2) 2011年7月 (1) 2011年6月 (1) 2011年1月 (2) 2009年10月 (1) 2008年7月 (1) 2008年6月 (4) 2008年1月 (1) 2007年10月 (2) 2007年9月 (1) 2007年4月 (1) 2007年1月 (1) 2006年9月 (1) 2005年12月 (1) 2005年10月 (1) 2005年9月 (1) 文章分类 java软件研究(2) 文章档案 2006年9月 (1) 2005年10月 (1) 网站链接 [cnblogs]在路上... 搜索 积分与排名 积分 - 72123 排名 - 496 最新评论 1.?smali代码问题 评论内容较长,点击标题查看 --jasonkent27 2.?re: smali文件语法参考 你们这帮鸟人又在修改别人程序据为己有吗? --个身体如 3.?re: smali文件语法参考 楼上的,这样改,寄存器使用数量:locals 4 --nansishan 4.?re: Windows环境下面搭建Object C开发环境[未登录] 评论内容较长,点击标题查看 --luke 5.?re: Windows环境下面搭建Object C开发环境 评论内容较长,点击标题查看 --黄 阅读排行榜 1.?smali文件语法参考(17213) 2.?Oracle整合BEA,WEBLogic的License可以免费下载了(8925) 3.?1分钟Java程序快速转换为windows服务运行(6021) 4.?WebLogic配置文件Config.xml中的{3DES}加密字符串的解密思路(5984) 5.?Oracle JDBC驱动与时间不见了的问题(3458) 评论排行榜 1.?Oracle JDBC驱动与时间不见了的问题(8) 2.?Oracle整合BEA,WEBLogic的License可以免费下载了(7) 3.?集成struts+spring的新思路(7) 4.?Windows环境下面搭建Object C开发环境(5) 5.?smali文件语法参考(4) PowerBuilder+Kodak Image Edit Control实现图片鼠标拖动、放大效果 Posted on 2007-04-11 17:21 在路上... 阅读(1334) 评论(0) 编辑 收藏 所属分类: PowerBuilder --> PowerBuilder在显示图片方面的确是一个弱项,以前一直没有找到好的方法,如果自己用delphi写个ActiveX控件,在关闭的时候总会出现错误,实在是很郁闷,后来发现Kodak Image Edit Control就没有这个问题,而且可以支持BMP,DCX,GIF,JPG-JFIF,PCX,TIFF,WIFF,XIF等常见的图片格式,该控件在win98,win2000等环境中都已经安装好了,对于XP环境也可以简单的从Win2000移植过来。1、鼠标放大、缩小效果在OLE控件的other事件中加入下面的代码 1Choose Case Message.Number 2 Case 522 3 if IntHigh(message.wordparm) = 120 then //鼠标滚轮向上 4 if int(ole_1.object.zoom)<=20 then return 5 ole_1.object.zoom= ole_1.object.zoom -10 6 else 7 ole_1.object.zoom= ole_1.object.zoom+10 8 end if 9 ole_1.object.display()10End Choose 2、鼠标拖动效果如果不想选择框老是出现的话,需要加入ole_1.object.SelectionRectangle = False 1//1.定义Instance变量2int mousex,mousey3int moveon 以下代码属于OLE控件的事件 1//Event MouseDown事件2moveon=13mousex=ocx_x4mousey=ocx_y 1//MouseMove事件2if moveon=0 then return3ole_1.object.ScrollPositionX =ole_1.object.ScrollPositionX+(MouseX -ocx_x)4ole_1.object.ScrollPositionY =ole_1.object.ScrollPositionY+(MouseY -ocx_y)5ole_1.object.refresh()6mousex=ocx_x7mousey=ocx_y 1//mouseUp事件2moveon=0 新用户注册 刷新评论列表 博客园 博问 IT新闻 Java程序员招聘 标题 请输入标题 姓名 请输入你的姓名 主页 请输入验证码 验证码 * 内容(请不要发表任何与政治相关的内容) 请输入评论内容 Remember Me? 登录 使用高级评论 新用户注册 返回页首 恢复上次提交 --> [使用Ctrl+Enter键可以直接提交] --> 网站导航: 博客园 IT新闻 知识库 C++博客 程序员招聘 管理 Powered by: BlogJava Copyright &copy; 在路上...