经常看到人家的菜单项(TPopupMenu)选中某一项后就可以在前面显示一个小对勾,请问是怎么实现的?

Question

改变menuitem的check属性就可以了

Answer 1

是啊，在它的事件中Menutem1.Check:=true;就行

Answer 2

if n3.Checked=false then
  begin
    n3.checked=true;//n3是一个菜单项
......

Answer 3

if menutem1.checked=true then
menutem1.checked:=true
else
menutem1.checked:=false;

Answer 4

with menu1 do
begin
  if menuitem1.checked=false then
     menuitem1.checked:=true;
end;

Answer 5

with menu1 do
begin
  if not(menuitem1.checked=false) then
     menuitem1.checked:=false
  else
     menuitem1.checked:=true;
end;

Answer 6

不要判断，直接对menutem1.checked进行NOT运算。

Answer 7

popmenu.checked := not popmenu.checked;

Answer 8

来晚了还可以设置enabled禁用呢