遍歷資料庫，用遞回的方法加入到mainmenu選單中，節點能是無限的。
ccxlh gnbh （資料庫欄位名字）
00 業務管理中心
0000 合同管理
000000 合同登記
000001 合同審核
000002 合同登記查詢
0001 采購管理
000100 訂貨管理
00010000 自動訂單
00010001 采購訂單
00010002 訂單洗掉
000101 -
000102 采購識訓驗收
00010200 采購識訓單
00010201 采購識訓單洗掉
00010202 采購識訓單審核
000103 藥品拒收報告單
01 庫存管理
0100 商品損溢單
0101 架位號修改單
0102 空架位號
0103 盤點管理
010300 準備盤點表
010301 錄入實盤資料
010302 盤點審核
010303 盤點記帳
uj5u.com熱心網友回復：
讀取資料庫遞回創建選單MainMenuuj5u.com熱心網友回復：
怎么沒有人回答呢，自己頂一下吧uj5u.com熱心網友回復：
我再頂吧，看來delphi沒落了uj5u.com熱心網友回復：
1.首先，按層次順序分n次讀入選單資訊資料：例如，先讀入長度為2位數的，就可以讀入全部第一層選單；
然后，回圈第一層讀到選單，以它的值分n次去讀第二層選單。
例如第一層第一個選單是00，就用00%且長度為2位數，去找出它的第二層選單。
以下遞回，就可以找出全部選單。
2.以上面的方式，依次讀入選單資料后，用這些值，分別撰寫代碼去“動態創建選單”。
到這里，如果你的問題是，那到底怎么動態創建選單，請參考百度。
例如：
http://blog.csdn.net/delphi308/article/details/20957039
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/71378.html
標籤：VCL組件開發及應用
上一篇：請教如果在標題欄增加按鈕
下一篇：.net呼叫delphi 的DLL使用ADO 連接oracle出錯 是怎么了，但是delphi調就沒問題。 這個詭異的問題有人知道嗎?