关于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 '呢？

[解决办法]
ADOC1.Close;
IF adoc1.ConnectionString <> ' ' then
EDIT1.Text := ADOC1.ConnectionString;


以上没有问题，但不知道你的目的是什么，如果是想要使当connectionstring变化时将其显示到edit1中，代码如下：


var
str1:string;


ADOC1.Close;
str1:=adoc1.ConnectionString;
.........//对adoc1.ConnectionString修改过程代码
.........
IF adoc1.ConnectionString <> str1 then
EDIT1.Text := ADOC1.ConnectionString;

[解决办法]
Uses AdoConEd;