![](https://img-blog.csdnimg.cn/20201014180756738.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
2009-2010 新功能
vniceboy
good
展开
-
现在, Delphi 的多线程已经非常易用了!
转自:http://www.cnblogs.com/del 先看一个非多线程的例子, 代码执行时不能进行其它操作(譬如拖动窗体): {自定义方法: 在窗体上绘制...} procedure MyMethod; var i: Integer; begin for i := 0 to 500000 do begin Form1.Canvas.Lock;转载 2012-11-17 13:34:09 · 320 阅读 · 0 评论 -
几个和当前路径相关的新函数
转自:http://www.cnblogs.com/del 偶然从 SysUtils 里发现了几个路径相关的函数, 以前没见过, 可能是 2010 新增的: GetLocaleDirectory(); GetLocaleFile(); LocaleDirectoryExists(); LocaleFileExists(); 应用测试: uses IOUtils转载 2012-11-17 13:48:48 · 310 阅读 · 0 评论 -
一句话复制整个文件夹(当然包括嵌套文件夹)
转自:http://www.cnblogs.com/del 使用的是 Delphi 2010 下 IOUtils 单元的 TDirectory.Copy 函数: uses IOUtils; procedure TForm1.Button1Click(Sender: TObject); const SourceDir = 'C:\Temp\Folder1'; { 源文件转载 2012-11-17 13:46:22 · 181 阅读 · 0 评论