begin
with TMemIniFile.Create('Inventario.ini') do try
Mysql.Disconnect;
Mysql.Database := ReadString( 'Datos', 'DadaBase', 'Inventario');
Mysql.Password := ReadString( 'Datos', 'Pass', 'local');
Mysql.User := ReadString( 'Datos', 'User', 'root');
Mysql.HostName := ReadString( 'Datos', 'Host', '192.168.0.1');
Mysql.Connect;
finally
Free;
end;
end;