1、包含编译好的qwindowkit库； 2、包含可运行exe文件； 3、可编译通过的源码； 4、Windows编译环境： MSVC 2019, 2022 + Qt 5.12 or higher 5、详情参考博客：https://blog.csdn.net/m0_37251750/article/details/136909882

TCP本身是有一个保活状态的 keep-alive机制，默认是关闭的，需要单独启动就可以；默认保活时间是2小时，不过这个机制是在协议层，也就是传输层生效的，如果应用层出问题了，就不能及时发现问题；如果想要实现断线重连的操作，这个就不好实现了。         另一种方式，可以在应用层自定义模拟这个心跳检测机制，使用线程或者定时器来定时发心跳包即可实现保活功能，并且能做到断线重连的操作。 详情地址： https://blog.csdn.net/mars1199/article/details/134482555

本源码是采用VC++6.0设计的大智慧最新免费版大智慧365的DLL插件设计的示例代码。在此基础上，用户可以开发出更为方便灵活的各种股票选股公式和其他指标公式。

摘要:VB源码,数据库应用,数据库
　　一个VB与SQLSERVER配合的小程序，附VB源码下载，一本书中的演示程序源代码：
　　1.用MySampleDB.mdb创建名叫“test_dsn”的ODBC数据源，详细的创建方法就不介绍了。
　　2.确保Data控件的Connect属性为“ODBC;UID=;PWD=; DSN=test_dsn;”。 信息来源:源他

遗传算法的理论是根据达尔文进化论而设计出来的算法: 人类是朝着好的方向（最优解）进化，进化过程中，会自动选择优良基因，淘汰劣等基因。 遗传算法（英语：genetic algorithm (GA) ）是计算数学中用于解决最佳化的搜索算法，是进化算法的一种。进化算法最初是借鉴了进化生物学中的一些现象而发展起来的，这些现象包括遗传、突变、自然选择、杂交等。 遗传算法的一般步骤 my_fitness函数 评估每条染色体所对应个体的适应度 升序排列适应度评估值，选出 前 parent_number 个 个体作为 待选 parent 种群（适应度函数的值越小越好） 从 待选 parent 种群 中随机选择 2 个个体作为父方和母方。 抽取父母双方的染色体，进行交叉，产生 2 个子代。（交叉概率） 对子代（parent + 生成的 child）的染色体进行变异。（变异概率） 重复3,4,5步骤，直到新种群（parent_number + child_number）的产生。 循环以上步骤直至找到满意的解。 本资源包含遗传算法+matlab+原理介绍+示例源码

VB高级钩子编程示例源码VB高级钩子编程示例源码VB高级钩子编程示例源码

DELPHI动态创建删除FRAME unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls,FM; type TForm2 = class(TForm) Panel1: TPanel; Button2: TButton; ScrollBox1: TScrollBox; procedure Button2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; type TFM = Array Of TFrame1; var Form2: TForm2; aFM: TFM; procedure DeleteArrItem(var arr: TFM ; Index: Integer);stdcall; implementation {$R *.dfm} procedure DeleteArrItem(var arr: TFM ; Index: Integer); var Count: Cardinal; i:integer; begin Count := Length(arr); if (Count = 0) or (Index < 0) or (Index >= Count) then Exit; Move(arr[Index+1], arr[Index], (Count-Index)* SizeOf(arr[0])); SetLength(arr, Count - 1); for I := 0 to Length(arr) - 1 do begin arr[i].Label1.Caption:=inttostr(i); end; end; procedure TForm2.Button2Click(Sender: TObject); var fram:TFrame1; begin SetLength(aFM,length(aFM)+1); aFM[length(aFM)-1] :=TFrame1.Create(nil) ; fram:=aFM[length(aFM)-1]; fram.Label1.Caption:=inttostr(length(aFM)-1); fram.Parent:=ScrollBox1; end; end. unit fm; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TFrame1 = class(TFrame) GroupBox1: TGroupBox; Label1: TLabel; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; implementation uses unit2; {$R *.dfm} procedure TFrame1.Button1Click(Sender: TObject); begin DeleteArrItem(aFM,strtoint(label1.Caption)); ( Sender as Tbutton ).Parent.Parent.Destroy; end; end.

小猫爪：嵌入式小知识18-XCP SeedNKey.dll示例源码

1、高清PDF 2、完善 示例源码

Delphi7+Indy10.5.8开发的一个通讯小软件示例源码，主要完成TidTCPServer 和 TIdTCPClient的通讯。可以做为一个聊天软件的雏形，里面解决通讯的问题，不过，有些情况下还是会有异常，可以一起探讨。