listbox的数据来源于adoquery中sql:select distinct 类别 from 进货
不知如何实现，是否用listbox.additem()，不知如何去实现。。
用惯foxpro，用delphi有点困难。
希望大家帮帮忙哦。

查詢出數據後用循環來賦值給listbox.additem().

谢谢。。