delphi里面的tcombobox下拉菜单里的选择项要怎么删掉,从哪删
3个回答
展开全部
如果是设置进去的,你要选中这个控件,到属性框找到items属性,双击打开后,里面是下拉的内容。
如果是代码读取进去的,你就需要找到这个控件输入下拉内容的代码,用if 语句把你不需要的项去掉。
procedure Tpw.d2Enter(Sender: TObject);
begin
with adoquery1 do begin
sql.clear;
sql.Add('select name from temployee where department='''+d1.text+''' order by number');
execsql;
active:=true;
d2.Items.Clear;
while not eof do begin
if fieldvalues['name']<>null then
d2.Items.Add(fieldvalues['name']);
next;
end;
end;
end;
如果是代码读取进去的,你就需要找到这个控件输入下拉内容的代码,用if 语句把你不需要的项去掉。
procedure Tpw.d2Enter(Sender: TObject);
begin
with adoquery1 do begin
sql.clear;
sql.Add('select name from temployee where department='''+d1.text+''' order by number');
execsql;
active:=true;
d2.Items.Clear;
while not eof do begin
if fieldvalues['name']<>null then
d2.Items.Add(fieldvalues['name']);
next;
end;
end;
end;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
combobox1.items.delete(index); //index要删除的索引下标从0开始
combobox1.clear; //清空所有
combobox1.clear; //清空所有
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询