如何弄才能有ADOCONNECTION的连接向导

解决方案 »

  1.   

    如何弄才能有ADOCONNECTION的连接向导
      

  2.   

    object inspector里的adoconnection向导.
      

  3.   

    这样做,假设Edit1是数据库服务名,Edit2是数据库名,Edit3是用户名,Edit4是用户密码,这样写代码:
    begin
      try
        begin
          with ADOConnection1 do begin
            Connected := False;
            ConnectionString := 'Initial Catalog=' + Edit2.Text + ';';
            ConnectionString := ConnectionString + 'Data Source=';
            ConnectionString := ConnectionString + Edit1.Text + ';';
            ConnectionString := ConnectionString + 'uid=';
            ConnectionString := ConnectionString + Edit3.Text + ';';
            ConnectionString := ConnectionString + 'password=';
            ConnectionString := ConnectionString + Edit4.Text;
            ConnectionTimeOut := 30;
            LoginPrompt := False;
            KeepConnection := False;
            Connected := True;
          end;
        except
          on e: Exception do begin
      

  4.   

    ShowMessage('连接错误');
            Exit;
          end;
      end;
    按错了,这是后半段,你可以利用ConnectionString来实现动态问题