no puedo conectar mi aplicacion a la base de datos

[shinopeat87]

Casimiro Notevi amigo si lo cambio a como tu indicas debo cambiar algo de codigo? o simplemente lo toma igual? hablo de este parte del codigo:

Código Delphi [-]
  con1.Connected:=False;
   IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName)+'conexionbase.ini');
   bd := IniFile.ReadString('bd','Database','');
   usuario := IniFile.ReadString('usuario','User_Name','');
   pas := IniFile.ReadString('pas','Password','');
   servidor:= IniFile.ReadString('servidor','Server','');
   driver := IniFile.ReadString('driver','DriverID','');
   puerto := IniFile.ReadString('puerto','Port','');

[Arturo.Molina]

Empezado por shinopeat87

Casimiro Notevi amigo si lo cambio a como tu indicas debo cambiar algo de codigo? o simplemente lo toma igual? hablo de este parte del codigo:

Código Delphi [-]
con1.Connected:=False;
IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName)+'conexionbase.ini');
bd := IniFile.ReadString('bd','Database','');
usuario := IniFile.ReadString('usuario','User_Name','');
pas := IniFile.ReadString('pas','Password','');
servidor:= IniFile.ReadString('servidor','Server','');
driver := IniFile.ReadString('driver','DriverID','');
puerto := IniFile.ReadString('puerto','Port','');

Hola shinopeat87, sí, deberías modificar el nombre de la sección del archivo ini de donde lees los parámetros, pero yo además, eliminaría parte del codigo, que es redundante, para dejarlo así:

Código Delphi [-]
begin
con1.Connected:=False;
IniFile := TIniFile.Create(ExtractFilePath(Application.ExeName)+'conexionbase.ini');
con1.Params.Clear;
con1.Params.Database:= IniFile.ReadString('db', 'Database', '');
con1.Params.UserName:= IniFile.ReadString('db', 'User_Name', '');
con1.Params.Password:= IniFile.ReadString('db', 'Password', '');
con1.Params.Add('Server='+ IniFile.ReadString('db','Server','') );
con1.Params.DriverID:= IniFile.ReadString('db','DriverID','');
con1.Params.Add('Port='+ IniFile.ReadString('db','Port','') );

If bd = '' then
begin
ShowMessage('Error al cargar Base de Datos');
Application.Terminate;
end else
con1.Connected:= True;
end;

IniFile.Close;   // ----Recuerda tambien que debes cerrar el archivo ini cuando acabes de usarlo

Saludos

[Casimiro Notevi]