让dbgrid和一个没有数据的DataSource相连,在formshow添加如下代码:
grd1.columns[0].picklist.add(qry1.FieldValues['UserID']);
grd1.Columns[0].KeyList.add(qry1.FieldValues['UserID']);
运行时dbgrideh的下拉列表筐打不开,请高手帮我解答,高分相送
grd1.columns[0].picklist.add(qry1.FieldValues['UserID']);
grd1.Columns[0].KeyList.add(qry1.FieldValues['UserID']);
运行时dbgrideh的下拉列表筐打不开,请高手帮我解答,高分相送
str:='select * from Users';
grd1.columns[0].picklist.clear;
grd1.columns[0].keylist.clear; qry1.Close;
qry1.SQL.Clear;
qry1.SQL.Add(str);
qry1.open; qry1.first; while not qry1.Eof do
begin grd1.columns[0].picklist.add(qry1.FieldValues['UserID']);
grd1.Columns[0].KeyList.add(qry1.FieldValues['UserID']);
//showmessage(qry1.FieldValues['UserID']);
qry1.next
end;
grd1.Columns[0].AutoDropDown := true;
grd1.SelectedField := grd1.Columns[0].Field;end;
*******************************************
showmessage 可以弹出内容,但grd1的下拉筐更本打不开
值还是无法显示,但用 showmessage却可以显示,这是为何呀,