用wwDBComBoBox,先用提取代码数据表的记录填充wwDBComBOBox,然后再将wwDBComBOBox与wwDBGrid的某个字段关联,即可实现显示是一个值,存储是另一个值. wwDBComboBox1.MapList:=true; ADODataSetCode.Close; ADODataSetCode.CommandText:='select bh,mc from 表 '; ADODataSetCode.Open; While not ADODataSetCode.Eof do begin wwDBComboBox1.Items.Append(ADODataSetCode.FieldBYName('mc').AsString+#9+ADODataSetCode.FieldBYName('bh').AsString); ADODataSetCode.Next; end;
wwDBComboBox1.MapList:=true;
ADODataSetCode.Close;
ADODataSetCode.CommandText:='select bh,mc from 表 ';
ADODataSetCode.Open;
While not ADODataSetCode.Eof do
begin
wwDBComboBox1.Items.Append(ADODataSetCode.FieldBYName('mc').AsString+#9+ADODataSetCode.FieldBYName('bh').AsString);
ADODataSetCode.Next;
end;