CnCommon单元之ForceDirectories【2】
摘要：// 递归创建多级子目录 function ForceDirectories(Dir: string): Boolean; begin Result := True; if Length(Dir) = 0 then begin Result := False; Exit; end; Dir := E
阅读全文
posted @ 2021-04-30 13:18
04 2021 档案
CnCommon单元之ExploreFile【1】
摘要：感谢cnPack前辈们开源了如此优秀的源码，不学习下真的是浪费了。今天开始逐个分析，提升自己。 // 在资源管理器中打开指定文件夹或者文件，可设置选中状态 procedure ExploreFile(const AFile: string; isSelect: Boolean=False); var
阅读全文
posted @ 2021-04-30 12:03
Delphi 利用信号变量实现多进程之间排队同步
摘要：利用OpenSemaphore函数可以在多个进程之间进行同步排队操作。
阅读全文
posted @ 2021-04-20 19:00
如何科学合理的给硬盘分区？
摘要：如何科学合理的给硬盘分区？系统盘100G（win7的话50G就够了，但是有一部分软件装系统盘优于装在其他盘，到时候空间不够很麻烦)程序盘200G（装各种系统软件,大型软件）工作盘200G（工作的工具,文档,资料等）娱乐盘300G（照片，视频，电影，游戏等）下载盘100G（各种网盘，浏览器，QQ群设置
阅读全文
posted @ 2021-04-20 08:11
