Ver Mensaje Individual
  #4  
Antiguo 31-07-2004
Avatar de Paoti
Paoti Paoti is offline
Miembro
 
Registrado: may 2003
Ubicación: Monterrey. N.L., México
Posts: 612
Reputación: 21
Paoti Va por buen camino
hola paren, mirate como funcionan los archivos INI... myapp.ini!!!!


ahi te va un ejemplo

aqui se carga lo que haya en el archivo .ini que se llama laibense.ini, en tu caso guarda la ruta de tu base de datos....

si no existe el archivo se crea automaticamente y los valoes por default son los que dicen 'NA'

Código Delphi [-]
procedure TFrmConfig.FormCreate(Sender: TObject);
begin
archi := TIniFile.Create('Laibense.ini');
CTNet.Text := archi.ReadString('Base','Net','NA');
CTTemp.Text := archi.ReadString('Base','Temp','NA');
CTRuta.Text := archi.ReadString('Base','Ruta','NA');
end;


aqui guardo al presionar el button3, en la seccion 'Base', con los valores que pongo en las cajas de texto....


Código Delphi [-]
procedure TFrmConfig.Button3Click(Sender: TObject);
begin
archi.WriteString('Base','Net',CTNet.Text);
archi.WriteString('Base','Temp',CTTemp.Text);
archi.WriteString('Base','Ruta', CTRuta.Text);
end;


mirate la ayuda de Delphi: inifiles o Tinifile




chau
__________________
Estudia y anda en la calle.... que asi serás el doble de listo que los demás...

análisis de información
análisis y diseño de sistemas

Paoti Rios Reséndiz
Responder Con Cita