摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Memo1: TMemo; Button1: TButton; Button2: TButton; Bu... 阅读全文
posted @ 2009-11-02 11:56 万一 阅读(3996) 评论(3) 推荐(0) 编辑
摘要: 偶然从 SysUtils 里发现了几个路径相关的函数, 以前没见过, 可能是 2010 新增的:GetLocaleDirectory();GetLocaleFile();LocaleDirectoryExists();LocaleFileExists();应用测试:uses IOUtils;procedure TForm1.FormCreate(Sender: TObject);var p,f:... 阅读全文
posted @ 2009-11-02 01:00 万一 阅读(6777) 评论(2) 推荐(1) 编辑