读书人

数据库显示有关问题

发布时间: 2012-02-24 16:30:38 作者: rapoo

数据库显示问题
将ADOquery ADOTable 的结果放到DBgrid中 我想实现数据库中的某一列如果是0 则显示 '男 ' 如果是1 则显示‘女’ 这个显示要怎么做 以前记得 现在不记得了 呵呵

[解决办法]
在字段的GetText 和 SetText 中写代码:
procedure TDMDP_RES.cdsDP_CompanyIsOpenGetText(Sender: TField;
var Text: String; DisplayText: Boolean);
begin
if sender.AsBoolean then
Text:= '已开业餐厅 '
else if (sender.AsBoolean=false) then
Text:= '新店址餐厅 ';
end;

procedure TDMDP_RES.cdsDP_CompanyIsOpenSetText(Sender: TField;
const Text: String);
var
mStr: boolean;
begin
if Text= '已开业餐厅 ' then
mStr:=true
else if Text= '新店址餐厅 ' then
mStr:=false;

sender.Value:=mStr;
end;

读书人网 >.NET

热点推荐