Enabled funktioniert nicht

[Amalkotey]

Delphi 7 gestartet und das Project genommen, welches angezeigt wird.

Delphi-Quellcode:

unit Unit1;

interface

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

type
  TForm1 = class(TForm)
    rb1: TRadioButton;
    rb2: TRadioButton;
    chk1: TCheckBox;
    procedure FormCreate(Sender: TObject);
    procedure chk1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  chk1.Checked := True;
  rb1.Enabled := False;
  rb2.Enabled := False;
end;

procedure TForm1.chk1Click(Sender: TObject);
begin
  if chk1.Checked = True then
    rb2.Enabled := False
  else
    rb2.Enabled := False;
end;

end.

wenn das Prog gestartet wird, wird der Status von rb1.Enabled und rb2.Enabled auf False. Bei der Checkboy wird der Haken gesetzt. Dies geschieht in FormShow. Gehe ich mit der Maus ins Fenster verändert Sie der Status, d. h., die Rabiobuttons sind anwhlbar.