您所在位置：主题：怎么名字不会出现在列表框里面啊
triumph
[专家分：160] 发布于 2006-06-27 22:05:00
我做的一个登录界面,
procedure Tposloginform.Formshow(Sender: TObject);
var i:integer;
begin
//loginok:=false;
rzcombobox1.Items.Clear;
with frm_dm.temp do
begin
sql.Clear;
sql.Add('select e_name from employees');//选择出名字
open;
for i:=0 to recordcount-1 do begin
rzcombobox1.Items.add(fieldbyname('e_name').AsString);//把名字添加到列表框里面
next;
end;
end;
end;
但结果列表框里面没有显示啊
procedure Tposloginform.Formshow(Sender: TObject);
var i:integer;
begin
//loginok:=false;
rzcombobox1.Items.Clear;
with frm_dm.temp do
begin
sql.Clear;
sql.Add('select e_name from employees');//选择出名字
open;
for i:=0 to recordcount-1 do begin
rzcombobox1.Items.add(fieldbyname('e_name').AsString);//把名字添加到列表框里面
next;
end;
end;
end;
但结果列表框里面没有显示啊