摘要:
这些节点都是动态生成,再设置。 原理 还是 在前面显示图片 实现 procedure TForm1.FormCreate(Sender: TObject); var pnode, node: TTreeNode; begin with TreeView1.Items do begin node := 阅读全文
摘要:
select id,username ,password from userinfo UNION ALL select sum( id) ,'合计','合计' from userinfo -- GROUP BY username 主要是Union All联接两个Select,类似超市购物小票 合计 阅读全文
摘要:
var AddCollctMenus: Array Of TMenuItem; //动态菜单 procedure TForm1.Button5Click(Sender: TObject); Var i, AddCollctMenuCount: Integer; Begin AddCollctMenu 阅读全文