完整代码如下:ADOQUERY1.SQL.CLAER;
ADOQUERY1.SQL.ADD(‘SELECT NAME FROM TYPE’);
ADOQUERY1.OPEN;
// 先移到第一条
ADOQUERY1.First; // addWHILE NOT ADOQUERY1.EOF DO
BEGIN
COMDOBOX1.ITEMS.APPEND(ADOQUERY1.FIELDBYNAME(‘NAME’).ASSTRING); ADOQUERY1.Next; // add
END;
ADOQUERY1.SQL.ADD(‘SELECT NAME FROM TYPE’);
ADOQUERY1.OPEN;
// 先移到第一条
ADOQUERY1.First; // addWHILE NOT ADOQUERY1.EOF DO
BEGIN
COMDOBOX1.ITEMS.APPEND(ADOQUERY1.FIELDBYNAME(‘NAME’).ASSTRING); ADOQUERY1.Next; // add
END;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货