如何把dbgrid中的数字显示为字符串

老子 2006-07-27 09:46:04
表:hotelid integer, status smallint;
如何把status在dbgride中显示为字符串? 如status 为0,1,2代表,启用,未使用,作废
...全文
99 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
SmallMaker 2006-07-27
  • 打赏
  • 举报
回复
在dataset的永久字段的ongettext事件中写,根据情况直接给text值
procedure Tform1.ADOQuery1statusGetText(Sender: TField;
var Text: string; DisplayText: Boolean);
begin
case status of
0:text:=启用;
1:text:=未使用;
2:text:=作废;
end;

end;
MoveFirst 2006-07-27
  • 打赏
  • 举报
回复
在对应的数据源(ClientDataSet或者Query)对应字段的OnGetText事件中处理
case Sender.AsInteger of
0 : Text :='启用';
1 : Text :='未启用';
2 : Text :='作废';
end;
tomp 2006-07-27
  • 打赏
  • 举报
回复
修改select语句,用case条件吧。

2,498

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧