本文整理自网络,侵删。
dm.BM.First; while not dm.bm.Eof do begin combobox1.items.Add(dm.BM.FieldValues['部门名称']); dm.BM.Next; end; combobox1.Items.Add('<ALL>');
相关阅读 >>
Delphi webbrowser中模拟连接点击(非鼠标模拟)
更多相关阅读请进入《Delphi》频道 >>