首页 > 代码库 > unigui web app之菜单
unigui web app之菜单
unigui web app之菜单
拖放TUnimMenu控件到窗体上。
side:=msleft 表示将在左边显示菜单。
菜单项属性
UnimMenu1.Visible := True;显示菜单
UnimMenu1.Visible :=false隐藏菜单
处理菜单项点击事件
procedure TMainmForm.UnimMenu1Click(Sender: TUnimMenuItem);
begin
Sender.Parent.Visible := False;
case Sender.MenuId of
0 : UnimForm2.ShowModal();
3 : Close;
end;
end;
unigui web app之菜单
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。