哪位大侠用过F1BOOK或CELL的LIST BOX？好象最多只能写20多行？(100分)

好象最多只能写20多行？有何办法？

易表2000所用的控件是什么？

str:
不会吧，我使用下面都正常。

procedure TForm1.Button1Click(Sender: TObject);
var
ID1:integer;
begin
F1Book1.ObjNew(F1ObjDropDown,2,2,3,12,ID1);
F1Book1.ObjName[ID1]:='shenqw';
F1Book1.ObjAddItem(ID1,'eeee1;eeee2;eeee3');
F1Book1.ObjAddItem(ID1,'eeee4;eeee5;eeee6');
F1Book1.ObjAddItem(ID1,'eeee7;eeee8;eeee9');
F1Book1.ObjAddItem(ID1,'eeee10;eeee11;eeee12');
F1Book1.ObjAddItem(ID1,'eeee7;eeee8;eeee9');
F1Book1.ObjAddItem(ID1,'eeee7;eeee8;eeee9');
F1Book1.ObjAddItem(ID1,'eeee7;eeee8;eeee9');
F1Book1.ObjAddItem(ID1,'eeee7;eeee8;eeee9');
F1Book1.ObjAddItem(ID1,'eeee7;eeee8;eeee9');
F1Book1.ObjAddItem(ID1,'eeee7;eeee8;eeee9');
F1Book1.ObjAddItem(ID1,'eeee7;eeee8;eeee9');
F1Book1.ObjAddItem(ID1,'eeee7;eeee8;eeee9');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee14');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee14');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee14');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee14');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee14');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee14');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee14');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee14');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee15');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee15');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee15');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee15');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee15');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee15');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee15');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee15');
F1Book1.ObjAddItem(ID1,'eeee12;eeee13;eeee20');
F1Book1.ObjVisible[ID1]:=True;
end ;

真怪乐

接受答案了.