|
segue abaixo a forma como faço a conexão Arq_Ini := TIniFile.Create('.\Acesso.ini'); try FConexao := TZConnection.Create(nil); with FConexao do begin Name := 'Banco'; Protocol := 'postgresql-7'; HostName := Arq_Ini.ReadString('Sistema', 'Servidor', '127.0.0.1'); Port := 5432; Database := Arq_Ini.ReadString('Sistema', 'BancoDados', ' '); User := 'usuario'; Password := 'senha'; Catalog := ''; AutoCommit := True; ReadOnly := True; TransactIsolationLevel := tiNone; Connected := False; SQLHourGlass := False; end; try Connected := True; except raise exception.create ('Nao foi possivel abrir a conexao com o banco de dados'); Finally Arq_Ini.Free; end; Magno Lima escreveu: Opa, |
_______________________________________________ pgbr-geral mailing list [email protected] https://listas.postgresql.org.br/cgi-bin/mailman/listinfo/pgbr-geral
