本文介绍了在Delphi编程中防止程序重复执行的多种方法,包括查找窗口法、使用互斥对象、全局原子法等。每种方法都有详细的代码示例和解释,帮助开发者根据实际需求选择合适的实现方式。
分类 软件 下的文章
主要是以Delphi为主- 首页
- 软件
Jam ShellBrowser Components v5.14是一套VCL组件,通过Windows95/NT的外壳名字方便浏览,包括TJamShellList、TJamShellTree和TJamShellCombo组件,类似资源管理器相关部分,支持属性页、图标、OLE拖放等,TJamShell...
本文介绍了如何在ListView控件中实现排序功能。首先,定义两个私有变量SortCol和SortWay,分别用于存储排序的列和排序方式。然后,通过ListView1ColumnClick事件处理程序实现点击列头进行排序的功能,通过改变SortWay的值来实现升序和降序的切换。最后,通过ListVi...
文章介绍了在Delphi 5下开发的控件如何在Delphi 6和7下使用,需要添加lib文件、修改源文件中的uses部分,并加入搜索路径。提供了两种解决方法,第一种是修改dpk文件和pas源文件,第二种是直接修改Delphi源文件,将Proxies单元从DesignEditors单元中剔除。
这段代码是一个Delphi语言编写的过程,用于查找指定目录下所有.jpg文件,并将它们的路径和文件名添加到一个字符串列表(TStringList)中。代码首先清除字符串列表,然后使用FindFirst和FindNext函数遍历目录,找到所有.jpg文件并添加到列表中。最后,使用FindClose关闭...
本文介绍了如何禁止webbrowser弹出窗口和脚本错误。通过设置silent属性为true,可以屏蔽脚本错误。同时,通过在WebBrowser1NewWindow2事件中设置Cancel为True,可以禁止弹出窗口。
本文介绍了如何使用Delphi编程语言批量修改组件属性。示例代码展示了如何遍历所有组件,检查是否为TIMageMouse类型,并将isActiveNow属性设置为True。
本文介绍了一个Delphi翻转图控件,该控件包含三个图像:默认图像、活动图像和移开图像。控件代码来源于大富翁论坛,作者增加了一个属性isActiveNow,用于在设计期区分默认图像和活动图像。控件的实现涉及到TImage类的继承、属性的读写、鼠标事件处理等。最后,提供了控件的注册和使用示例代码。
本文介绍了如何使用Delphi编程语言和位图来创建不规则形状的窗体。文章提供了详细的代码实现,包括创建窗体、按钮和图片控件,以及在窗体创建时根据位图生成不规则区域,并设置窗体的区域。此外,还提供了鼠标按下事件的处理,用于关闭窗体。
本文介绍了如何通过ODBC操作PostgreSQL数据库。作者最初使用OLE DB Provider连接PostgreSQL,虽然连接和查询操作成功,但在使用ADOQuery添加数据时遇到问题。后来,作者改用ODBC DSN方式,发现完全正常。文章还提到了PostgreSQL与MSSQL在语法上的一...
这段代码是一个Delphi程序,用于检测是否有调试器存在。如果检测到调试器,程序会显示一个消息框提示“请不要调试我!”,然后终止应用程序。代码中使用了LoadLibrary和GetProcAddress函数来加载kernel32.dll库并获取IsDebuggerPresent函数的地址。
本文介绍了一个用于检测DEDE反编译器的Procedure,名为Anti_DeDe。该程序专门针对2.5版本以后的DEDE反编译器。程序通过FindWindow函数查找反编译器窗口,如果找到,则使用SendMessage函数连续发送4500次关闭消息,以关闭反编译器窗口。
本文介绍了Delphi编程语言中用于反调试的技术,包括检测Dump、RegMON、FileMON等工具的函数,以及检测调试器如SoftIce、TRW、RegMON等的函数。这些函数通过返回True或False来确定调试工具或调试器是否正在运行,帮助开发者识别和防止程序被调试。
这段代码是一个用于检测Windows 2000/XP系统中是否安装了SoftIce调试器的函数。它通过汇编语言实现,使用中断指令和异常处理来判断SoftIce是否存在。如果检测到SoftIce,函数返回True;否则返回False。
本文介绍了如何使用Delphi语言获取计算机的MAC地址,包括集成网卡和非集成网卡。通过定义数据类型、函数和调用Netbios函数,可以获取并返回MAC地址字符串。代码中包含了获取MAC地址的详细步骤和函数实现,以及如何将MAC地址字符串分割和处理。最后,通过调用MacStr函数,可以将获取到的MA...
文章提供了一个用于获取非集成网卡MAC地址的Pascal函数NBGetAdapterAddress,该函数通过NetBios控制块、网卡状态和lana枚举来获取网卡的物理地址,并将其转换为字符串形式。函数首先初始化NetBios控制块,然后枚举网卡,重置网卡,最后获取网卡地址并将其转换为字符串。调用...