如何让DBGrid从数据库读取的数据具有特定的含义

[fly_cc]

数据库里存的都是数字，每个数字有特定的含义，比如1代表红色 ，2 代表 蓝色，怎幺让DBGrid显示 出颜色来，而不是数字

[亮剑_]

在加载数据时根据你的规则，设置字体或背景色

[bdmh]

在DrawDataCell中根据值处理背景色

[fly_cc]

我没表达清楚，不好意思，我的意思是内容根据数字输出文字，文字的内容是颜色，也就是数字跟文字的对应关系，不是说要设置字体颜色或者背景色

[SuperTitan007]

1：在sql语句中用case when转换
2：使用计算字段。

[亮剑_]

“文字的内容是颜色”，怎么讲，用颜色表示文字？

[董董]

有两种方案：
第一种，在SQL语句中，使用case语句做直接转换。

第二种，在TDBGrid下面的数据集中添加TField，然后对TField.OnGetText Event做处理。

[董董]

[Quote=引用 7 楼 fly_cc 的回复:]
可能我说颜色给大家误解了，再举个相同的例子吧，数据库里存的是数字，每个数字代表不同的意义，1代表电风扇，2代表冰箱，那怎么让dbgrid显示电风扇 冰箱，只能用代码控制吗？
[/Quote]

不用代码控制，难道靠意念？程序不可能知道1是风扇，2是冰箱。

[fly_cc]

可能我说颜色给大家误解了，再举个相同的例子吧，数据库里存的是数字，每个数字代表不同的意义，1代表电风扇，2代表冰箱，那怎么让dbgrid显示电风扇 冰箱，只能用代码控制吗？

[kye_jufei]

方法有三：
第一種，在SQL语句中，使用case when then语句做直接转换;

select case checked when 0 then '电风扇' when 1 then '冰箱' when 2 then '其它' end as T 
from Res_User_Temp

第二種，在TDBGrid下面的数据集中添加TField，然后对TField.OnGetText Event做处理;

  if AText<>'' then
  begin
    if strtoint(atext)=1 then
       atext:='电风扇';
  end;

第三種，在properties增加ImageComboBox屬性，然後在items中修value所對應的description值；

最後結合前三種方法，在組件的自繪事件中編寫代碼，類似以下這樣：

if(CheckValue=0) then
    begin
      AViewInfo.Focused;
      ACanvas.Brush.Color:=clRed;
    end;
    if(CheckValue=1) then
    begin
      AViewInfo.Focused;
      ACanvas.Brush.Color:=clGreen;
    end;
    if(CheckValue=2) then
    begin
      AViewInfo.Focused;
      ACanvas.Brush.Color:=clFuchsia;
    end;

[varick_zhong]

[Quote=引用 7 楼 fly_cc 的回复:]
可能我说颜色给大家误解了，再举个相同的例子吧，数据库里存的是数字，每个数字代表不同的意义，1代表电风扇，2代表冰箱，那怎么让dbgrid显示电风扇 冰箱，只能用代码控制吗？
[/Quote]
人家都已经跟你说了,你说的是颜色,可以举一反三的啊...