如何判断Delphi控件当前是否可见？

要判断Delphi控件当前是否可见，可以使用控件的Visible属性。Visible属性表示控件是否可见，如果为True，则表示控件可见，如果为False，则表示控件不可见。

可以使用以下代码来判断Delphi控件当前是否可见：

if Control.Visible then
  ShowMessage('控件可见')
else
  ShowMessage('控件不可见');

其中，Control是要判断的控件对象。