.Tag ist eine Integer-Eigenschaft einer Komponente, die man frei verwenden kannst. Du kannst also bei Anklickaken von Button2 den Wert von Button1.Tag von 0 (Standard) auf etwas anderes ändern und dann im onClick diese Eigenschaft auswerten
Delphi-Quellcode:
if (Sender as TButton).Tag = 0 //Button2 wurde nicht geklickt
begin
...
end
else //Button2 wurde vorher geklickt
begin
...
end;