Problem mit Ini.ReadBool(string,string,boolean)

[gfjs]

Hallo Allerseits.

Ich versuche aus einer Ini-Datei folgenden Wert auszulesen:

[Editor]
DirToDisk=false;

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    CheckBox1: TCheckBox;
    Button2: TButton;
    CheckBox2: TCheckBox;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

uses
  IniFiles;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  ini : TIniFile;
  b,c   : boolean;
begin
  ini := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'Test.Ini');
  try
    CheckBox1.Checked := Ini.ReadBool('Editor', 'DirToDisk', true);
  finally
    ini.Free;
  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  ini : TIniFile;
  b,c   : boolean;
begin
  ini := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'Test.Ini');
  try
    CheckBox1.Checked := Ini.ReadBool('Editor', 'DirToUSB', true);
  finally
    ini.Free;
  end;
end;

end.

Leider ist das Ergebnis nicht das, was ich erwarte. Ich habe aber keinen Hinweis darauf gefunden, was für den dritten Parameter einzugeben ist.

Wer kann mir da auf die Sprünge helfen?

Danke im Voraus.

Jürgen