Instalar aplicación en Red y conectar a SQL con archivo INI

[[kurono]]

Para guardar los valores utilizamos WriteString:

poner inifiles en los uses

Código Delphi [-]
private
   ini:TIniFile;

var  
  fName:string;  //declaraciones Globales
Const
  CONFIG_SECTION = 'ConfigDB';//declaraciones Globales

begin

  fName := ChangeFileExt(Application.ExeName,'.ini');
  ini := TIniFile.Create(fName);

  // Grabar
  ini.WriteString(CONFIG_SECTION, 'User', edtUser.Text);
  ini.WriteString(CONFIG_SECTION, 'password', edtPassword.Text);
  ini.WriteString(CONFIG_SECTION, 'Server', edtServer.Text);
  ini.WriteString(CONFIG_SECTION, 'BaseDatos', cbBD.Text);

end;



Y para recuperarlos el equivalente ReadString:

begin

  fName := ChangeFileExt(Application.ExeName,'.ini');
  ini := TIniFile.Create(fName);

  // Cargar datos
  edtUSer.Text := ini.ReadString(CONFIG_SECTION, 'User', STR_EMPTY);
  edtPassword.Text := ini.ReadString(CONFIG_SECTION, 'password', STR_EMPTY);
  edtServer.Text := ini.ReadString(CONFIG_SECTION, 'Server', STR_EMPTY);
  cbBD.Text := ini.ReadString(CONFIG_SECTION, 'BaseDatos', STR_EMPTY);

end;