摘要: 使用IPC收发消息可以在Windows和Linux下通用。其它系统没测试。 1、在system选项卡中选择TSimpleIPCServer和TSimpleIPCClient加到窗口中 SimpleIPCClient1: TSimpleIPCClient; SimpleIPCServer1: TSim 阅读全文
posted @ 2024-07-23 18:35 禁卫军 阅读(3) 评论(0) 推荐(0) 编辑
摘要: 一、下载Onnxruntime GitHub - microsoft/onnxruntime: ONNX Runtime: cross-platform, high performance ML inferencing and training accelerator 注意win7运行时会出错。 可 阅读全文
posted @ 2024-06-23 10:51 禁卫军 阅读(10) 评论(0) 推荐(0) 编辑
摘要: 一、下载ffmpeg-delphi-pascal-headers 下载地址Headers | FFVCL – Delphi FFmpeg VCL Components(Video Encoder and Video Player) 下载 Releases · BtbN/FFmpeg-Builds · 阅读全文
posted @ 2024-05-16 21:07 禁卫军 阅读(27) 评论(0) 推荐(0) 编辑
摘要: 目前Lazarus只能支持到opencv2.4.13的直接调用。要调用高版本的Opencv只能用其它语言生成dll等间接调用。经过对Opencv和C++数据的研究。可以使用Lazarus直接调用高版本的Opencv了。 以下是调用Opencv4.70的简单例子。 一、定义类型和函数 {$IfDef 阅读全文
posted @ 2024-05-06 20:47 禁卫军 阅读(51) 评论(0) 推荐(0) 编辑
摘要: 泛型类型数组type generic TArray<T> = array of T; 调用var IntArray: specialize TArray<Integer>; StrArray: specialize TArray<string>;begin SetLength(IntArray, 3 阅读全文
posted @ 2024-05-06 20:13 禁卫军 阅读(21) 评论(0) 推荐(0) 编辑
摘要: 问题:在VC中定义了一个函数 extern "C" __declspec(dllexport) int test(const char* filename) filename中可能有中文。 Lazarus调用test传英文没问题,传中文出错。 1、在VC项目设置-高级中 选择“使用 Unicode 阅读全文
posted @ 2024-03-19 20:24 禁卫军 阅读(74) 评论(0) 推荐(0) 编辑
摘要: YoloV4可以用opencv4.0以上加载和使用。但是Lazarus只能支持到opencv2.4.13。所以不能直接使用yolov4,后来只好用VC写了一个dll,调用Opencv4.81再调用YoloV4。 在Lazarus下调用这个dll就可以用yolov4了,方法如下 一、声明dll库 // 阅读全文
posted @ 2024-03-15 22:36 禁卫军 阅读(34) 评论(0) 推荐(0) 编辑
摘要: 一、在要回调的单元加一个回调类 type TMyCallback =procedure(X, Y: Integer;...其它参数) of object; 二、在单元 TMyClass=class()中加下面的回调过程变量 public FMyCallback: TMyCallback; 三、在要使 阅读全文
posted @ 2024-03-07 20:47 禁卫军 阅读(53) 评论(0) 推荐(0) 编辑
摘要: 在Opengl中显示字符多用Glut单元中的glutBitmapCharacter进行显示。这样有两个问题。 1、是不能显示汉字。 2、是要glut32.dll库支持。 通过研究可以不用Glut,只用其它的GL库就能实现中文显示 1、加入库 uses OpenGLContext, GL,glu; 2 阅读全文
posted @ 2024-03-04 11:52 禁卫军 阅读(14) 评论(0) 推荐(0) 编辑
摘要: 使用Lazarus调用Opencl对GPU进行操作运算。 1、硬件:CPU i5-7400,显卡1050。硬件比较老了。 2、运算内容:1024*1024个浮点数求平方。都运算10000次。 3、对比:GPU从加载硬件-编译C原核程序到运算完成1.325s,CPU单线程运算完成24.49s。如何按C 阅读全文
posted @ 2024-02-07 23:10 禁卫军 阅读(28) 评论(0) 推荐(0) 编辑