Delphi - Leer fichero INI

 
Vista:

Leer fichero INI

Publicado por Mauricio (17 intervenciones) el 29/07/2003 23:36:55
Necesito leer de un fichero q se llama Configuracion.ini situado en la misma ruta q el ejecutable.
El contenido del fichero de configuracion es:

[BaseDatos]
BD= C:\remoin\REMOIN.GDB

y las ordenes que uso para leer de el son:

ruta := ExtractFileDir (ParamStr(0))+'\Configuracion.ini';
f.Create('ruta');
ruta:= f.ReadString('BaseDatos','BD','bd');
label3.caption:=ruta;

en la label quiero q me recupere la ruta donde se encuentra la base de datos, para saber que contiene.
Pero en el momento que se ejecuta el readString me da un acceso invalido a memoria ¿me podriais ayudar? muchas gracias a todos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Leer fichero INI

Publicado por Diego Romero (636 intervenciones) el 30/07/2003 03:38:03
En el código que has escrito no queda claro de qué tipo es f. Pero entiendo tu problema, intenta esto
var
Ini:TIniFile;
Ruta:String;
begin
Ini:=TIniFile.Create(ExtractFilePath(Application.exename)+'\Configuracion.ini);
try
if Ini.ValueExists('BaseDatos', 'BD) then
begin
Ruta:=Ini.ReadString('BaseDatos','BD','');
if Ruta = '' then ShowMessage('Valor BD no establecido en Configuracion.ini.');
end // if then
else ShowMessage('El valor BD en Configuracion.ini no existe.');
finally
Ini.free;
end; // try
end; // procedure

En Ruta tendrás el valor de la clave BD que está en el archivo .ini
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar