Delphi问题1：不用控件连接MS SQL数据库？

Question

书上说的全是用控件的，我用VB时不用控件连接数据库的，所以想用Delphi时都不用控件。刚转来Delphi，请指教。＾_＾

Answer 1

不一样是要用控件，＾_＾，不用控件Delphi没办法吗？

Answer 2

uses adodb;var
  qrySel: TADOQuery ;
begin
   qrysel:= TADOQuery.Create(nil);
   try
     qrysel.ConnectionString :='Provider=SQLOLEDB.1;Password=1234;Persist    Security Info=True;User ID=sa;Initial Catalog=pos;Data Source=.'; //设置连接串
     with qrysel do
     begin
       close;
       sql.clear;
       sql.add('select * from table1");
       try
         execsql;
       except
         showmessage('error');
       end;
     end;     finally
     qrysel.free;
   end;end;

Answer 3

放一个adoconnectionADOConnection1.ConnectionString:='Provider=SQLOLEDB.1;password=;Persist Security Info=True;User ID=sa;Initial Catalog=jdtransdb1;Data Source=192.168.0.105';
adoconnection1.connected;

Answer 4

使用CreateOleObject函数创建ADO！

Answer 5

//chwdong(chwdong) 这个连接方法用控件了，书上都有说。＾_＾
//麻烦.....是的，我比较麻烦，我只是想学习，多谢了。
//使用CreateOleObject函数创建ADO！才学Delphi，你讲得这么深，我不会啊。
一会试一下qxj的行不行。＾_＾

Answer 6

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, adodb, DB;type
  TForm1 = class(TForm)
    ADOConnection1: TADOConnection;
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
  qrySel: TADOQuery ;implementation{$R *.dfm}begin
   qrysel:= TADOQuery.Create(nil);           //这一句出错，弹出是“...‘未调用 Coinitialize...’”
   try
   //qrysel.ConnectionString :='Provider=SQLOLEDB.1;Password=1234;Persist    Security Info=True;User ID=sa;Initial Catalog=pos;Data Source=.'; //设置连接串
     qrysel.ConnectionString :='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=CSDB;Data Source=YOU';
     with qrysel do
     begin
       close;
       sql.clear;
       sql.add('select * from Car');
       try
         execsql;
       except
         showmessage('error');
       end;
     end;   finally
     qrysel.free;
end;end.end;
出错啊，看看啦...  :(

Answer 7

我两周看了＜Delphi7完美经典＞，铁道出版社的，里面有三分一关于数据库的，但全部用控件连接数据库的，我这样问问题有什么问题吗？刚收到qxj信息，试试先，先多谢啦。

Answer 8

还是不行，晕了！只有等qxj明天来了。

Answer 9

＾_＾，问题解决了，多谢qxj，多谢各位。

Answer 10

"我用VB时不用控件连接数据库的"???
难道你不用ADO?只不过是动态创建ADO罢了,Delphi中你完全可以导入ADO类库,用CreateCOMObject的方法来创建嘛

Answer 11

我就是用ADO，但不想用ADOConnection等控件，你说的CreateCOMObject方法我又不会，用qxj的方法就行了。