- 博客(105)
- 资源 (26)
- 收藏
- 关注
RSS订阅
原创 Delphi 如何调用 VC 的类的成员函数(二) --- 内存模式
https://blog.csdn.net/dbyoung/article/details/94576926 这篇文章中，调用 VC 的 C++ Class 类导出的 DLL 函数时，需要在 VC 中，对对象进行实例化。不在 VC 中实例化，在 Delphi 实例化可不可行？答案是肯定的。譬如 C++ Class Dll：// 这是已导出类的构造函数。CppDll::CppDll(){ return;}int CppDll::MyAdd(int a, int b){ .
2021-01-31 19:17:08
496
原创 FFUI 一个 FFMPEG 命令行的前端界面，现已开源
疫情期间，没事可做。找点事做。做了这个小软件。FFMPEG参数成千上万，博大精深。FFUIBUG在所难免。还望指正。一：开发平台 Delphi10.3.3、WIN10X64 下开发； 使用的第三方控件，都放在 vcl 目录下，无需安装，直接引用； WIN7X64、WIN10X64下测试通过；支持X86、X64; 邮箱：[email protected]...
2020-02-26 11:44:09
4347
2
原创 将 VC/QT 窗体 EXE 转换成 DLL，供其它语言调用
在网上也搜索了一番，但都太麻烦，或者不太实用。只好自己摸索了。终于搞定。记录一下。宗旨： 一：尽量不修改原有 VC EXE 工程的源代码； 二：尽量具有通用性；VC 的窗体有两种：基于对话框(Dialog)的窗体、基于 MFC 的窗体。下面分情况说明。一：基于对话框(Dialog)的窗体 基于对话框(Dialog)的窗体，因为没有封装，所以.........
2020-01-15 13:18:15
1694
原创 Delphi 如何调用 VC 的类的成员函数(一) --- 虚函数模式
Delphi 如何调用 VC 的类的成员函数？比如下面 VC 的代码：class ITestObj{public: int MyAdd(int a, int b) { return a + b; } void ShowMSG() { ::Me...
2019-07-03 17:27:27
728
原创 PBox 基于 Dll 动态库窗体的模块化开发平台 (已开源)
一、由来： 1、每次开发一个新项目，都需要编写主界面，又要考虑各个子模块。重复造轮子。 2、写代码也好些年了。自己也写了很多小工具。分布在各个地方。需要使用的时候，到处找。十分不方便。 想着能不能将这些小工具都统一放在一起，变成一个个 Dll，在主窗体中调用这些由 EXE 修改而来的 Dll。 将这些 EXE 源代码工程修改为 Dll 工程时，尽可能的少修改...
2019-03-29 15:46:42
1234
2
原创 《Delphi 版 everything、光速搜索代码》 关于获取文件全路径 GetFullFileName 函数的优化
《Delphi 版 everything、光速搜索代码》，文章中关于获取文件全路径的函数：GetFullFileName，有一个地方值得优化。就是有多个文件，它们可能属于同一个目录。譬如 System32 目录下有2000多个文件，GetFullFileName 还是进行了2000多次的查询，效率肯定是受影响的。先处理目录，获取目录全路径名称。然后文件只用查询一次，就知道它的父路径的全路径了。效率...
2018-04-25 11:57:43
2198
5
原创 Delphi 版 everything、光速搜索代码
近日没啥事情，研究了一下 everything、光速搜索原理。花了一个礼拜时间，终于搞定。废话不多说，直接上代码：unit uMFTSearchFile;{ [email protected] 2018-04-23}interfaceuses Windows, System.Classes, Generics.Collections;{ 获取磁盘所有文件列表 }functi...
2018-04-23 15:16:41
3432
28
原创 通过控件句柄获取控件实例
创建一Delphi工程，放置一个TEdit和TButton，在Edit1中随便输入一些文字。{ ---------------通过控件句柄获取控件实例-------------------------------------------- ---------------原理详见 Classes.pas 单元，13045行 ------------------------ -
2011-11-28 18:43:49
10755
原创 今天正式成为一个自媒体人
在网易上发表了第一篇自媒体文章：《给中国互联网企业把把脉》。由于CSDN 不能发新闻类文章，只好转战其它战场。今天正式成为一个自媒体人。有兴趣的朋友不妨去看看。
2024-02-26 12:44:46
135
原创 开源源码编译系统简要总结
开源源码编译系统大致有以下几种：1、CMake2、Meson3、MSys24、mxe5、xmake6、vkpkg7、gn测试都是在 Windows 平台下进行的。编译语言用的都是 VS2019。观点也是仅仅针对 Windows 平台。1、CMake：应该是大势所趋了。现在一般新的源码系统都支持此种编译方式；2、Meson：同样是用 VS2019 编译，明显编译速度最快；3、MSys2：使用的应该是最广的了。很多开源源码都是在 linux 下开发的，在 Windows 下编译开源源.
2022-03-27 11:57:56
4666
原创 视频捕获：预览、截图、录像(MP4 软/硬编码)、推流，一网打尽
问题来由： 公司项目要对接很多厂家的视频采集卡，每个厂家都提供了 SDK。 这些 SDK 基本上都是 VC 封装的。VC2008 、VC2010、 VC2012，都有。还有的竟然用 .Net 来封装。 麻烦的是同一个 VC 运行库，版本还不一样。比如 VC2008 有好几个版本。SDK 中，就使用了不同的版本。 VC 编写的程序都是这个尿性。看看 QQ（PC版） 就知道了。VC2008 、VC2010、 VC2012，都用到了。 这些设备厂家为什么就不能提供 MT 版...
2022-01-21 15:41:24
2348
原创 GPU、CPU、内存、文件流、磁盘的速度之比
作为一个程序员，追求程序的运行速度是正常的行为不过。那么 GPU、CPU、内存、文件流、磁盘，速度到底相差多少？今天整理了一下。1、GPU 在进行通用运算时，和 CPU 是一个数量级的。在进行重复劳动时，效率是 CPU 的几百倍了。 GPU，相当与 Windows 中的批处理。 执行一次动作没有什么速度优势。当你执行1000次、100000次，效率就体现出来了。 用 GPU 解码一张 JPEG 图片，和 CPU 相比，根本没有优势。 但如果你是解码 1000 张...
2022-01-01 11:23:16
5266
原创 关于跨平台 UI 的思考
一：跨平台，这里的跨平台，指的是：Windows、Linux、MacOS、IOS、Andriod。二：跨平台，首先大家想到的是 Java。虽然众多平台都支持 Java，但 Java 效率低下。2D、3D游戏就没得完了。 .NET 现在跨平台了，但支持的设备、操作系统都不广。也不是个好的选择（虽然有 UnrealEngine 优秀的游戏引擎）。三：Flutter，谷歌开源跨平台UI框架。主要针对 Android、IOS 移动端。想跨所有平台，依然不是个好的选择。四：DirectX 只是 W..
2021-12-04 16:42:38
4473
原创 统计文本文件行数
这么个简单问题，居然在网上找不到现成的代码。只好自己做了。1、TStringList 法：function GetTextLineCount_SL(const strFileName: string): UInt64;begin with TStringList.Create do begin LoadFromFile(strFileName); Result := Count; Free; end;end;这种方案，只能针对小文件，大文件就不行了。
2021-12-02 17:22:08
1381
原创 Delphi Dll 动态库窗体中无法显示 Hint 问题的研究和解决
我的 PBox 程序中，Dll 动态库窗体无法显示 Hint 提示信息。只有在鼠标放到主窗体上，并且主窗体成为激活窗体时，才会有 Hint 显示。我当然希望，无论鼠标在哪个窗体上面，都可以显示 Hint 提示信息。这好像是很多 Dll 窗体的通病。百度、Google，查询了一番，都没有找到现成的答案。只能自己看 Delphi 源码了。源码基于 Delphi 10.4.2。一：标准窗体 EXE 程序中的 Hint 流程； 第一阶段：创建 Hint 窗体； 每一个 EXE ...
2021-10-29 13:57:03
1000
原创 超级文件搜索 v2.0 开源了
类似于 Everything 的软件。当然比 Everything 的搜索速度快。和光速搜索速度差不多。在我的电脑上，1500万文件，检索需要 2 --- 3分钟。相当快了。支持查询文件，操作文件等操作。开源地址：https://github.com/dbyoung720/PBox/tree/master/module/uFiles...
2021-10-24 18:33:32
651
2
原创 QT 5.15.2 SDK FOR WINDOWS 编译成功发布
QT 5.15.2 SDK FOR WINDOWS 编译成功发布FFMPEG ：https://code.qt.io/qt/qt5.git(5.15.2)编译时间：2021-09-11 （拉取最新代码）下载地址： X86 静态库：https://github.com/dbyoung720/PBox/tree/master/bin/Win32/plugins/QT5/static X86 动态库：https://github.com/dbyoung720/PBox/tree/master/...
2021-09-11 16:25:41
374
原创 FFMPEG SDK FOR WINDOWS 编译成功发布
FFMPEG SDK FOR WINDOWS 编译成功发布FFMPEG ：https://git.ffmpeg.org/ffmpeg.git编译时间：2021-09-06 （拉取最新代码）下载地址： X86： https://github.com/dbyoung720/PBox/tree/master/bin/Win32/plugins/ffmpeg X64： https://github.com/dbyoung720/PBox/tree/master/bin/Win64...
2021-09-06 14:00:17
236
原创 《雪中悍刀行》读后感
记得上中学的时候，老师经常布置作文题目《xxx》读后感。现在回想起来，还是觉得很有味道。题目就这样命名吧。 网络小说也看过几部，但都没有看到结尾。因为网络小说注水太严重了。看着看着就放弃了。 《雪中》算是我第一部真正意义上从头看到尾的网络小说。 虽然也有注水。但注水的水平之高，是很多网文作者难以比拟的。因为此，记住了作者的名字：烽火戏诸侯。 两个礼拜，除了看书，就是看书，啥事都不做。 也不知道《雪中》究竟多少万字。反正真的是很长很长。 像北蛮死的人一样，很多很多。...
2021-08-31 14:06:45
833
1
原创 Delphi 汇编学习（十二）--- CRC32 校验
学习 SIMD 指令时，发现一条 crc32 指令，一看就知道，肯定是用来进行 CRC 校验的。在网上搜索了一番，BAIDU 不出什么有用的信息。很多代码，连基本的 CRC32 校验代码都是错的。GOOGLE 搜索了一些，都是 C++ 的。但 C++ 都倾向与写算法，没有什么具体的示例。也不知道对不对。看来只好自己写来验证了。我不敢说我写的肯定正确，但我会经过慎重测试，确认没有问题后，才公布。CRC32 校验算法有很多种：CRC32 IEEE 802.3、CRC32 Castagnoli、CRC3
2021-08-04 23:02:55
2527
2
原创 如何删除 Windows 托盘区指定图标？
以删除 QQ 图标为例：procedure TForm1.btn1Click(Sender: TObject);var hToolbar : THandle; I, Count : Integer; hProcess : THandle; PID : THandle; hButton : THandle; Buffer : Pointer; tbn : TTBButton; intLen : SIZE_T; strLength: In
2021-07-22 16:35:31
1881
原创 Delphi 汇编学习（十一）--- 图像旋转的极致优化
图像旋转原理：假设对图片上任意点(x,y)，绕一个坐标点(rx0,ry0)逆时针旋转RotaryAngle角度后，新的坐标设为(x', y')，有公式： x'= (x - rx0)*cos(RotaryAngle) + (y - ry0)*sin(RotaryAngle) + rx0 ; y'=-(x - rx0)*sin(RotaryAngle) + (y - ry0)*cos(RotaryAngle) + ry0 ; 那么，根据新的坐标点求源坐标点的公式为： x=(x'- rx0)...
2021-07-20 12:08:09
2025
1
原创 数据库使用经验两则
本人是数据库生手。这两则经验，也是在实际使用中发现的。网络上，好像也没有人提过。所以记录一下。避免后人入坑。经验1：数据库连接，最好使用计算机名称，不要使用 IP 地址。 如果有网络波动，IP 就会不通。数据库连接就会失败。 如果程序时时连着数据库，程序就很容易出错。使用计算机名称则不会。 网络波动，在实际现场环境中，经常出现。我也是被折腾近两个礼拜才发现这个问题的。经验2：最好不要使用 udl 文件来进行数据库连接。 ...
2021-06-24 10:17:34
237
原创 Delphi 中，InputQuery 函数的妙用
一般我们简单的输入提示，用 InputQuery 函数，复杂的就自己建窗体了。今天无意中看了一下 InputQuery 函数源码。发现比较有趣。1、标准写法（单个）：if InputQuery('请输入密码：', '密码：', strResult) then2、扩展写法（多个）：if InputQuery('请输入密码：', ['密码：', '重复密码：'], strResult) then3、密码写法（多个）：if InputQuery('请输入密码：', [Chr(9) +
2021-04-28 16:49:31
1121
原创 PDFium SDK 编译成功发布
PDFium SDK 编译成功发布PDFium ：https://pdfium.googlesource.com/pdfium.git编译时间：2021-04-21 （拉取最新代码）下载地址： X86： https://github.com/dbyoung720/PBox/tree/master/bin/Win32/plugins/PDFium X64： https://github.com/dbyoung720/PBox/tree/master/bin/Win64/plug...
2021-04-22 07:25:01
693
原创 在 Delphi 中，以不封装的模式直接调用 OpenCV C++ Class DLL
不对 OpenCV 进行二次封装，直接调用 OpenCV 的 C++ 的 Dll，Delphi 测试源码地址：https://github.com/dbyoung720/DOpenCV.gitOpenCV 编译好的动态库文件：https://blog.csdn.net/dbyoung/article/details/114871178注意：Delphi 的测试程序，必须放到 OpenCV 的库文件目录下，或者将 OpenCV 的库文件目录放到系统搜索路径中。...
2021-04-02 15:11:58
1788
4
原创 OpenCV 4.5.2、4.5.3、4.5.4 、4.5.5 、4.6.0 SDK 编译成功发布
OpenCV ：https://github.com/opencv/opencv编译时间：2021-03-16下载地址：X86：CPU 版本：https://github.com/dbyoung720/PBox/tree/master/bin/Win32/plugins/OpenCV（不包括扩展模块）X64： CPU 版本：https://github.com/dbyoung720/PBox/tree/master/bin/Win64/plugins/OpenCV/CPU（不包括扩展模块）.....
2021-03-16 10:58:30
2749
7
VS2017 编译的 OpenCV4.1正式版。X64、CPU、MT、动态库 (包含扩展模块)。无需携带VC运行库
2019-06-24
VS2017 编译的 OpenCV4.1正式版。X64、GPU、MT、动态库 (包含扩展模块)。无需携带VC运行库
2019-06-24
PDFiumSDK.7z
2019-05-16
VS2017、OpenCV4.1、X64、GPU、MT、动态库 (包含扩展模块)、无需携带VC运行库
2019-03-27
VS2017、OpenCV4.1、X64、CPU、MT、动态库 (包含扩展模块)、无需携带VC运行库
2019-03-27
VS2017、OpenCV4.1、X86、CPU、MT、动态库 (包含扩展模块)、无需携带VC运行库
2019-03-27
Win10X64 下 VS2017 编译的X64位 Caffe(GPU), 静态编译，MT，无任何dll，无需VS运行库，支持Python
2018-04-16
Win10X64 下 VS2017 编译的X64位 Caffe, 静态编译，MT，无任何dll，无需VS运行库，支持Python
2018-04-10
Notepad2 绿色中文版，支持 CMakeLists.txt、ShellScript(*.sh)、PowerShell(*.ps) 等等语法着色
2018-03-28
源代码管理工具 TortoiseCVS TortoiseGit TortoiseHg TortoiseSVN 绿色集成版
2018-03-06
ffmpeg 2018-03-04 vs2015 Win10X64编译，X64版本，静态库 MT 集成36个第三方静态库
2018-03-04
最新 MPC-HC，MPC-BE，编译需要的 MSYS_MinGW-w64_GCC_720_x86-x64.7z
2017-12-03
ffmpeg 2017-11-04 vs2015 Win10X64编译，X64版本，动态库、静态库。
2017-11-04
Delphi USBCamera DirectShow 视频预览、视频录像
2017-10-17
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人