delphi代码问题(旺仔哥哥,请进,我是空谷幽兰)
一.有一个表,里面有一列为confirmed,内容为Y,N;现在我要在DBGRID里显示这一列的内容,如果confirmed为Y,就付值"已送仓",否则就"未送仓"(DBGRID 用DataSource 和 Query连接),我在QUERY的OnCalcFields写事件代码如下(为什么程序打开后confirmed那一列的内容没有变化?请高手指点!):
procedure Tfrmrd101.MasterQueryCalcFields(DataSet: TDataSet);
begin
MasterQuery.Edit;
if MasterQuery.FieldByName('Confirmed').Asstring='Y' then
MasterQuery.FieldByName('Confirmed').Asstring:='已送倉'
else
MasterQuery.FieldByName('confirmed').Asstring:='未送倉' ;
MasterQuery.Post ;
end;