关于ADOCONNECTION的有关问题，请帮忙看看了

关于ADOCONNECTION的问题，请各位高手帮忙看看了。
procedure   TLog_F.BitBtn3Click(Sender:   TObject);
begin
ADOC1.Close;
IF   EditConnectionString(ADOC1)   then
      EDIT1.Text   :=   ADOC1.ConnectionString;
end;

会有错误提示，但是我之前也是这么做的，没有弹出来错误，请问问题出在哪？

错误提示：[Error]   Log_U.pas(99):   Undeclared   identifier:   'EditConnectionString '

[解决办法]
EditConnectionString没定义!