Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Делфи _ BitBtnClick

Автор: VoRoNiCh 14.04.2007 14:00

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


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

end.


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

Автор: Tan 14.04.2007 14:04

Можешь сделать глобальную переменную типа boolean, и прописать условие.

Автор: мисс_граффити 14.04.2007 14:13

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

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

Автор: Гость 14.04.2007 19:58

Так элементарно))) Юльшое спасибо good.gif