Problema con una excepción que no consigo resolver.

[Ñuño Martínez]

Empezado por Pedrote

Respecto a lo del objeto INI tienes razón, pero es que no lo uso solo para obtener los parámetros de conexión de la BD si no para otras configuraciones de la aplicación FTP, ciertos directorios, etc. ¿Ves conveniente hacerme una función especifica que me recoja las variables de cada determinada sección del INI?

No, no es conveniente. Lo que debes hacer, entonces, es crear el objeto INI en una unidad (por ejemplo, uno que se llame "config.pas") y acceder a él cuando necesites obtener información.

Código Delphi [-]
UNIT config;
(* Carga y permite el acceso a la configuración. *)

INTERFACE

  CONST
  (* Nombre del archivo de configuración. *)
    ArchivoConfiguracion = 'config.ini';

(* Devuelve el valor de configuración solicitado. *)
  FUNCTION GetValIni (secc, val: STRING): STRING;

IMPLEMENTATION

  USES
    IniFiles;

  VAR
  (* Contiene el archivo de configuración. *)
    ArchivoIni: TIniFile;

(* Devuelve el valor de configuración solicitado. *)
  FUNCTION GetValIni (secc, val: STRING): STRING;
  BEGIN
    GetValIni := ArchivoIni.ReadString (secc, val, '');
  END;

INITIALIZATION
(* Crea y carga el objeto. *)
  ArchivoIni := TIniFIle.Create (ArchivoConfiguracion);
FINALIZATION
(* Destruye el objeto. *)
  ArchivoIni.Free;
END.

Esto mejora el rendimiento, a costa de usar un poco más de memoria.

Empezado por Pedrote

Yo no veo donde dices que mezclo tipos :S compilar compila.

Aquí:

Código Delphi [-]
  if CheckValIni('BD', 'Inst') and CheckValIni('BD', 'Usuario') and
    CheckValIni('BD', 'Usuario') then

Se supone que CheckValIni devuelve STRING pero los IF esperan un BOOLEAN. En FreePascal no compila, y al menos cuando usaba Delphi 6 tampoco.