在一个只有procedure 的单元中要使用tdatabase控件，该怎么办？

Question

我想在一个单元中放一个过程，这个单元不显示窗体，但要用到tdatabase、query控件，
该怎么办？

Answer 1

动态生成：
uses DB, DBTables;procedure proc;
var
  db: TDatabase;
  query1: TQuery;
begin
  db := TDatabase.Create(nil);
  query1.Create(nil);
  ...
  ...
  query1.Free;
  db.Free;
end;

Answer 2

请问tdatabase的属性该怎么写，我原来用的是网络上的interbase库
用bde admin写的配置信息，如何填写params