ggqq74的专栏

[code=Delphi(Pascal)]unit uThreadPool;{  aPool.AddRequest(TMyRequest.Create(RequestParam1, RequestParam2, ...)); }interfaceuses  Windows,  Classes;// 是否记录日志// {$DEFINE NOLO

重载TForm的虚拟函数CreateParams。class TForm1 : public TForm{__published: // IDE-managed Components    TListBox *ListBox1;private: // User declarationsprotected:    void __fastcall CreateParam

ExtractFileDrive ：返回完整文件名中的驱动器，如"C:" ExtractFilePath：返回完整文件名中的路径，最后带“/”，如"C:\test\"ExtractFileDir：返回完整文件名中的路径，最后不带“/” ,如"C:\test"ExtractFileName:返回完整文件名中的文件名称 (带扩展名)，如"mytest.doc"ExtractFileEx