oracle delphi ado 远程 data source IP localhost 192.

  self.con1.ConnectionString:='Provider=MSDAORA.1;User ID=system;Data Source="(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOST=127.0.0.1)(PORT=1521)))(CONNECT_DATA=(SID=orcl)))";Password=Gogogo123;ConnectTimeout=3';
  self.con1.Open;
  if self.con1.Connected then
  begin
    ShowMessage('ok');
  end;