Hola molina669
yo realice un proceso para tener los datos de configuración desde un archivo .ini... eso si trabaje con Interbase..
en el Form donde tengo el menu, tengo esto..
el Form Datos corresponde a un datamodule donde tengo la conexión con la base
Código Delphi
[-]
procedure TMenu.FormCreate(Sender: TObject);
Var
Parametro:Tinifile;
begin
If not DirectoryExists('D:\Sistemas\ProyectoX') Then
Begin
{$I-}
MkDir('D:\Sistemas\ProyectoX');
End;
if FileExists('D:\Sistemas\ProyectoX\config.ini') Then
Begin
Parametro := TiniFile.Create('D:\Sistemas\ProyectoX\config.ini');
Datos.IBD_Compras.Connected := False;
Datos.IBD_Compras.DatabaseName := Parametro.ReadString('BaseDato','Servidor',' ');
Datos.IBD_Compras.Params.Values ['user_name'] := Parametro.ReadString('BaseDato','Usuario',' ');
Datos.IBD_Compras.Params.Values ['password'] := Parametro.ReadString('BaseDato','Clave',' ');
Datos.IBD_Compras.Connected := True;
Parametro.Free;
End
Else
Begin
ShowMessage('Debe Seleccionar Base de Datos para continuar');
Man_Datos := TMan_Datos.Create(Self);
Try
Man_Datos.ShowModal;
Finally
Man_Datos.Free;
End;
End;
end;
si tienes dudas.. me avisas