delphi怎么和sqlserver 连起来啊。。
我在delphi开发的界面的文本框里面输入一个字段的值,然后可以执行sql语句,在数据库中删除这条数据。

解决方案 »

  1.   

    C:\Program Files\Borland\Delphi7\Demos\Db
      

  2.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      constr: String;
    begin
      constr := 'Provider=SQLOLEDB.1;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=Credit';
      with AdoConnection1 do
      begin
        Connected := false;
        ConnectionString := constr;
        Connected := true;
      end;
      with AdoQuery1 do
      begin
        Connection := AdoConnection1;
        Close;
        SQL.Text := ' delete from tablename where tablecol =:edit1';
        Parameters.ParamByName('edit1').value :=trim(edit1.text);
        ExecSql;
      end;
    end;
      

  3.   

    嘿嘿~~~楼主滴DELPHI没在C盘装着……