自己写的程序如何执行其它人写的DELPHI程序TOOLBAR上面的按钮事件

Delphi > Windows SDK/API
收藏 回复
[问题点数：100分，结帖人wmajia]
更多帖子
私信 空间 博客
wmajia
等级
本版专家分：40
结帖率 100%
普通的BUTTON通过SPY++可以找到柄，然后通过SendMessage发一个鼠标单击事件就可以了

但TOOLBAR通过SPY++,只能定位到整个TToolbar，这个上面有好多个BUTTON用SPY++是没办法区分到的。

也就没办法通过SendMessage搞定了。求大神支招。


另外看了一篇文章很受启发（http://blog.csdn.net/flyfish1986/article/details/6211026）

用CreateRemoteThread执行别人程序中的代码，DELPHI程序按钮的响应函数用DeDe工具很容易定位到！

但有个地方搞不定的是，Delphi的按钮事件，我印象中至少有个TObjecct参数，用CreateRemoteThread执行这个响应函数，没办法正确传入这个参数。不知道有没有哪位研究过。


只看楼主 引用 举报 楼主 收起
展开阅读全文
更多帖子
私信 空间 博客
lyhoo163
等级
本版专家分：50543
勋章
Blank
签到新秀
Blank
红花 2018年11月 Delphi大版内专家分月排行榜第一
2018年5月 Delphi大版内专家分月排行榜第一
2018年2月 Delphi大版内专家分月排行榜第一
2018年1月 Delphi大版内专家分月排行榜第一
2017年12月 Delphi大版内专家分月排行榜第一
2017年8月 Delphi大版内专家分月排行榜第一
2017年7月 Delphi大版内专家分月排行榜第一
2017年5月 Delphi大版内专家分月排行榜第一
2017年3月 Delphi大版内专家分月排行榜第一
2017年2月 Delphi大版内专家分月排行榜第一
2016年12月 Delphi大版内专家分月排行榜第一
2016年11月 Delphi大版内专家分月排行榜第一
2016年10月 Delphi大版内专家分月排行榜第一
2016年9月 Delphi大版内专家分月排行榜第一
2016年8月 Delphi大版内专家分月排行榜第一
2016年7月 Delphi大版内专家分月排行榜第一
2016年6月 Delphi大版内专家分月排行榜第一
2016年5月 Delphi大版内专家分月排行榜第一
2016年4月 Delphi大版内专家分月排行榜第一
2016年3月 Delphi大版内专家分月排行榜第一
2016年2月 Delphi大版内专家分月排行榜第一
2016年1月 Delphi大版内专家分月排行榜第一
2015年12月 Delphi大版内专家分月排行榜第一
2015年11月 Delphi大版内专家分月排行榜第一
2015年10月 Delphi大版内专家分月排行榜第一
2015年9月 Delphi大版内专家分月排行榜第一
2015年8月 Delphi大版内专家分月排行榜第一
2015年7月 Delphi大版内专家分月排行榜第一
2015年6月 Delphi大版内专家分月排行榜第一
2015年5月 Delphi大版内专家分月排行榜第一
2015年4月 Delphi大版内专家分月排行榜第一
2015年3月 Delphi大版内专家分月排行榜第一
2015年2月 Delphi大版内专家分月排行榜第一
2015年1月 Delphi大版内专家分月排行榜第一
2014年12月 Delphi大版内专家分月排行榜第一
2014年11月 Delphi大版内专家分月排行榜第一
Blank
黄花 2017年11月 Delphi大版内专家分月排行榜第二
2017年4月 Delphi大版内专家分月排行榜第二
2017年1月 Delphi大版内专家分月排行榜第二
2014年10月 Delphi大版内专家分月排行榜第二
2014年9月 Delphi大版内专家分月排行榜第二
两种方式：
1、找到该ＥＸＥ文件执行后，事件在内存的地址。直接从该地址处运行。
2、编程做个程序：
  （1）鼠标移到该位置
  （2）模拟鼠标点击事件。

具体代码 ，自己做吧。
只看TA 引用 举报 #1得分 0
更多帖子
私信 空间 博客
wmajia
等级
本版专家分：40
这两个都是我说的办法啊，第一个，事件在内存中的地址，那个地址，堆栈中有参数，TObject

第二个，鼠标移到位置，这个位置程序位置会变，而且必须要求程序不能最小化，SENDMESSAGE的话，只要找到句柄，程序最小话，也是可以运行CLICK事件。


引用 1 楼 lyhoo163 的回复:
两种方式：
1、找到该ＥＸＥ文件执行后，事件在内存的地址。直接从该地址处运行。
2、编程做个程序：
  （1）鼠标移到该位置
  （2）模拟鼠标点击事件。

具体代码 ，自己做吧。
只看TA 引用 举报 #2得分 0
更多帖子
私信 空间 博客
早打大打打核战争
等级
本版专家分：25824
勋章
Blank
签到新秀
Blank
红花 2021年1月 C++ Builder大版内专家分月排行榜第一
2019年2月 其他开发语言大版内专家分月排行榜第一
2019年1月 Delphi大版内专家分月排行榜第一
2018年8月 Delphi大版内专家分月排行榜第一
2018年7月 Delphi大版内专家分月排行榜第一
2018年4月 Delphi大版内专家分月排行榜第一
2018年3月 Delphi大版内专家分月排行榜第一
Blank
黄花 2016年11月 Delphi大版内专家分月排行榜第二
Blank
蓝花 2011年10月 其他开发语言大版内专家分月排行榜第三
2010年8月 其他开发语言大版内专家分月排行榜第三
2007年5月 其他开发语言大版内专家分月排行榜第三
不是TObject，是self，触发事件的object实例。
获取这个实例也不复杂，既然“DELPHI程序按钮的响应函数用DeDe工具很容易定位到”，那把exe中该事件处理函数的第一字节改成0xcc（int 3），然后用调试器加载此exe，运行，点那个按钮，会断点在事件处理函数，此时的eax就是self。
只看TA 引用 举报 #3得分 0
更多帖子
私信 空间 博客
wmajia
等级
本版专家分：40
谢谢， ollydbg曾经经常用，基本调试和反向跟踪还有些印象。如果按你的意思，那就是说，在执行这个线程时，只要让EAX是正确的值就可以了。

这地方有个问题，就是DELPHI程序每次关闭再重启，这个EAX中的值应该是不同的。既然是类似外挂，总不可能每次加载调试器吧？


引用 3 楼 DelphiGuy 的回复:
不是TObject，是self，触发事件的object实例。
获取这个实例也不复杂，既然“DELPHI程序按钮的响应函数用DeDe工具很容易定位到”，那把exe中该事件处理函数的第一字节改成0xcc（int 3），然后用调试器加载此exe，运行，点那个按钮，会断点在事件处理函数，此时的eax就是self。
只看TA 引用 举报 #4得分 0
更多帖子
私信 空间 博客
早打大打打核战争
等级
本版专家分：25824
勋章
Blank
签到新秀
Blank
红花 2021年1月 C++ Builder大版内专家分月排行榜第一
2019年2月 其他开发语言大版内专家分月排行榜第一
2019年1月 Delphi大版内专家分月排行榜第一
2018年8月 Delphi大版内专家分月排行榜第一
2018年7月 Delphi大版内专家分月排行榜第一
2018年4月 Delphi大版内专家分月排行榜第一
2018年3月 Delphi大版内专家分月排行榜第一
Blank
黄花 2016年11月 Delphi大版内专家分月排行榜第二
Blank
蓝花 2011年10月 其他开发语言大版内专家分月排行榜第三
2010年8月 其他开发语言大版内专家分月排行榜第三
2007年5月 其他开发语言大版内专家分月排行榜第三
传入的self是调用事件处理过程的对象实例，具体实现就是对象实例的内存地址（指针），理论上是可能每次程序运行都不同的，因为windows加载exe可以到不同的起始地址，而不必依照pe头的image base，但实际上不需要考虑，这种情况几乎不会出现。
只看TA 引用 举报 #5得分 0
更多帖子
私信 空间 博客
Playmaster
等级
本版专家分：1472
Toolbar上的button不是普通的button，一般都是speedbutton，一个TGraphic派生的控件，
本质上不是窗口，也没有窗口句柄。
只看TA 引用 举报 #7得分 0
更多帖子
私信 空间 博客
wmajia
等级
本版专家分：40
试了一下，这个EAX值是变的，程序关闭重启是变的。DELPHI应该是动态创建BUTTON，每个BUTTON没有固定的CTRLID，这点跟VC写的程序也不一样，VC程序每个控件有唯一的CTRLID. 如果是动态创建实例，那地址肯定是不一样的，这个跟EXE加载的IMAGE BASE还是有区别IMAGE BASE一般保证程序的SECTION加载到基于IMAGE BASE的一个固定地址。而动态NEW出来的实例，在内存中地址肯定是不同的。


引用 5 楼 DelphiGuy 的回复:
传入的self是调用事件处理过程的对象实例，具体实现就是对象实例的内存地址（指针），理论上是可能每次程序运行都不同的，因为windows加载exe可以到不同的起始地址，而不必依照pe头的image base，但实际上不需要考虑，这种情况几乎不会出现。
只看TA 引用 举报 #8得分 0
更多帖子
私信 空间 博客
早打大打打核战争
等级
本版专家分：25824
勋章
Blank
签到新秀
Blank
红花 2021年1月 C++ Builder大版内专家分月排行榜第一
2019年2月 其他开发语言大版内专家分月排行榜第一
2019年1月 Delphi大版内专家分月排行榜第一
2018年8月 Delphi大版内专家分月排行榜第一
2018年7月 Delphi大版内专家分月排行榜第一
2018年4月 Delphi大版内专家分月排行榜第一
2018年3月 Delphi大版内专家分月排行榜第一
Blank
黄花 2016年11月 Delphi大版内专家分月排行榜第二
Blank
蓝花 2011年10月 其他开发语言大版内专家分月排行榜第三
2010年8月 其他开发语言大版内专家分月排行榜第三
2007年5月 其他开发语言大版内专家分月排行榜第三
引用 8 楼 wmajia 的回复:
试了一下，这个EAX值是变的，程序关闭重启是变的。DELPHI应该是动态创建BUTTON，每个BUTTON没有固定的CTRLID，这点跟VC写的程序也不一样，VC程序每个控件有唯一的CTRLID. 如果是动态创建实例，那地址肯定是不一样的，这个跟EXE加载的IMAGE BASE还是有区别IMAGE BASE一般保证程序的SECTION加载到基于IMAGE BASE的一个固定地址。而动态NEW出来的实例，在内存中地址肯定是不同的。


Quote: 引用 5 楼 DelphiGuy 的回复:

传入的self是调用事件处理过程的对象实例，具体实现就是对象实例的内存地址（指针），理论上是可能每次程序运行都不同的，因为windows加载exe可以到不同的起始地址，而不必依照pe头的image base，但实际上不需要考虑，这种情况几乎不会出现。


动态创建并不代表在内存中的地址不固定，只要创建时机是确定的，比如程序启动时按顺序自动创建的组件，而不是在运行时随机创建，那么创建的对象实例的存地址就是固定的（相对于image base）。我写了个小程序测试了一下，空form上面放一个toolbar，toolbar上new出个button，双击button添加点击事件，在里面写上：asm  int 3 end; 编译生成exe，用调试器加载运行，点按钮进入断点，就我的测试，每次运行产生的对象实例(eax)都是一样的。
至于你测试的结果“这个EAX值是变的”，我估计要么是你断点的位置不对，要么这个toolbar是位于某个动态创建的form上，而不是自动创建的form上。

只看TA 引用 举报 #9得分 100
更多帖子
私信 空间 博客
wmajia
等级
本版专家分：40
十分感谢你在这个问题上的帮助!

函数入口点地址，我是用的一个DELPHI反编译工具，功能比较强大 ，你可以在看雪论坛下载，对DELPHI程序还是有些价值的（http://tools.pediy.com/windows/Decompilers/Delphi/DeDe/DeDeDark.rar）。 
从调试来看，应该是函数入口点。有可能是你说的第二种。我再跟踪一下。是个期货交易程序，我只是想借这个程序获取得前面一段时间的历史价格。然后放进自己写的程序里面，进行一个价格运算。这个BOOLBAR上面的按钮，是刷新功能。


引用 9 楼 DelphiGuy 的回复:
动态创建并不代表在内存中的地址不固定，只要创建时机是确定的，比如程序启动时按顺序自动创建的组件，而不是在运行时随机创建，那么创建的对象实例的存地址就是固定的（相对于image base）。我写了个小程序测试了一下，空form上面放一个toolbar，toolbar上new出个button，双击button添加点击事件，在里面写上：asm  int 3 end; 编译生成exe，用调试器加载运行，点按钮进入断点，就我的测试，每次运行产生的对象实例(eax)都是一样的。
至于你测试的结果“这个EAX值是变的”，我估计要么是你断点的位置不对，要么这个toolbar是位于某个动态创建的form上，而不是自动创建的form上。
只看TA 引用 举报 #10得分 0
收起
收藏 回复
wmajia

等级：

关注 私信 TA的帖子
如何向其他程序中的toolbar中ToolButton发送点击按钮???

如何向其他程序中的toolbar中ToolButton发送点击按钮??? Delphi / Windows SDK/APIhttp://www.delphi2007.net/DelphiAPI/html/delphi_20061112160354251.html 可以找到toolbar的句柄， 在Toolbar中的按扭也没有句柄...

delphi控件属性和事件

　Action：该属性是与组件关联的行为，允许应用程序集中响应用户命令 　Anchors：与组件连接的窗体的位置点 　Align：确定组件的对齐方式 　AutoSize：确定组件是否自动调整其大小 　BiDiMode：（所有组件） 为...

C#基础教程-c#实例教程，适合初学者

本章介绍C#语言的基础知识，希望具有C语言的读者能够基本掌握C#语言，并以此为基础，能够进一步学习用C#语言编写window应用程序和Web应用程序。当然仅靠一章的内容就完全掌握C#语言是不可能的，如需进一步学习C#语言...

008_《Delphi6程序设计教程》

本书深入浅出、全面、系统地介绍了使用Delphi 6开发应用程序的技术。全书共有12章，主要介绍了Delphi 6的编程语言——Object Pascal；Delphi 6面向对象的特性；程序设计的基本操作(窗体和菜单的设计)；设计程序的...

用浏览器控件做界面，网页界面中定义自己的程序事件

在用Delphi、Visual Basic等可视化快速开发工具编写Windows应用程序时，常会遇到这样几个问题： 1) 希望程序界面美观。在Delphi中，开发人员通常使用各种控件来实现界面的风格化，但缺点是造成应用程序体积较大，且...

delphi编写mac程序_用Delphi编写可识别网络的应用程序

delphi编写mac程序 Of all the components thatDelphi provides to support applications that exchange data over a network (internet, intranet, and local), two of the most common areTServerSocket and ...

068_《Delphi7控件实用程序设计100例》

这些实例按照完成功能可划分为窗口与界面，图形处理，多媒体，网络，数据库与报表，系统、文件及其他控件等几方面的内容，涵盖了Delphi7控件应用开发的上要方面。其中，Delphi 7自带控件实例与第三方控件实例各占...

Delphi for iOS开发指南(10): 在iOS应用程序中使用Layout来调整窗体尺寸或排列方向

在FireMonkey Mobile Form Designer中，你可以预览用户界面，而不需要在Device上运行应用程序-只需要在右上角的下拉框中更改一下Device或排列方向：           每个FireMonkey组件都有一个Own

delphi组件说明

Delphi常用组件中常见属性,常见事件简介 ALIGN：设置组件对齐(同其父容器)方式 BORDERSTYLE：设置组件边框形状 CAPTION：设置组件标题 CTL3D：设置组件边框是否为3D模式,若BORDERSTYLE设置为BSNONE则此属性...

090_《Delphi6控件实用程序设计100例》

这些实例按照完成功能可划分为窗口与界面，图形处理，多媒体，网络，数据库与报表，系统、文件及其他控件等几方面的内容，基本涵盖了Delphi 6控件应用开发的主要方面。其中Delphi 6自带控件实例与第三方控件实例各占...

C、C++控制台程序、Windows API程序、MFC程序理解与比较

在面向过程的编程方式中，函数更是程序的基本构建模块，在面向对象的编程方式中，函数演变为类或对象的成员（当然也可以使用与类无关的函数）。函数由函数头和函数体组成。函数头包括域属性（如external、static或类...

手把手教delphi:写你的dll文件

http://www.cnblogs.com/lovejsw2000/archive/2008/11/7.html 手把手教delphi:写你的dll文件 在Delphi中静态调用DLL top 调用一个DLL比写一个DLL要容易一些。首先给大家介绍的是静态调用方法，稍后将介绍动态调用...

Delphi常用组件中常见属性,常见事件简介

<br />ALIGN 设置组件对齐(同其父容器)方式 BORDERSTYLE 设置组件边框形状 <br />CAPTION 设置组件标题 CTL3D 设置组件边框是否为3D模式,若BORDERSTYLE设置为BSNONE则此...

Delphi IDE扩展开发向导

作者：Borland(由CnPack翻译) 来源：www.CnPack.org 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 ...38

Delphi XE4 iOS应用程序开发(2)

实现用户更改日期的事件处理过程 在用户更改了日期之后，OnChange事件会被触发。你可以给OnChange事件实现一个事件处理过程来响应用户的动作。 要实现OnChange事件处理过程： 1. 选择TCalendarEdit组件。 ...

Delphi整理一（基础知识）

组件的认识StandardMainMenu:下拉式菜单 ...Button：普通按钮 Check：多选按钮 RadioButton：多选按钮 ListBox：下拉列表框 ComboBox：组合框 ScrollBar：滚动条 GroupBox：组框 RadioGroup：设计单选按钮组 P

delphi常见属性事件说明

DELPHI常见属性说明：align 设置组件对齐（同其父容器）方式borderstyle 设置组件边框形状caption 设置组件标题ctl3d 设置组件边框是否为3D模式，若borderstyle设置为bsnone则此属性无效color 设定组件背景颜色...

使用Delphi进行相机访问

原文：https://community.idera.com/developer-tools/b/blog/posts/mit-delphi-zu-mobilen-welten---app-programmierung-tutorial-teil-2-kamera-zugriff-mit-delphi 应用编程教程第2部分：使用Delphi进行相机...

Delphi Project 之工程管理器（Project Manager）

工程（Project）可以说是Delphi的生命。不可能创建一个没有工程的程序。利用工程可以把全部工作组合到一起，从而创建出可以执行的应用程序。 一般来说，每个工程都需要管理。也许要增加一个新的单元到工程中，或是...

华中科技大学educoder存储系统设计全部通关

华中科技大学educoder存储系统设计全部通关包含四路组和二路组，用了四天做的，查看电路把txt内容复制到circ文件中用logisim打开即可

Activiti 工作流入门到大神

什么是流程、工作流作用、Activiti背景简介、Activiti流程设计器安装、Activity环境搭建、通过HelloWorld掌握 Activiti操作流程的步奏、常见API使用、流程部署管理(发布流程、查看流程定义、删除流程、查看流程附件)、流程实例管理(启动流程、查看任务、认领任务、办理任务、查看流程状态) 什么是流程、工作流作用、Activiti背景简介、Activiti流程设计器安装、Activity环境搭建、通过HelloWorld掌握 Activiti操作流程的步奏、常见API使用、流程部署管理(发布流程、查看流程定义、删除流程、查看流程附件)、流程实例管理(启动流程、查看任务、认领任务、办理任务、查看流程状态) QQ:362969068

Microsoft Visual C++ 2015-2019 运行库合集，包含32位64位

Microsoft Visual C++ 2015-2019 运行库合集，32位64位都有，解决缺失dll包问题。

OpenGL

课程涵盖了OpenGL开发的方方面面,对开发中经常用到的开发知识点进行讲解,从实战的角度进行编码设计. 第1章-环境建立 第2章-基础图元 第3章-三维世界 第4章-纹理多彩世界 第5章-显存的分配-优化 第6章-场景控制 第7章-光照-真实世界 第8章-模型 第9章-UI制作 第10章-场景编辑器制作 第11章-地形 第12章-脚本引入-lua 教程从最最本的固定管线开始,一节课一个知识点,从实战的角度出发,结合项目开发中经常用到的知识点作深入的讲解,以面向对象的编成方式对知识点进行封装,可以直接引入到项目中使用.通过课程的学习,掌握OpenGL图形编程技巧,并能学以致用.

STM32F103C8T6最小系统原理图

STM32F103C8T6最小系统原理图文件，包括电源电路、单片机等 11111111111111111111

Hibernate4视频教程_全面来袭

本Java视频教程基于 Hibernate4.x 录制。内容涵盖安装 Hibernatetools 插件、Session 核心方法、持久化对象生命周期、对象关系映射（1-n、1-1、n-n、继承映射）、检索策略、检索方式（对象导航图、OID 检索、HQL、QBC、本地SQL）、Hibernate 一\二级缓存、管理 Session、批量处理等 Hibernate 企业级开发的核心技术。 本Java视频教程将帮助掌握学习者编写出具有合理的软件架构，以及好的运行性能和并发性能的实用 Hibernate 应用。Java视频教程内容注重理论与实践相结合，列举大量具典型性和实用价值的 Hibernate应用实例，并提供详细的开发和部署步骤。

从零基础开始用Python处理Excel数据.pdf

首先学习Python的基础知识，然后使用Python来控制Excel，做数据处理。 Excel使用者、Python爱好者、数据处理人员、办公人员等 第1章 python基础 1.1 什么是python？ 1.2 为什么要学习用Python处理Excel表格？ 1.3 手把手教你安装python程序 1.3.1 下载python 1.3.2 安装python 1.3.3 验证是否安装成功 1.4 安装Python集成开发工具PyCharm 1.4.1 下载 1.4.2 安装 1.5 Python的输入与输出

go语言就业指南

授人予鱼不如授人予渔,本课程不但包含go语言从业者所的技能，而且还包含开发人员在开发中的学习技巧。掌握这些技巧和技能可以让你在面试中游刃有余。学习过程中任何问题联系: 4223665 1、掌握go语言基础 2、掌握go语言网络编程 3、掌握go语言并发编程 4、掌握go语言调试技巧 5、掌握go语言反射基础 6、掌握Cgo基本开发 7、掌握通过文档查阅所需资料的能力

互联网+大赛商业计划书案例（慧淬 国赛金奖）.pdf

互联网+创新创业大赛国赛金奖——“慧淬”，商业计划书 互联网+创新创业大赛国赛金奖——“慧淬”，商业计划书

matlab教程ppt(完整版).pdf

MATLAB信号处理详解 结合MATLAB最新版本系统地介绍信号处理及现代信号处理或者非平稳信号处理(包括信号处理、阵列信号处理、时频分析及高阶谱分析)的基本理论及在工程应用中的一些基本方法；详细地介绍MATlLAB工具箱函数的用法；最后结合一些应用实例，说明基于MATLAB进行分析与设计的方法。 《MATLAB信号处理》首次将信号处理涉及的各种MATLAB工具箱全面加以说明分析，简明扼要地介绍相关领域的基本概念和基本理论，重在讲述有关基本理论和物理背景，避开繁复的推导和中间过程，结合编程应用介绍工具箱函数的功能及用法，并且通过各种应用实例阐述如何利用MATLAB工具箱来解决工程应用问题。

Python疫情大数据分析之可视化分析、GIS地图及文本挖掘代码（博客前三篇）

该资源是针对这次肺炎疫情写个Python大数据分析系列博客，包括网络爬虫、可视化分析、GIS地图显示、情感分析、舆情分析、主题挖掘、威胁情报溯源、知识图谱、预测预警及AI和NLP应用等。希望该系列线上远程教学对您有所帮助，也希望早点战胜病毒，武汉加油、湖北加油、全国加油。待到疫情结束樱花盛开，这座英雄的城市等你们来。 基础性资源，希望对您有所帮助。 详见内容： [Pyhon疫情大数据分析] 三.新闻信息抓取及词云可视化、文本聚类和LDA主题模型文本挖掘 https://blog.csdn.net/Eastmount/article/details/104698926 [Pyhon疫情大数据分析] 二.PyEcharts绘制全国各地区、某省各城市疫情地图及可视化分析 https://blog.csdn.net/Eastmount/article/details/104437215 [Pyhon疫情大数据分析] 一.腾讯实时数据爬取、Matplotlib和Seaborn可视化分析全国各地区、某省各城市、新增趋势 https://blog.csdn.net/Eastmount/article/details/104298388 --------------------------------------------------------------- By：Eastmount CSDN

相关热词 c#書籍推薦 c#打印pdf中的图片 c# 抽象函数的作用 mono打包c# c#网关技术选型 c#比java简单 c#线程和锁 c# 秒表计时器 c#数组怎么写 c#后台分类管理源码