BitBtnClick Опции

[VoRoNiCh]

подскажите пожалуйста как сделать чтоб при первом нажатии на кнопку выполнялась 1операция, а при втором 2ай. и при последующих нажатиях аналогично 1,2,1,2,1,2...

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
panel1.Visible:=true;
end;

end.

а при втором нажатии чтоб выполнялось panel1.Visible:=false;

[мисс_граффити]

либо (если речь именно о делании панели видимой/невидимой, как в примере) можно

panel1.Visible:=not(panel1.Visible);