Hvorfor?

procedure TMainForm.1Click(Sender: TObject);
begin
  StatusBtn.Caption := '1';
  ImgList.GetBitmap(0,StatusBtn.Glyph);
end;

procedure TMainForm.2Click(Sender: TObject);
begin
  StatusBtn.Caption := '2';
  ImgList.GetBitmap(1,StatusBtn.Glyph);
end;

procedure TMainForm.3Click(Sender: TObject);
begin
  StatusBtn.Caption := '3';
  ImgList.GetBitmap(2,StatusBtn.Glyph);
end;

procedure TMainForm.4(Sender: TObject);
begin
  StatusBtn.Caption := '4';
  ImgList.GetBitmap(3,StatusBtn.Glyph);
end;

Det virker fint FØRSTE gang den skal skifte bitmap på knappen, men detefter forblir den der, lige gyldig hvad jeg trykker på, selvom den teoretisk skulle skifte til et andet bitmap?