[ecfisa]

Hola de nuevo.

No presté atencion que el foro era Builder C++ ...

Entonces sería:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 Button1->Tag = 1;
}

y

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 Button1->Tag = !Button1->Tag;
}

Disculpas por la confusión.