TMS AdvSmoothMenu1项目单击

Question

似乎AdvSmoothMenu1没有itemindex属性。我想做的是：

case AdvSmoothMenu1.ItemIndex of 
0: begin 

... 但似乎没有这样的选择。那么如何告诉我的应用程序如何处理不同的项目？

Answer 1

使用TAdvSmoothMenu.OnItemClick事件：

procedure TForm1.AdvSmoothMenu1ItemClick(Sender: TObject; 
  ItemIndex: Integer);
begin
  case ItemIndex of
    0: HandleItemZeroClick;
    1: HandleItemOneClick;
  end;
end;