请问通用的数据库查询这样写有没有问题?

function TDataModule1.GetString(sql:String):string;
var
  value:string;
begin
  ADOQuery1.close;
  ADOQuery1.sql.clear;
  ADOQuery1.sql.add(sql);
  ADOQuery1.open;
  ADOQuery1.First;
  if not ADOQuery1.eof then
  begin
  value:=ADOQuery1.Fields[0].AsString;
  end;
  ADOQuery1.close;
  Result :=value;
end;

上面需要写ADOQuery1.close;吗? 或者要加ADOQuery1.free;吗?
怎样写效率高,全部查询都用DataModule1的ADOQuery1


同一个界面 有时候执行十几个
DataModule.GetString('select name from 表 ');

free就不用了吧，我习惯每次在使用之前先ADOQuery1.close;