delphi如何链接Oracle数据库？

Question

delphi如何链接Oracle数据库？

Answer 1

在没有安装oracle数据库的机器上安装oracle 客户端，然后使用ado组件就可以连接oracle

Answer 2

conn:= 'Provider=MSDAORA.1;Password= '+pass+ ';User ID= '+user+ ';Persist   Security   Info=True; '+ 'Data   Source= '+servername; 
adoconnection1.ConnectionString:=conn;

Answer 3

在没有安装oracle数据库的机器上安装oracle 客户端，然后使用ado组件就可以连接oracle
就是这样

Answer 4

http://www.examda.com/oracle/zonghe/20100623/091521521.html

Answer 5

Function ConnectOra(var DB : TDatabase,Other Param...)
begin
  with DB do
  begin
    Connected := False;
    DatabaseName := 'DBNAME';
    DriverName := DriveName;
    AliasName :=  AliasName;
    params.Clear;
    Params.Add('SERVER NAME=' + ServerName );
    Params.Add('USER NAME=' + LoginUser );
    Params.Add('PASSWORD=' + LoginPwd );
    Connected := True;
  end;
end;

Answer 6

在Form1上面放以下几个控件：
standard面板下的button控件
dataAccess面板下的datasource控件，query控件，database控件
data Controls面板下的DBGrid控件
然后双击button进入Click事件，写以下代码：procedure TForm1.Button1Click(Sender: TObject);
begin
  DBGrid1.DataSource:=datasource1;
  datasource1.DataSet:=query1;
  database1.databasename:='xxx';
  database1.AliasName:='xxx';
  database1.loginprompt:=false;
  database1.Params.Values['USER NAME']:='user';
  database1.params.values['PASSWORD']:='password';
  query1.databasename:='xxx';
  Database1.connected:=true;
  with query1 do
  begin
    close;
    sql.Clear;
    sql.Add('select sysdate from dual');
    open;
  end;
end;

Answer 7

 程序运行后，点击button，你将在DBgrid里看到数据库时间。