[Kailon]

Удалять можно так, но предварительно всем элементам которые нужно будет удалить необходимо присвоить одинаковый Tag, например 1...

Код:

procedure TForm1.BitBtn1Click(Sender: TObject);
var
 i: Byte;
begin
 try
  for i := ComponentCount - 1 downto 0 do
   if (Components[i] is TButton) and ((Components[i] as TButton).Tag = 1) then
    (Components[i] as TButton).Destroy;
 except

 end;
end;