Узнать состояние TPopupMenu

[Alter]

Как узнать, открыт popupmenu или нет?

[ArtGrek]

можно поставить в его открытие булевую переменую при открытии, а в ончендже вписать

if a then 
begin
  opened
  a := false
end
else
  closed
  s := true
end;

[Alter]

Сообщение от ArtGrek

можно поставить в его открытие булевую переменую при открытии, а в ончендже вписать

if a then 
begin
  opened
  a := false
end
else
  closed
  s := true
end;

Что-то не работает. Есть другие варианты???