本文介绍了如何在Delphi中的ListView控件上为每个列表项添加进度条。首先,在FormShow事件中为每个列表项创建一个进度条,并设置其位置和样式。然后,在FormDestroy事件中释放这些进度条。最后,通过Timer控件定时更新进度条的进度。文章还提供了一个示例图片和源代码下载链接。
分类 软件 下的文章
主要是以Delphi为主- 首页
- 软件
在WinForm中,可以通过添加一个ImageList来设置ListView的行高。首先创建一个ImageList对象,并设置其ImageSize属性,其中高度值即为行高。然后将该ImageList设置为ListView的SmallImageList,从而实现行高的调整。
本文介绍了如何在程序运行时自动注册OCX或DLL文件。示例代码使用Delphi语言,首先检查OCX文件是否存在,然后加载库并获取注册函数,调用该函数完成注册。如果注册失败,程序会显示错误消息并终止。最后,程序创建并运行主窗体。
本文提供了熊猫烧香病毒的核心源码,包括程序代码和实现原理。代码中包含了病毒体大小、PE文件主图标偏移量、感染标记等关键参数,以及判断操作系统版本、复制流、提取文件、填充STARTUPINFO结构、发送带毒邮件、感染PE文件、摧毁文件、获取可写驱动器列表、遍历目录感染和摧毁文件等关键功能。文章强调,代...
本文介绍了如何在OCX控件中传递参数和调用方法。首先,在View窗口的typeLibrary接口处添加一个method,如果有输入输出参数,在parameters处添加参数,建议使用variant类型。无参数时,直接刷新即可增加函数。外部调用时,例如“samoolUploadImg.showAbou...
本文介绍了在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函数的地址。