delphi多线程访问数据库

delphi如何用多线程访问数据库的例子

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        434  2008-07-23 10:16  Project1.cfg

     文件       3038  2008-07-23 10:16  Project1.dof

     文件        213  2008-07-23 10:16  Project1.dpr

     文件     651264  2008-07-23 11:45  Project1.exe

     文件        876  2008-07-23 10:04  Project1.res

     文件        743  2008-07-23 11:20  Unit1.~dfm

     文件        923  2008-07-23 11:35  Unit1.~pas

     文件       4428  2008-07-23 11:35  Unit1.dcu

     文件        744  2008-07-23 11:42  Unit1.dfm

     文件        923  2008-07-23 11:35  Unit1.pas

     文件       2108  2008-07-23 11:41  Unit2.~pas

     文件       3822  2008-07-23 11:45  Unit2.dcu

     文件       2110  2008-07-23 11:45  Unit2.pas

----------- ---------  ---------- -----  ----

               671626                    13