Hola,
Algo así debiera funcionar:
Código Delphi
[-]
uses
IniFiles;
procedure TfrmPrincipal.btnLeerIniClick(Sender: TObject);
var
ini: TIniFile;
begin
ini := TIniFile.Create(ChangeFileExt(ParamStr(0), '.ini'));
try
ShowMessage( 'Clave Comandos = ' + ini.ReadString('Ficheros', 'Comandos', 'Error') );
ShowMessage( 'Clave Estado = ' + ini.ReadString('Ficheros', 'Estado', 'Error') );
ShowMessage( 'Clave Log = ' + ini.ReadString('Ficheros', 'Log', 'Error') );
finally
ini.Free;
end;
end;
Te adjunto un sencillo ejemplo en donde se hace uso del código de arriba.