我有个button和一个Panel控件，我想点击第一下button,弹出Panel孔件，点击第二下button,Panel控件隐藏（panel的visible属性设置为false),请问该button怎么写？

Question

if panel1.visible=true then
  panel1.visible:=false
else
  panel1.visible:=true;

Answer 1

BUTTON1.CLICK事件
IF PANEL1.VISIBLE=TRUE THEN
  PANEL1.VISIBLE;=FALSE
ELSE
PANEL1.VISIBLE;=TRUE;
 

Answer 2

if panel1.visible then
  panel1.visible = false
else
  panel1.visible = true;
嘿嘿...

Answer 3

最简单的
 panel1.visible:=NOT panel1.visible;

Answer 4

panel1.visible:=not panel1.visible; 
最精简

Answer 5

使用一个button就够了
panel1.visible:=not panel1.visible; 

Answer 6

panel1.visible:=not panel1.visible; 
一般都是这样用的.

Answer 7

panel1.visible:=not panel1.visible;