delphi DBGrid数据显示替换

来源：百度知道 编辑：UC知道 时间：2024/05/03 14:17:57
在delphi中我要将DBGrid中显示的数据替换一下，比如查找到的数据是1,但是在DBGrid中显示的是管理员，用什么控件实现！！！

最方便最简单的办法就是双击DBGRID的dataset(如，adoquey,adotable等)，然后Add all fields,选中你要转换显示的那个字段，在其OnGetText事件里写入转换显示代码就可以了。举个例子，我的DBGRID的DATASET是ADOQUERY控件。要转换显示的字段是statues
procedure Tfrm_deal.ADOQuery1statuesGetText(Sender: TField;
var Text: String; DisplayText: Boolean);
begin
if sender.AsString='1' then
text:='管理员'
else
text:=sender.AsString;//当然你可以多几个IF来显示想要显示的，但要注意要有ELSE来控制不是你要转换的情况
end;

方法1：用字典表，数据集里建立lookup字段，或DBGrid建立picklist列
方法2：数据集里建立计算字段

还是用stringgrid操作起来会好点，想做什么都可以实现

用stringgrid比较灵活