VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代码 12将窗体压入系统托盘VB编程源代

用CImage类在VS2008平台上实现的MFC单文档多幅图片的读入

支持离线扫码，扫描照片，扫描结果保存入数据库.rar,太多无法一一验证是否可用，程序如果跑不起来需要自调，部分代码功能进行参考学习。

A700toFX2N寫入頻率.zipA700toFX2N寫入頻率.zipA700toFX2N寫入頻率.zip

详情见： 博客《Android（仿QQ登入+网易新闻）》 https://blog.csdn.net/weixin_45627194/article/details/123037258?spm=1001.2014.3001.5501

可重入flow-shop类型模具热处理车间动态批调度，林刚，刘建军，以flow-shop类型模具热处理生产控制为背景，总结其为一类两阶段平行机批调度问题。任务属于不相容多工件族，具有动态到达和重入加工

供应商准入流程、注册字段清单、供应商资料清单、门槛项目内容及模板、资质审查单、新供应商导入申请、现场评审单（真实企业资源供应付费下载）

毛坯管理系统，EXCEL开发，实现批次管理，毛坯先入先出，跟踪溯源，毛坯入库自动生成按年月第几次入库的批次号，比如220501P4000，01代表第一次，4000代表入口数量，毛坯第一次出库加工流转的《过程跟踪单》批号为22050101，毛坯第二次出库加工流转的《过程跟踪单》批号为22050102，以此类推，直至该批物流全部发出。

这是一款优惠计算神器 只需要输入商品的数值和打折的数值然后就可以自动计算出划不划算等等 安装方法: 使用威信开发者工具打开源码 然后提交审核就可以了 PS:该款小程序无需设置合法域名 下面是小编的测试演示图,大家可以看看:

CONST SName: ARRAY[0..3] OF STRING = ('xmmc', 'xmbm', 'gltw', 'tg'); procedure LoadTcxTReeList(Tree:Tcxtreelist;Qeytable:TAdoQuery;bm:string;SName:array of string); var level,firstlen,k,i:integer; mynode:array[0..9] of TcxTreeListNode;//存每层节点，最大十层 begin k:=Length(SName); tree.Clear; if Qeytable.RecordCount=0 then Exit; level:=0; Qeytable.First; Tree.BeginUpdate; firstlen:=Length(Qeytable[bm]);//第一层编码长度 mynode[level]:=tree.TopNode; //取根节点 while not Qeytable.Eof do //遍历数据表，利用编码字段记录排序规律，依次添加树节点 begin level:=(Length(Qeytable[bm])-firstlen) div 2; //第几层 if (level-1)<0 then mynode[level]:= tree.add(mynode[0],nil) else mynode[level]:= tree.addchild(mynode[level-1],nil); for i:=0 to k-1 do begin if not Qeytable.FieldByName(SName[i]).IsNull then mynode[level].Texts[Tree.ColumnByName(SName[i]).ItemIndex]:=Qeytable[sName[i]]; end; Qeytable.next; end; Tree.EndUpdate; mynode[0].expand(False); tree.Items[0].Selected := True; end;